module Cam_main:sig
..end
val com : ?args:string array ->
string -> Cam_commands.command -> Cam_commands.command_desc
val ask_quit : unit -> unit
val about_box : unit -> unit
val default_commands : Cam_commands.command_desc list
val init_iconize_commands : < deiconify : unit -> 'a; iconify : unit -> 'b; .. > -> unit
val main : unit -> unit