Core.Debug
val debug_mode : bool -> unit
val is_debug_mode : unit -> bool
val print : ('a, Stdlib.Format.formatter, unit) Stdlib.format -> 'a