simp only [congr, pcongr]
F✝ : Type u₁ → Type u₁
inst✝ : QPF F✝
F : Type u₁ → Type u₁
inst : QPF F
p : M (C F) → M (C F) → Prop
h₀ : ∀ (x y : M (C F)), p x y → ↑(precongr F) p x y
x y : M (C F)
h₁ : p x y
⊢ congr F x y
F✝ : Type u₁ → Type u₁
inst✝ : QPF F✝
F : Type u₁ → Type u₁
inst : QPF F
p : M (C F) → M (C F) → Prop
h₀ : ∀ (x y : M (C F)), p x y → ↑(precongr F) p x y
x y : M (C F)
h₁ : p x y
⊢ ↑(pgfp (precongr F)) ⊥ x y