%I #3 Mar 30 2012 18:50:55
%S 0,0,1,0,1,1,4,1,0,4,4,0,9,9,1,0,9,0,9,0,1,16,16,1,0,16,0,4,5,4,25,4,
%T 3,25,1,0,11,25,13,0,25,4,36,0,9,36,36,1,0,0,36,0,36,0,1,1,19,20,49,9,
%U 49,49,1,0,49,49,49,0,3,4,6,0,64,64,0,5,64,64,64,1,0,64,64,16,64,13,64,0
%N A122385(n)^2 mod n.
%C a(n) = A000290(n) mod A122385(n);
%C a(A122389(n)) = n, a(m) <> n for m < A122389(n).
%K nonn
%O 1,7
%A _Reinhard Zumkeller_, Sep 01 2006