sig type t val of_map : char -> char Main.Type.UMap.t -> Main.Type.UCharTbl.Char.t val get : Main.Type.UCharTbl.Char.t -> Main.Type.UChar.t -> char end