sig
type simulation_mode_type = Manual | Automatic
val simulation_mode_names :
(Option.Control.simulation_mode_type * string) list
val show_estimate_opt : bool Pervasives.ref
val simulation_only_opt : bool Pervasives.ref
val simulation_mode_opt :
Option.Control.simulation_mode_type Pervasives.ref
val show_estimate : unit -> bool
val simulation_only : unit -> bool
val simulation_mode : unit -> Option.Control.simulation_mode_type
val arg_spec : unit -> (string * Arg.spec * string) list
end
Loading...