apply equivF.Pure
case a.refl.Pure
C : _root_.Container
R : Type u₁
x : Free C R
r : R
⊢ equivF Eq ((fun x y => x = y) ⊔ pequiv Eq fun x y => x = y) (construct (Functor.Pure r)) (construct (Functor.Pure r))
case a.refl.Pure.a
C : _root_.Container
R : Type u₁
x : Free C R
r : R
⊢ r = r