4 lines
111 B
Text
4 lines
111 B
Text
wheel=. 4 6 2 6 4 2 4 2
|
|
fermat=. {{1 = 10 (y&|@^) <: y}}"0
|
|
|
|
_10 ]\ (#~ fermat) (#~ 0&p:) +/\ 49 , 15e4 $ wheel
|