MakeP.Ptype t = ReadWrite.t * Write.tval is_top : t -> boolval top : unit -> tval is_bot : t -> boolval bot : unit -> tval hash : t -> intval show : (ReadWrite.t * Write.t) -> stringval pretty : unit -> (ReadWrite.t * Write.t) -> Printable.Pretty.docval printXml : 'a BatInnerIO.output -> (ReadWrite.t * Write.t) -> unitval to_yojson :
(ReadWrite.t * Write.t) ->
[> `Assoc of (string * Yojson.Safe.t) list ]val arbitrary : unit -> (ReadWrite.t * Write.t) QCheck.arbitrary