Spec.ActiveOncesinclude sig ... endtype t = Onces.tval hash : t -> intval show : t -> stringval pretty : unit -> t -> Printable.Pretty.docval to_yojson : t -> Yojson.Safe.tval tag : t -> intval bot : unit -> Onces.tval is_bot : Onces.t -> boolval top : unit -> Onces.tval is_top : Onces.t -> boolval printXml : 'a BatInnerIO.output -> Onces.t -> unitval arbitrary : unit -> Onces.t QCheck.arbitrary