]> matita.cs.unibo.it Git - helm.git/blob - matita/contribs/assembly/freescale/freescale_ocaml/matita_higher_order_defs_functions.ml
tagged 0.5.0-rc1
[helm.git] / matita / contribs / assembly / freescale / freescale_ocaml / matita_higher_order_defs_functions.ml
1 let compose =
2 (function f -> (function g -> (function x -> (f (g x)))))
3 ;;
4