dd78012ddd
Although `HEq` was abbreviated as `≍` in #8503, many instances of the form `HEq x y` still remain. Therefore, I searched for occurrences of `HEq x y` using the regular expression `(?<![A-Za-z/@]|``)HEq(?![A-Za-z.])` and replaced as many as possible with the form `x ≍ y`.
8 lines
290 B
Text
8 lines
290 B
Text
--
|
||
set_option autoImplicit false
|
||
universe u
|
||
variable {α : Type u}
|
||
variable {β : α → Type v}
|
||
theorem ex {p₁ p₂ : Sigma (fun a => β a)} (h₁ : p₁.1 = p₂.1) (h : p₁.2 ≍ p₂.2) : p₁ = p₂ :=
|
||
match p₁, p₂, h₁, h with
|
||
| ⟨_, _⟩, ⟨_, _⟩, rfl, HEq.refl _ => rfl
|