langs a-z

2013-04-10 22:43:41 -07:00 · 2013-04-10 22:43:41 -07:00 · d066446780
commit d066446780
parent db842d013d
11389 changed files with 98361 additions and 1020 deletions
--- a/Task/Function-composition/OCaml/function-composition-2.ocaml
+++ b/Task/Function-composition/OCaml/function-composition-2.ocaml
@ -0,0 +1,6 @@
+# let compose f g x = f (g x);;
+val compose : ('a -> 'b) -> ('c -> 'a) -> 'c -> 'b = <fun>
+# let sin_asin = compose sin asin;;
+val sin_asin : float -> float = <fun>
+# sin_asin 0.5;;
+- : float = 0.5