RosettaCodeData/Task/Constrained-genericity/OCaml/constrained-genericity-4.ml
2024-10-16 18:07:41 -07:00

4 lines
126 B
OCaml

module EatFloat : Eatable with type t = float = struct
type t = float
let eat f = Printf.printf "I'm eating %f\n%!" f
end