n=j=2
3.upto(727){|i|n*=i**(' *c-\W
PMBA$IM\x01\x03\x1ea8\x09"\x1d\x0b;\x09/1$H3\x09\x17b\x02\x14?-A\x03D\x097\x1d1I\x06 A\x17,3\x05X\x1b$\x1c1\x14\x12\x04\x0d9a\x02:Z'[j/2]/10**(1&j+=1)%10)if~-2**i%i<2}
p n
Note that non-ascii characters in the above source code will be escaped (such as \x9f).