(************************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) (* object method new_command : ?command:string -> ?term:string -> unit -> unit method frame : GBin.frame end val main : unit -> unit val command_window : unit -> command_window