open Num#load"nums.cma"let rec($)x n=x>/n&quo_num x n$n=();output_byte stdout(int_of_num(mod_num x n));;num_of_string(read_line())$Int 256
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page