module Register:sig
..end
val treat_integer_model : unit -> unit
val apply_if_dir_exist : string -> (string -> unit) -> unit
val run : unit -> unit
val run_and_catch_error : unit -> unit
val run_and_catch_error : unit -> unit
val main : 'a -> unit