A pet implementation of RSA