sig   val space : unit -> string   val spaced : string -> string   exception Panic end