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