RosettaCodeData/Task/Y-combinator/Ursala/y-combinator-3.ursala
Ingy döt Net 68f8f3e56b all tasks
2013-04-11 01:07:29 -07:00

3 lines
68 B
Text

#import nat
fact = my_fix "f". ~&?\1! product^/~& "f"+ predecessor