Subfactorial FIXED by m.ukai

open Num#load"nums.cma"let rec(@)a b n=print_endline(string_of_num b);n<51&(Int n*/(a+/b)@a)(n+1);;(Int 0@Int 1)1

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page