langs a-z

Task/Conditional-structures/OCaml/conditional-structures-1.ocaml

@@ -0,0 +1,6 @@
+let condition = true
+
+if condition then
+  1 (* evaluate something *)
+else
+  2 (* evaluate something *)

Task/Conditional-structures/OCaml/conditional-structures-2.ocaml

@@ -0,0 +1,8 @@
+if condition then begin
+  (); (* evaluate things for side effects *)
+  5
+end
+else begin
+  (); (* evaluate things for side effects *)
+  42
+end

Task/Conditional-structures/OCaml/conditional-structures-3.ocaml

@@ -0,0 +1,5 @@
+match expression with
+| 0 -> () (* evaluate something *)
+| 1 -> () (* evaluate something *)
+| n when n mod 2 = 0 -> () (* evaluate something *)
+| _ -> () (* evaluate something *)