RSA和收敛

Question

我试着在PARI中做一个函数，计算a^(c*q_t) mod n;，其中c和n是很大的数，q_t是n/c收敛的分母。这是出于RSA目的。我只是想改进这个功能，这样计算机就会自己做这件事，我的意思是它会自己找到q_t，也会发现a本身。因此，它还需要两个参数。我不知道该怎么做。这是我的函数：

expmod(a,e,m)={
  local(x,y,s,d); x=a; y=1; s=e;
  while(s,d=s%2;s=(s-d)/2;
  if(d,y=(y*x)%m); x=(x*x)%m);
  return(y)}

Answer 1

PARI有一个内置的类型Mod(a,m)，它通过指数跟踪模数。

lift(Mod(a,m)^e)