File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -115,6 +115,20 @@ infix 4 _<ᵇ_
115115-- Left leg: <ᵇ-+1 (x = bplus _ _, y = bplus _ _)
116116<ᵇ-trans (<ᵇ-+1 p) (<ᵇ-+1 q) = <ᵇ-+1 (<ᵇ-trans p q)
117117
118+ ----------------------------------------------------------------------------
119+ -- WF-2 open-case inversions (Ω vs +)
120+ ----------------------------------------------------------------------------
121+
122+ -- The current 7-constructor core has no witness for either direction.
123+ -- These inversion lemmas pin that fact explicitly for downstream case
124+ -- splits while the comparison rule is still deferred.
125+
126+ <ᵇ-inv-Ω+ : ∀ {μ x y} → bOmega μ <ᵇ bplus x y → ⊥
127+ <ᵇ-inv-Ω+ ()
128+
129+ <ᵇ-inv-+Ω : ∀ {x y μ} → bplus x y <ᵇ bOmega μ → ⊥
130+ <ᵇ-inv-+Ω ()
131+
118132----------------------------------------------------------------------------
119133-- Strict-below-ψ examples, for downstream ordering checks
120134----------------------------------------------------------------------------
Original file line number Diff line number Diff line change @@ -181,6 +181,8 @@ open import Ordinal.Buchholz.Order using
181181 ; <ᵇ-+1
182182 ; <ᵇ-irrefl
183183 ; <ᵇ-trans
184+ ; <ᵇ-inv-Ω+
185+ ; <ᵇ-inv-+Ω
184186 ; bzero<Ω0
185187 ; Ω0<Ω1
186188 ; Ω1<Ωω
You can’t perform that action at this time.
0 commit comments