OCaml Data Types

[@abdessalemabdo5214]

Thank you ❤.. i was looking for that for a week

[@anickday]

Excellent lecture.

[@louaykhammar7268]

thank you

[@Ashish-pk5tc]

very well explained

[@jonathanengwall2777]

type coin = Head | Tail;;
let rec sum x =
match x with
[]-> 0
| Head::t-> 1 + sum t
| Tail::t-> -1 + sum t
;; (* now OCaml tells you if you have more Heads or Tails *)

[@louisono]

let sum_coins =
List.fold_left (fun acc coin -> match coin with Head -> acc + 1 | Tail -> acc - 1) 0