clear x
F : Type u₁ → Type u₁
inst : QPF F
r : M F → M F → Prop
h₀ : ∀ (x : M F), r x x
h₁ : ∀ (x y : M F), r x y → Quot.mk r <$> destruct x = Quot.mk r <$> destruct y
x : M F
⊢ ∀ (a : Container.M (C F)) (y : M F), r (Quot.mk (congr F) a) y → Quot.mk (congr F) a = y
F : Type u₁ → Type u₁
inst : QPF F
r : M F → M F → Prop
h₀ : ∀ (x : M F), r x x
h₁ : ∀ (x y : M F), r x y → Quot.mk r <$> destruct x = Quot.mk r <$> destruct y
⊢ ∀ (a : Container.M (C F)) (y : M F), r (Quot.mk (congr F) a) y → Quot.mk (congr F) a = y