let is_digit c = let code = Char.code c in code >= Char.code('0') && code <= Char.code('9')
Could have been written: let is_digit = function '0'..'9' -> true | _ -> false
So the purpose probably wasn't to teach OCaml.
let is_digit c = let code = Char.code c in code >= Char.code('0') && code <= Char.code('9')
Could have been written: let is_digit = function '0'..'9' -> true | _ -> false
So the purpose probably wasn't to teach OCaml.