#!perl -lna use bigint;map{($x,$y)=@F;@F=($y,($x^=$x<<23&($t=2**64-1))^=$y^$x>>17^$y>>26);print$t&$x+$y}0..99
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page