Parameter Base.Type_equal.Composition_preserves_injectivity.1-M1

type 'a t
val strip : ('a t'b tequal ‑> ('a'bequal