fpvandoorn/carleson
Source indexedlemma ยท leanprover/lean4:v4.32.0
URel.eq
Carleson.Discrete.ForestUnion ยท Carleson/Discrete/ForestUnion.lean:196 to 205
Source documentation
Lemma 5.4.1, part 1.
Exact Lean statement
lemma URel.eq (hu : u โ ๐โ k n j) (hu' : u' โ ๐โ k n j) (huu' : URel k n j u u') : ๐ u = ๐ u'
Complete declaration
Lean source
Full Lean sourceLean 4
lemma URel.eq (hu : u โ ๐โ k n j) (hu' : u' โ ๐โ k n j) (huu' : URel k n j u u') : ๐ u = ๐ u' := by by_cases e : u = u'; ยท rw [e] have ndj := not_disjoint hu hu' huu' have nโ := (hu.1.2 _ hu'.1.1).mt ndj rw [disjoint_comm] at ndj have nโ := (hu'.1.2 _ hu.1.1).mt ndj simp_rw [URel, e, false_or, ๐โ, mem_setOf] at huu'; obtain โจp, โจ_, _, slโโฉ, slโโฉ := huu' rcases le_or_gt (๐ฐ u) (๐ฐ u') with h | h ยท exact eq_of_le_of_not_lt (Grid.le_dyadic h slโ.1 slโ.1) nโ ยท exact (eq_of_le_of_not_lt (Grid.le_dyadic h.le slโ.1 slโ.1) nโ).symm