sed 'i{print(sum(i=!f(n,m)=lift(Mod(
s/ /,m)^if(n,f(n-1,m=eulerphi(m))+m,1)),9,r!=r=f(i,/
a))" "r)}'|../s/gp