MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  nosupbnd2 Structured version   Visualization version   GIF version

Theorem nosupbnd2 27780
Description: Bounding law from above for the surreal supremum. Proposition 4.3 of [Lipparini] p. 6. (Contributed by Scott Fenton, 6-Dec-2021.)
Hypothesis
Ref Expression
nosupbnd2.1 𝑆 = if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
Assertion
Ref Expression
nosupbnd2 ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) → (∀𝑎𝐴 𝑎 <s 𝑍 ↔ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆))
Distinct variable groups:   𝐴,𝑎,𝑔,𝑢,𝑣,𝑥,𝑦   𝑍,𝑎,𝑔,𝑥   𝑆,𝑎,𝑔
Allowed substitution hints:   𝑆(𝑥,𝑦,𝑣,𝑢)   𝑍(𝑦,𝑣,𝑢)

Proof of Theorem nosupbnd2
Dummy variables 𝑝 𝑞 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nfv 1934 . . . . . 6 𝑥((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)
2 nfcv 2924 . . . . . . . . 9 𝑥𝑍
3 nosupbnd2.1 . . . . . . . . . . 11 𝑆 = if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
4 nfre1 3287 . . . . . . . . . . . 12 𝑥𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦
5 nfriota1 7360 . . . . . . . . . . . . 13 𝑥(𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
65nfdm 5927 . . . . . . . . . . . . . . 15 𝑥dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
7 nfcv 2924 . . . . . . . . . . . . . . 15 𝑥2o
86, 7nfop 4847 . . . . . . . . . . . . . 14 𝑥⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o
98nfsn 4666 . . . . . . . . . . . . 13 𝑥{⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}
105, 9nfun 4123 . . . . . . . . . . . 12 𝑥((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})
11 nfcv 2924 . . . . . . . . . . . . 13 𝑥{𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))}
12 nfiota1 6479 . . . . . . . . . . . . 13 𝑥(℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))
1311, 12nfmpt 5198 . . . . . . . . . . . 12 𝑥(𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥)))
144, 10, 13nfif 4511 . . . . . . . . . . 11 𝑥if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
153, 14nfcxfr 2922 . . . . . . . . . 10 𝑥𝑆
1615nfdm 5927 . . . . . . . . 9 𝑥dom 𝑆
172, 16nfres 5967 . . . . . . . 8 𝑥(𝑍 ↾ dom 𝑆)
18 nfcv 2924 . . . . . . . 8 𝑥 <s
1917, 18, 15nfbr 5147 . . . . . . 7 𝑥(𝑍 ↾ dom 𝑆) <s 𝑆
2019nfn 1877 . . . . . 6 𝑥 ¬ (𝑍 ↾ dom 𝑆) <s 𝑆
211, 20nfim 1916 . . . . 5 𝑥(((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
22 simpl 486 . . . . . . . . 9 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦))
23 rspe 3252 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) → ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
2423adantr 484 . . . . . . . . . . 11 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
25 nomaxmo 27762 . . . . . . . . . . . . 13 (𝐴 No → ∃*𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
26253ad2ant1 1146 . . . . . . . . . . . 12 ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) → ∃*𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
2726ad2antrl 738 . . . . . . . . . . 11 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ∃*𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
28 reu5 3369 . . . . . . . . . . 11 (∃!𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ↔ (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ∃*𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦))
2924, 27, 28sylanbrc 592 . . . . . . . . . 10 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ∃!𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
30 riota1 7374 . . . . . . . . . 10 (∃!𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → ((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ↔ (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥))
3129, 30syl 17 . . . . . . . . 9 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ↔ (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥))
3222, 31mpbid 234 . . . . . . . 8 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥)
33 nosupbnd2lem1 27779 . . . . . . . . . 10 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ (𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ suc dom 𝑥) <s (𝑥 ∪ {⟨dom 𝑥, 2o⟩}))
34333expb 1133 . . . . . . . . 9 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ suc dom 𝑥) <s (𝑥 ∪ {⟨dom 𝑥, 2o⟩}))
35 dmeq 5879 . . . . . . . . . . . . 13 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = dom 𝑥)
3635suceqd 6413 . . . . . . . . . . . 12 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = suc dom 𝑥)
3736reseq2d 5965 . . . . . . . . . . 11 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → (𝑍 ↾ suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) = (𝑍 ↾ suc dom 𝑥))
38 id 22 . . . . . . . . . . . 12 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥)
3935opeq1d 4837 . . . . . . . . . . . . 13 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → ⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩ = ⟨dom 𝑥, 2o⟩)
4039sneqd 4594 . . . . . . . . . . . 12 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩} = {⟨dom 𝑥, 2o⟩})
4138, 40uneq12d 4122 . . . . . . . . . . 11 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = (𝑥 ∪ {⟨dom 𝑥, 2o⟩}))
4237, 41breq12d 5113 . . . . . . . . . 10 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → ((𝑍 ↾ suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) <s ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) ↔ (𝑍 ↾ suc dom 𝑥) <s (𝑥 ∪ {⟨dom 𝑥, 2o⟩})))
4342notbid 320 . . . . . . . . 9 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → (¬ (𝑍 ↾ suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) <s ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) ↔ ¬ (𝑍 ↾ suc dom 𝑥) <s (𝑥 ∪ {⟨dom 𝑥, 2o⟩})))
4434, 43syl5ibrcom 249 . . . . . . . 8 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → ¬ (𝑍 ↾ suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) <s ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})))
4532, 44mpd 15 . . . . . . 7 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) <s ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
46 iftrue 4486 . . . . . . . . . . . . . 14 (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥)))) = ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
473, 46eqtrid 2809 . . . . . . . . . . . . 13 (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦𝑆 = ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
4823, 47syl 17 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) → 𝑆 = ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
4948dmeqd 5881 . . . . . . . . . . 11 ((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) → dom 𝑆 = dom ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
50 2on 8451 . . . . . . . . . . . . . . 15 2o ∈ On
5150elexi 3476 . . . . . . . . . . . . . 14 2o ∈ V
5251dmsnop 6203 . . . . . . . . . . . . 13 dom {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩} = {dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)}
5352uneq2i 4118 . . . . . . . . . . . 12 (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ dom {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)})
54 dmun 5886 . . . . . . . . . . . 12 dom ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ dom {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})
55 df-suc 6352 . . . . . . . . . . . 12 suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)})
5653, 54, 553eqtr4i 2795 . . . . . . . . . . 11 dom ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
5749, 56eqtrdi 2813 . . . . . . . . . 10 ((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) → dom 𝑆 = suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦))
5857reseq2d 5965 . . . . . . . . 9 ((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) → (𝑍 ↾ dom 𝑆) = (𝑍 ↾ suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)))
5958adantr 484 . . . . . . . 8 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝑍 ↾ dom 𝑆) = (𝑍 ↾ suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)))
6048adantr 484 . . . . . . . 8 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → 𝑆 = ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
6159, 60breq12d 5113 . . . . . . 7 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ((𝑍 ↾ dom 𝑆) <s 𝑆 ↔ (𝑍 ↾ suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) <s ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})))
6245, 61mtbird 327 . . . . . 6 (((𝑥𝐴 ∧ ∀𝑦𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
6362exp31 423 . . . . 5 (𝑥𝐴 → (∀𝑦𝐴 ¬ 𝑥 <s 𝑦 → (((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)))
6421, 63rexlimi 3262 . . . 4 (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → (((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆))
6564imp 410 . . 3 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
663nosupno 27767 . . . . . . . 8 ((𝐴 No 𝐴 ∈ V) → 𝑆 No )
67663adant3 1145 . . . . . . 7 ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) → 𝑆 No )
6867ad2antrl 738 . . . . . 6 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → 𝑆 No )
69 nodmon 27714 . . . . . . 7 (𝑆 No → dom 𝑆 ∈ On)
7068, 69syl 17 . . . . . 6 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → dom 𝑆 ∈ On)
71 noreson 27724 . . . . . 6 ((𝑆 No ∧ dom 𝑆 ∈ On) → (𝑆 ↾ dom 𝑆) ∈ No )
7268, 70, 71syl2anc 593 . . . . 5 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝑆 ↾ dom 𝑆) ∈ No )
73 simprl3 1234 . . . . . 6 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → 𝑍 No )
74 noreson 27724 . . . . . 6 ((𝑍 No ∧ dom 𝑆 ∈ On) → (𝑍 ↾ dom 𝑆) ∈ No )
7573, 70, 74syl2anc 593 . . . . 5 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝑍 ↾ dom 𝑆) ∈ No )
76 dmres 5998 . . . . . . 7 dom (𝑆 ↾ dom 𝑆) = (dom 𝑆 ∩ dom 𝑆)
77 inss2 4189 . . . . . . 7 (dom 𝑆 ∩ dom 𝑆) ⊆ dom 𝑆
7876, 77eqsstri 3982 . . . . . 6 dom (𝑆 ↾ dom 𝑆) ⊆ dom 𝑆
7978a1i 11 . . . . 5 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → dom (𝑆 ↾ dom 𝑆) ⊆ dom 𝑆)
80 dmres 5998 . . . . . . 7 dom (𝑍 ↾ dom 𝑆) = (dom 𝑆 ∩ dom 𝑍)
81 inss1 4188 . . . . . . 7 (dom 𝑆 ∩ dom 𝑍) ⊆ dom 𝑆
8280, 81eqsstri 3982 . . . . . 6 dom (𝑍 ↾ dom 𝑆) ⊆ dom 𝑆
8382a1i 11 . . . . 5 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → dom (𝑍 ↾ dom 𝑆) ⊆ dom 𝑆)
843nosupdm 27768 . . . . . . . . . . 11 (¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → dom 𝑆 = {𝑔 ∣ ∃𝑝𝐴 (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))})
8584eqabrd 2903 . . . . . . . . . 10 (¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → (𝑔 ∈ dom 𝑆 ↔ ∃𝑝𝐴 (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))))
8685adantr 484 . . . . . . . . 9 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝑔 ∈ dom 𝑆 ↔ ∃𝑝𝐴 (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))))
87 simprl 780 . . . . . . . . . . . . . 14 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑝𝐴)
88 simplrr 787 . . . . . . . . . . . . . 14 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ∀𝑎𝐴 𝑎 <s 𝑍)
89 breq1 5103 . . . . . . . . . . . . . . 15 (𝑎 = 𝑝 → (𝑎 <s 𝑍𝑝 <s 𝑍))
9089rspcv 3577 . . . . . . . . . . . . . 14 (𝑝𝐴 → (∀𝑎𝐴 𝑎 <s 𝑍𝑝 <s 𝑍))
9187, 88, 90sylc 65 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑝 <s 𝑍)
92 simprl1 1232 . . . . . . . . . . . . . . . 16 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → 𝐴 No )
9392adantr 484 . . . . . . . . . . . . . . 15 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝐴 No )
9493, 87sseldd 3937 . . . . . . . . . . . . . 14 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑝 No )
9573adantr 484 . . . . . . . . . . . . . 14 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑍 No )
96 ltsso 27740 . . . . . . . . . . . . . . 15 <s Or No
97 soasym 5588 . . . . . . . . . . . . . . 15 (( <s Or No ∧ (𝑝 No 𝑍 No )) → (𝑝 <s 𝑍 → ¬ 𝑍 <s 𝑝))
9896, 97mpan 700 . . . . . . . . . . . . . 14 ((𝑝 No 𝑍 No ) → (𝑝 <s 𝑍 → ¬ 𝑍 <s 𝑝))
9994, 95, 98syl2anc 593 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → (𝑝 <s 𝑍 → ¬ 𝑍 <s 𝑝))
10091, 99mpd 15 . . . . . . . . . . . 12 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ¬ 𝑍 <s 𝑝)
101 nodmon 27714 . . . . . . . . . . . . . . . 16 (𝑝 No → dom 𝑝 ∈ On)
10294, 101syl 17 . . . . . . . . . . . . . . 15 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → dom 𝑝 ∈ On)
103 simprrl 790 . . . . . . . . . . . . . . 15 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑔 ∈ dom 𝑝)
104 onelon 6371 . . . . . . . . . . . . . . 15 ((dom 𝑝 ∈ On ∧ 𝑔 ∈ dom 𝑝) → 𝑔 ∈ On)
105102, 103, 104syl2anc 593 . . . . . . . . . . . . . 14 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑔 ∈ On)
106 onsucb 7797 . . . . . . . . . . . . . 14 (𝑔 ∈ On ↔ suc 𝑔 ∈ On)
107105, 106sylib 220 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → suc 𝑔 ∈ On)
108 ltsres 27726 . . . . . . . . . . . . 13 ((𝑍 No 𝑝 No ∧ suc 𝑔 ∈ On) → ((𝑍 ↾ suc 𝑔) <s (𝑝 ↾ suc 𝑔) → 𝑍 <s 𝑝))
10995, 94, 107, 108syl3anc 1390 . . . . . . . . . . . 12 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ((𝑍 ↾ suc 𝑔) <s (𝑝 ↾ suc 𝑔) → 𝑍 <s 𝑝))
110100, 109mtod 200 . . . . . . . . . . 11 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ¬ (𝑍 ↾ suc 𝑔) <s (𝑝 ↾ suc 𝑔))
111 simpll 776 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
112 simprl2 1233 . . . . . . . . . . . . . . 15 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → 𝐴 ∈ V)
11392, 112jca 519 . . . . . . . . . . . . . 14 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝐴 No 𝐴 ∈ V))
114113adantr 484 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → (𝐴 No 𝐴 ∈ V))
115 simprrr 791 . . . . . . . . . . . . . 14 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))
116 breq1 5103 . . . . . . . . . . . . . . . . 17 (𝑣 = 𝑞 → (𝑣 <s 𝑝𝑞 <s 𝑝))
117116notbid 320 . . . . . . . . . . . . . . . 16 (𝑣 = 𝑞 → (¬ 𝑣 <s 𝑝 ↔ ¬ 𝑞 <s 𝑝))
118 reseq1 5959 . . . . . . . . . . . . . . . . 17 (𝑣 = 𝑞 → (𝑣 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))
119118eqeq2d 2773 . . . . . . . . . . . . . . . 16 (𝑣 = 𝑞 → ((𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔) ↔ (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))
120117, 119imbi12d 346 . . . . . . . . . . . . . . 15 (𝑣 = 𝑞 → ((¬ 𝑣 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ↔ (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))
121120cbvralvw 3240 . . . . . . . . . . . . . 14 (∀𝑣𝐴𝑣 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ↔ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))
122115, 121sylibr 236 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ∀𝑣𝐴𝑣 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)))
1233nosupres 27771 . . . . . . . . . . . . 13 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 No 𝐴 ∈ V) ∧ (𝑝𝐴𝑔 ∈ dom 𝑝 ∧ ∀𝑣𝐴𝑣 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)))) → (𝑆 ↾ suc 𝑔) = (𝑝 ↾ suc 𝑔))
124111, 114, 87, 103, 122, 123syl113anc 1401 . . . . . . . . . . . 12 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → (𝑆 ↾ suc 𝑔) = (𝑝 ↾ suc 𝑔))
125124breq2d 5112 . . . . . . . . . . 11 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ((𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔) ↔ (𝑍 ↾ suc 𝑔) <s (𝑝 ↾ suc 𝑔)))
126110, 125mtbird 327 . . . . . . . . . 10 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ (𝑝𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ¬ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔))
127126rexlimdvaa 3164 . . . . . . . . 9 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (∃𝑝𝐴 (𝑔 ∈ dom 𝑝 ∧ ∀𝑞𝐴𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))) → ¬ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔)))
12886, 127sylbid 242 . . . . . . . 8 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝑔 ∈ dom 𝑆 → ¬ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔)))
129128imp 410 . . . . . . 7 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → ¬ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔))
13068adantr 484 . . . . . . . . . . 11 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → 𝑆 No )
131 nodmord 27717 . . . . . . . . . . 11 (𝑆 No → Ord dom 𝑆)
132130, 131syl 17 . . . . . . . . . 10 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → Ord dom 𝑆)
133 simpr 488 . . . . . . . . . 10 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → 𝑔 ∈ dom 𝑆)
134 ordsucss 7798 . . . . . . . . . 10 (Ord dom 𝑆 → (𝑔 ∈ dom 𝑆 → suc 𝑔 ⊆ dom 𝑆))
135132, 133, 134sylc 65 . . . . . . . . 9 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → suc 𝑔 ⊆ dom 𝑆)
136135resabs1d 5994 . . . . . . . 8 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → ((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) = (𝑍 ↾ suc 𝑔))
137135resabs1d 5994 . . . . . . . 8 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔) = (𝑆 ↾ suc 𝑔))
138136, 137breq12d 5113 . . . . . . 7 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → (((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) <s ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔) ↔ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔)))
139129, 138mtbird 327 . . . . . 6 (((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → ¬ ((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) <s ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔))
140139ralrimiva 3154 . . . . 5 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ∀𝑔 ∈ dom 𝑆 ¬ ((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) <s ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔))
141 noresle 27761 . . . . 5 ((((𝑆 ↾ dom 𝑆) ∈ No ∧ (𝑍 ↾ dom 𝑆) ∈ No ) ∧ (dom (𝑆 ↾ dom 𝑆) ⊆ dom 𝑆 ∧ dom (𝑍 ↾ dom 𝑆) ⊆ dom 𝑆 ∧ ∀𝑔 ∈ dom 𝑆 ¬ ((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) <s ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔))) → ¬ (𝑍 ↾ dom 𝑆) <s (𝑆 ↾ dom 𝑆))
14272, 75, 79, 83, 140, 141syl23anc 1396 . . . 4 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ dom 𝑆) <s (𝑆 ↾ dom 𝑆))
143 nofun 27713 . . . . . 6 (𝑆 No → Fun 𝑆)
144 funrel 6538 . . . . . 6 (Fun 𝑆 → Rel 𝑆)
145 resdm 6012 . . . . . 6 (Rel 𝑆 → (𝑆 ↾ dom 𝑆) = 𝑆)
14668, 143, 144, 1454syl 19 . . . . 5 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → (𝑆 ↾ dom 𝑆) = 𝑆)
147146breq2d 5112 . . . 4 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ((𝑍 ↾ dom 𝑆) <s (𝑆 ↾ dom 𝑆) ↔ (𝑍 ↾ dom 𝑆) <s 𝑆))
148142, 147mtbid 326 . . 3 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
14965, 148pm2.61ian 821 . 2 (((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ∀𝑎𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
150 simpll1 1226 . . . . . 6 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → 𝐴 No )
151 simpll2 1227 . . . . . 6 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → 𝐴 ∈ V)
152 simpr 488 . . . . . 6 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → 𝑎𝐴)
1533nosupbnd1 27778 . . . . . 6 ((𝐴 No 𝐴 ∈ V ∧ 𝑎𝐴) → (𝑎 ↾ dom 𝑆) <s 𝑆)
154150, 151, 152, 153syl3anc 1390 . . . . 5 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → (𝑎 ↾ dom 𝑆) <s 𝑆)
155 simplr 778 . . . . 5 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
156 simpl1 1205 . . . . . . . 8 (((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → 𝐴 No )
157156sselda 3936 . . . . . . 7 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → 𝑎 No )
158150, 151, 66syl2anc 593 . . . . . . . 8 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → 𝑆 No )
159158, 69syl 17 . . . . . . 7 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → dom 𝑆 ∈ On)
160 noreson 27724 . . . . . . 7 ((𝑎 No ∧ dom 𝑆 ∈ On) → (𝑎 ↾ dom 𝑆) ∈ No )
161157, 159, 160syl2anc 593 . . . . . 6 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → (𝑎 ↾ dom 𝑆) ∈ No )
162 simpll3 1228 . . . . . . 7 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → 𝑍 No )
163162, 159, 74syl2anc 593 . . . . . 6 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → (𝑍 ↾ dom 𝑆) ∈ No )
164 sotr3 5596 . . . . . . 7 (( <s Or No ∧ ((𝑎 ↾ dom 𝑆) ∈ No 𝑆 No ∧ (𝑍 ↾ dom 𝑆) ∈ No )) → (((𝑎 ↾ dom 𝑆) <s 𝑆 ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → (𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆)))
16596, 164mpan 700 . . . . . 6 (((𝑎 ↾ dom 𝑆) ∈ No 𝑆 No ∧ (𝑍 ↾ dom 𝑆) ∈ No ) → (((𝑎 ↾ dom 𝑆) <s 𝑆 ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → (𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆)))
166161, 158, 163, 165syl3anc 1390 . . . . 5 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → (((𝑎 ↾ dom 𝑆) <s 𝑆 ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → (𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆)))
167154, 155, 166mp2and 709 . . . 4 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → (𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆))
168 ltsres 27726 . . . . 5 ((𝑎 No 𝑍 No ∧ dom 𝑆 ∈ On) → ((𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆) → 𝑎 <s 𝑍))
169157, 162, 159, 168syl3anc 1390 . . . 4 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → ((𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆) → 𝑎 <s 𝑍))
170167, 169mpd 15 . . 3 ((((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎𝐴) → 𝑎 <s 𝑍)
171170ralrimiva 3154 . 2 (((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → ∀𝑎𝐴 𝑎 <s 𝑍)
172149, 171impbida 810 1 ((𝐴 No 𝐴 ∈ V ∧ 𝑍 No ) → (∀𝑎𝐴 𝑎 <s 𝑍 ↔ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 399  w3a 1098   = wceq 1560  wcel 2142  {cab 2740  wral 3076  wrex 3086  ∃!wreu 3365  ∃*wrmo 3366  Vcvv 3454  cun 3902  cin 3903  wss 3904  ifcif 4480  {csn 4582  cop 4588   class class class wbr 5100  cmpt 5181   Or wor 5554  dom cdm 5647  cres 5649  Rel wrel 5652  Ord word 6345  Oncon0 6346  suc csuc 6348  cio 6475  Fun wfun 6515  cfv 6521  crio 7352  2oc2o 8431   No csur 27704   <s clts 27705
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-int 4906  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-ord 6349  df-on 6350  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-riota 7353  df-1o 8437  df-2o 8438  df-no 27707  df-lts 27708  df-bday 27709
This theorem is referenced by:  nosupinfsep  27796  noetasuplem4  27800
  Copyright terms: Public domain W3C validator