BoolDomain.MakeBoolSourceinclude module type of struct include Printable.StdLeaf endinclude module type of struct include Printable.Std endinclude sig ... endval pretty : unit -> t -> Printable.Pretty.docval printXml : 'a BatInnerIO.output -> t -> unitval to_yojson : t -> [> `String of string ]