Anons.Grammartype t = | Zero| One of Base.string| Many of t| Maybe of t| Concat of t Base.list| Ad_hoc of Base.stringinclude Ppx_compare_lib.Comparable.S with type t := tval sexp_of_t : t -> Sexplib0.Sexp.tinclude Base.Invariant.S with type t := tval invariant : t -> unitval usage : t -> Base.string