module Draw: sig .. end
sig
end
val line : (int -> int -> unit) -> int * int -> int * int -> unit
(int -> int -> unit) -> int * int -> int * int -> unit