%I #10 Jun 30 2021 02:32:20

%S 1,28,42,63,118,130,170,177,195,255,263,266,274,334,352,359,399,411,

%T 466,487,501,528,530,557,571,592,647,659,699,706,724,784,792,795,803,

%U 863,881,888,928,940,995,1016,1030,1057,1059,1086,1100,1121,1176,1188

%N Numbers k such that k^22 == 1 (mod 23^2).

%H Amiram Eldar, <a href="/A056031/b056031.txt">Table of n, a(n) for n = 1..10000</a>

%t x=23; Select[ Range[ 2000 ], PowerMod[ #, x-1, x^2 ]==1& ]

%Y Cf. A056021, A056022, A056024, A056025, A056026, A056027, A056028, A056034, A056035.

%K nonn

%O 1,2

%A _Robert G. Wilson v_, Jun 08 2000