Module Context.Compacted
module Declaration : sig ... endtype ('constr, 'types) pt= ('constr, 'types) Declaration.pt list
val fold : (('c, 't) Declaration.pt -> 'a -> 'a) -> ('c, 't) pt -> init:'a -> 'a
Context.Compactedmodule Declaration : sig ... endtype ('constr, 'types) pt = ('constr, 'types) Declaration.pt listval fold : (('c, 't) Declaration.pt -> 'a -> 'a) -> ('c, 't) pt -> init:'a -> 'a