RosettaCodeData/Task/Y-combinator/OCaml/y-combinator-4.ocaml

2 lines
32 B
Text
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
let rec fix f x = f (fix f) x;;