Module type Base__.Invariant_intf.S1

type 'a t
val invariant : 'a inv ‑> 'a t inv