p F[gets.hex,2e13]while F=proc{|a,b|a<r=1or(1..11).find{r<=(c=a%r<<=4)&&c<b&&F[a/r,c]}}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page