(** INT * Exercise: application *) let add = (+) let q1 = add 10 (add 20 30) let q2 = add 10 (abs (add 10 (-20))) (* abs -10 is understood as (abs) - (10), abs is not a number. *) (** BOOL * Exercise: Comparisons *) (* Closures: b, d, g *) (* Functions: a, b, d, g *) (* Values: a, b, c, d, e, g a function or a closure is a value. *) (** UNIT * Exercise: Unit as an argument *) let q1 = print_newline () (** LIST * Exercise: Lists *) (* [ 1 ; 2 ; 3 ] is a three-element list. * [ 1, 2, 3 ] is a single-element list, the element being a triple. *) let l1 = ( [ (2, true) ] , [ [ 0 ] ] )