points
let fac = let rec fac' acc = function | 0 -> acc | n -> fac' (n * acc) (n - 1) in fac' 1 let seven = let four = 4 and three = 3 in four + three