RosettaCodeData/Task/Constrained-genericity/OCaml/constrained-genericity-4.ml

5 lines
126 B
OCaml
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
module EatFloat : Eatable with type t = float = struct
type t = float
let eat f = Printf.printf "I'm eating %f\n%!" f
end