module Print: sig .. end
sig
end
val new_command : string
string
include struct ... end
val get : unit -> t
unit -> t