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

Theorem nosupbnd2 28073
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 1947 . . . . . 6 Ⅎ𝑥((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)
2 nfcv 2923 . . . . . . . . 9 Ⅎ𝑥𝑍
3 nosupbnd2.1 . . . . . . . . . . 11 𝑆 = if(∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦, ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢 ∈ 𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥∃𝑢 ∈ 𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢‘𝑔) = 𝑥))))
4 nfre1 3288 . . . . . . . . . . . 12 Ⅎ𝑥∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦
5 nfriota1 7384 . . . . . . . . . . . . 13 Ⅎ𝑥(℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
65nfdm 5933 . . . . . . . . . . . . . . 15 Ⅎ𝑥dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
7 nfcv 2923 . . . . . . . . . . . . . . 15 Ⅎ𝑥2o
86, 7nfop 4849 . . . . . . . . . . . . . 14 Ⅎ𝑥⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩
98nfsn 4668 . . . . . . . . . . . . 13 Ⅎ𝑥{⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}
105, 9nfun 4117 . . . . . . . . . . . 12 Ⅎ𝑥((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})
11 nfcv 2923 . . . . . . . . . . . . 13 Ⅎ𝑥{𝑦 ∣ ∃𝑢 ∈ 𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))}
12 nfiota1 6496 . . . . . . . . . . . . 13 Ⅎ𝑥(℩𝑥∃𝑢 ∈ 𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢‘𝑔) = 𝑥))
1311, 12nfmpt 5203 . . . . . . . . . . . 12 Ⅎ𝑥(𝑔 ∈ {𝑦 ∣ ∃𝑢 ∈ 𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥∃𝑢 ∈ 𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢‘𝑔) = 𝑥)))
144, 10, 13nfif 4513 . . . . . . . . . . 11 Ⅎ𝑥if(∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦, ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢 ∈ 𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥∃𝑢 ∈ 𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢‘𝑔) = 𝑥))))
153, 14nfcxfr 2921 . . . . . . . . . 10 Ⅎ𝑥𝑆
1615nfdm 5933 . . . . . . . . 9 Ⅎ𝑥dom 𝑆
172, 16nfres 5972 . . . . . . . 8 Ⅎ𝑥(𝑍 ↾ dom 𝑆)
18 nfcv 2923 . . . . . . . 8 Ⅎ𝑥 <s
1917, 18, 15nfbr 5152 . . . . . . 7 Ⅎ𝑥(𝑍 ↾ dom 𝑆) <s 𝑆
2019nfn 1890 . . . . . 6 Ⅎ𝑥 ¬ (𝑍 ↾ dom 𝑆) <s 𝑆
211, 20nfim 1929 . . . . 5 Ⅎ𝑥(((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
22 simpl 488 . . . . . . . . 9 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦))
23 rspe 3253 . . . . . . . . . . . 12 ((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) → ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
2423adantr 486 . . . . . . . . . . 11 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
25 nomaxmo 28055 . . . . . . . . . . . . 13 (𝐴 ⊆ No → ∃*𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
26253ad2ant1 1151 . . . . . . . . . . . 12 ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) → ∃*𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
2726ad2antrl 741 . . . . . . . . . . 11 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ∃*𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
28 reu5 3368 . . . . . . . . . . 11 (∃!𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ↔ (∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ∃*𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦))
2924, 27, 28sylanbrc 595 . . . . . . . . . 10 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ∃!𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
30 riota1 7398 . . . . . . . . . 10 (∃!𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 → ((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ↔ (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥))
3129, 30syl 18 . . . . . . . . 9 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ↔ (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥))
3222, 31mpbid 235 . . . . . . . 8 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥)
33 nosupbnd2lem1 28072 . . . . . . . . . 10 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ suc dom 𝑥) <s (𝑥 ∪ {⟨dom 𝑥, 2o⟩}))
34333expb 1138 . . . . . . . . 9 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ suc dom 𝑥) <s (𝑥 ∪ {⟨dom 𝑥, 2o⟩}))
35 dmeq 5885 . . . . . . . . . . . . 13 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = dom 𝑥)
3635suceqd 6430 . . . . . . . . . . . 12 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = suc dom 𝑥)
3736reseq2d 5970 . . . . . . . . . . 11 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → (𝑍 ↾ suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)) = (𝑍 ↾ suc dom 𝑥))
38 id 23 . . . . . . . . . . . 12 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥)
3935opeq1d 4839 . . . . . . . . . . . . 13 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → ⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩ = ⟨dom 𝑥, 2o⟩)
4039sneqd 4596 . . . . . . . . . . . 12 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩} = {⟨dom 𝑥, 2o⟩})
4138, 40uneq12d 4116 . . . . . . . . . . 11 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = (𝑥 ∪ {⟨dom 𝑥, 2o⟩}))
4237, 41breq12d 5116 . . . . . . . . . 10 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → ((𝑍 ↾ suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)) <s ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) ↔ (𝑍 ↾ suc dom 𝑥) <s (𝑥 ∪ {⟨dom 𝑥, 2o⟩})))
4342notbid 321 . . . . . . . . 9 ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → (¬ (𝑍 ↾ suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)) <s ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) ↔ ¬ (𝑍 ↾ suc dom 𝑥) <s (𝑥 ∪ {⟨dom 𝑥, 2o⟩})))
4434, 43syl5ibrcom 250 . . . . . . . 8 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = 𝑥 → ¬ (𝑍 ↾ suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)) <s ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})))
4532, 44mpd 16 . . . . . . 7 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)) <s ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
46 iftrue 4488 . . . . . . . . . . . . . 14 (∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 → if(∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦, ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢 ∈ 𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥∃𝑢 ∈ 𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢‘𝑔) = 𝑥)))) = ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
473, 46eqtrid 2808 . . . . . . . . . . . . 13 (∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 → 𝑆 = ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
4823, 47syl 18 . . . . . . . . . . . 12 ((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) → 𝑆 = ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
4948dmeqd 5887 . . . . . . . . . . 11 ((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) → dom 𝑆 = dom ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
50 2on 8490 . . . . . . . . . . . . . . 15 2o ∈ On
5150elexi 3473 . . . . . . . . . . . . . 14 2o ∈ V
5251dmsnop 6217 . . . . . . . . . . . . 13 dom {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩} = {dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)}
5352uneq2i 4112 . . . . . . . . . . . 12 (dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ dom {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = (dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)})
54 dmun 5892 . . . . . . . . . . . 12 dom ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = (dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ dom {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})
55 df-suc 6368 . . . . . . . . . . . 12 suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) = (dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)})
5653, 54, 553eqtr4i 2794 . . . . . . . . . . 11 dom ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
5749, 56eqtrdi 2812 . . . . . . . . . 10 ((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) → dom 𝑆 = suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦))
5857reseq2d 5970 . . . . . . . . 9 ((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) → (𝑍 ↾ dom 𝑆) = (𝑍 ↾ suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)))
5958adantr 486 . . . . . . . 8 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (𝑍 ↾ dom 𝑆) = (𝑍 ↾ suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)))
6048adantr 486 . . . . . . . 8 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → 𝑆 = ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
6159, 60breq12d 5116 . . . . . . 7 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ((𝑍 ↾ dom 𝑆) <s 𝑆 ↔ (𝑍 ↾ suc dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)) <s ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})))
6245, 61mtbird 328 . . . . . 6 (((𝑥 ∈ 𝐴 ∧ ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
6362exp31 425 . . . . 5 (𝑥 ∈ 𝐴 → (∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 → (((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)))
6421, 63rexlimi 3263 . . . 4 (∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 → (((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆))
6564imp 412 . . 3 ((∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
663nosupno 28060 . . . . . . . 8 ((𝐴 ⊆ No ∧ 𝐴 ∈ V) → 𝑆 ∈ No)
67663adant3 1150 . . . . . . 7 ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) → 𝑆 ∈ No)
6867ad2antrl 741 . . . . . 6 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → 𝑆 ∈ No)
69 nodmon 28007 . . . . . . 7 (𝑆 ∈ No → dom 𝑆 ∈ On)
7068, 69syl 18 . . . . . 6 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → dom 𝑆 ∈ On)
71 noreson 28017 . . . . . 6 ((𝑆 ∈ No ∧ dom 𝑆 ∈ On) → (𝑆 ↾ dom 𝑆) ∈ No)
7268, 70, 71syl2anc 596 . . . . 5 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (𝑆 ↾ dom 𝑆) ∈ No)
73 simprl3 1239 . . . . . 6 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → 𝑍 ∈ No)
74 noreson 28017 . . . . . 6 ((𝑍 ∈ No ∧ dom 𝑆 ∈ On) → (𝑍 ↾ dom 𝑆) ∈ No)
7573, 70, 74syl2anc 596 . . . . 5 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (𝑍 ↾ dom 𝑆) ∈ No)
76 dmres 6003 . . . . . . 7 dom (𝑆 ↾ dom 𝑆) = (dom 𝑆 ∩ dom 𝑆)
77 inss2 4183 . . . . . . 7 (dom 𝑆 ∩ dom 𝑆) ⊆ dom 𝑆
7876, 77eqsstri 3977 . . . . . 6 dom (𝑆 ↾ dom 𝑆) ⊆ dom 𝑆
7978a1i 11 . . . . 5 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → dom (𝑆 ↾ dom 𝑆) ⊆ dom 𝑆)
80 dmres 6003 . . . . . . 7 dom (𝑍 ↾ dom 𝑆) = (dom 𝑆 ∩ dom 𝑍)
81 inss1 4182 . . . . . . 7 (dom 𝑆 ∩ dom 𝑍) ⊆ dom 𝑆
8280, 81eqsstri 3977 . . . . . 6 dom (𝑍 ↾ dom 𝑆) ⊆ dom 𝑆
8382a1i 11 . . . . 5 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → dom (𝑍 ↾ dom 𝑆) ⊆ dom 𝑆)
843nosupdm 28061 . . . . . . . . . . 11 (¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 → dom 𝑆 = {𝑔 ∣ ∃𝑝 ∈ 𝐴 (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))})
8584eqabrd 2902 . . . . . . . . . 10 (¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 → (𝑔 ∈ dom 𝑆 ↔ ∃𝑝 ∈ 𝐴 (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))))
8685adantr 486 . . . . . . . . 9 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (𝑔 ∈ dom 𝑆 ↔ ∃𝑝 ∈ 𝐴 (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))))
87 simprl 783 . . . . . . . . . . . . . 14 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑝 ∈ 𝐴)
88 simplrr 790 . . . . . . . . . . . . . 14 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)
89 breq1 5106 . . . . . . . . . . . . . . 15 (𝑎 = 𝑝 → (𝑎 <s 𝑍 ↔ 𝑝 <s 𝑍))
9089rspcv 3573 . . . . . . . . . . . . . 14 (𝑝 ∈ 𝐴 → (∀𝑎 ∈ 𝐴 𝑎 <s 𝑍 → 𝑝 <s 𝑍))
9187, 88, 90sylc 66 . . . . . . . . . . . . 13 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑝 <s 𝑍)
92 simprl1 1237 . . . . . . . . . . . . . . . 16 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → 𝐴 ⊆ No)
9392adantr 486 . . . . . . . . . . . . . . 15 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝐴 ⊆ No)
9493, 87sseldd 3932 . . . . . . . . . . . . . 14 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑝 ∈ No)
9573adantr 486 . . . . . . . . . . . . . 14 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑍 ∈ No)
96 ltsso 28033 . . . . . . . . . . . . . . 15 <s Or No
97 soasym 5592 . . . . . . . . . . . . . . 15 (( <s Or No ∧ (𝑝 ∈ No ∧ 𝑍 ∈ No)) → (𝑝 <s 𝑍 → ¬ 𝑍 <s 𝑝))
9896, 97mpan 703 . . . . . . . . . . . . . 14 ((𝑝 ∈ No ∧ 𝑍 ∈ No) → (𝑝 <s 𝑍 → ¬ 𝑍 <s 𝑝))
9994, 95, 98syl2anc 596 . . . . . . . . . . . . 13 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → (𝑝 <s 𝑍 → ¬ 𝑍 <s 𝑝))
10091, 99mpd 16 . . . . . . . . . . . 12 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ¬ 𝑍 <s 𝑝)
101 nodmon 28007 . . . . . . . . . . . . . . . 16 (𝑝 ∈ No → dom 𝑝 ∈ On)
10294, 101syl 18 . . . . . . . . . . . . . . 15 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → dom 𝑝 ∈ On)
103 simprrl 793 . . . . . . . . . . . . . . 15 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑔 ∈ dom 𝑝)
104 onelon 6387 . . . . . . . . . . . . . . 15 ((dom 𝑝 ∈ On ∧ 𝑔 ∈ dom 𝑝) → 𝑔 ∈ On)
105102, 103, 104syl2anc 596 . . . . . . . . . . . . . 14 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → 𝑔 ∈ On)
106 onsucb 7828 . . . . . . . . . . . . . 14 (𝑔 ∈ On ↔ suc 𝑔 ∈ On)
107105, 106sylib 221 . . . . . . . . . . . . 13 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → suc 𝑔 ∈ On)
108 ltsres 28019 . . . . . . . . . . . . 13 ((𝑍 ∈ No ∧ 𝑝 ∈ No ∧ suc 𝑔 ∈ On) → ((𝑍 ↾ suc 𝑔) <s (𝑝 ↾ suc 𝑔) → 𝑍 <s 𝑝))
10995, 94, 107, 108syl3anc 1398 . . . . . . . . . . . 12 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ((𝑍 ↾ suc 𝑔) <s (𝑝 ↾ suc 𝑔) → 𝑍 <s 𝑝))
110100, 109mtod 201 . . . . . . . . . . 11 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ¬ (𝑍 ↾ suc 𝑔) <s (𝑝 ↾ suc 𝑔))
111 simpll 779 . . . . . . . . . . . . 13 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
112 simprl2 1238 . . . . . . . . . . . . . . 15 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → 𝐴 ∈ V)
11392, 112jca 521 . . . . . . . . . . . . . 14 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (𝐴 ⊆ No ∧ 𝐴 ∈ V))
114113adantr 486 . . . . . . . . . . . . 13 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → (𝐴 ⊆ No ∧ 𝐴 ∈ V))
115 simprrr 794 . . . . . . . . . . . . . 14 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))
116 breq1 5106 . . . . . . . . . . . . . . . . 17 (𝑣 = 𝑞 → (𝑣 <s 𝑝 ↔ 𝑞 <s 𝑝))
117116notbid 321 . . . . . . . . . . . . . . . 16 (𝑣 = 𝑞 → (¬ 𝑣 <s 𝑝 ↔ ¬ 𝑞 <s 𝑝))
118 reseq1 5964 . . . . . . . . . . . . . . . . 17 (𝑣 = 𝑞 → (𝑣 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))
119118eqeq2d 2772 . . . . . . . . . . . . . . . 16 (𝑣 = 𝑞 → ((𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔) ↔ (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))
120117, 119imbi12d 347 . . . . . . . . . . . . . . 15 (𝑣 = 𝑞 → ((¬ 𝑣 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ↔ (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))
121120cbvralvw 3241 . . . . . . . . . . . . . 14 (∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ↔ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔)))
122115, 121sylibr 237 . . . . . . . . . . . . 13 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)))
1233nosupres 28064 . . . . . . . . . . . . 13 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ (𝑝 ∈ 𝐴 ∧ 𝑔 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)))) → (𝑆 ↾ suc 𝑔) = (𝑝 ↾ suc 𝑔))
124111, 114, 87, 103, 122, 123syl113anc 1409 . . . . . . . . . . . 12 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → (𝑆 ↾ suc 𝑔) = (𝑝 ↾ suc 𝑔))
125124breq2d 5115 . . . . . . . . . . 11 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ((𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔) ↔ (𝑍 ↾ suc 𝑔) <s (𝑝 ↾ suc 𝑔)))
126110, 125mtbird 328 . . . . . . . . . 10 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ (𝑝 ∈ 𝐴 ∧ (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))))) → ¬ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔))
127126rexlimdvaa 3165 . . . . . . . . 9 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (∃𝑝 ∈ 𝐴 (𝑔 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐴 (¬ 𝑞 <s 𝑝 → (𝑝 ↾ suc 𝑔) = (𝑞 ↾ suc 𝑔))) → ¬ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔)))
12886, 127sylbid 243 . . . . . . . 8 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (𝑔 ∈ dom 𝑆 → ¬ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔)))
129128imp 412 . . . . . . 7 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → ¬ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔))
13068adantr 486 . . . . . . . . . . 11 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → 𝑆 ∈ No)
131 nodmord 28010 . . . . . . . . . . 11 (𝑆 ∈ No → Ord dom 𝑆)
132130, 131syl 18 . . . . . . . . . 10 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → Ord dom 𝑆)
133 simpr 490 . . . . . . . . . 10 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → 𝑔 ∈ dom 𝑆)
134 ordsucss 7829 . . . . . . . . . 10 (Ord dom 𝑆 → (𝑔 ∈ dom 𝑆 → suc 𝑔 ⊆ dom 𝑆))
135132, 133, 134sylc 66 . . . . . . . . 9 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → suc 𝑔 ⊆ dom 𝑆)
136135resabs1d 5999 . . . . . . . 8 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → ((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) = (𝑍 ↾ suc 𝑔))
137135resabs1d 5999 . . . . . . . 8 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔) = (𝑆 ↾ suc 𝑔))
138136, 137breq12d 5116 . . . . . . 7 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → (((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) <s ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔) ↔ (𝑍 ↾ suc 𝑔) <s (𝑆 ↾ suc 𝑔)))
139129, 138mtbird 328 . . . . . 6 (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) ∧ 𝑔 ∈ dom 𝑆) → ¬ ((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) <s ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔))
140139ralrimiva 3155 . . . . 5 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ∀𝑔 ∈ dom 𝑆 ¬ ((𝑍 ↾ dom 𝑆) ↾ suc 𝑔) <s ((𝑆 ↾ dom 𝑆) ↾ suc 𝑔))
141 noresle 28054 . . . . 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 1404 . . . 4 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ dom 𝑆) <s (𝑆 ↾ dom 𝑆))
143 nofun 28006 . . . . . 6 (𝑆 ∈ No → Fun 𝑆)
144 funrel 6556 . . . . . 6 (Fun 𝑆 → Rel 𝑆)
145 resdm 6015 . . . . . 6 (Rel 𝑆 → (𝑆 ↾ dom 𝑆) = 𝑆)
14668, 143, 144, 1454syl 20 . . . . 5 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → (𝑆 ↾ dom 𝑆) = 𝑆)
147146breq2d 5115 . . . 4 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ((𝑍 ↾ dom 𝑆) <s (𝑆 ↾ dom 𝑆) ↔ (𝑍 ↾ dom 𝑆) <s 𝑆))
148142, 147mtbid 327 . . 3 ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
14965, 148pm2.61ian 824 . 2 (((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
150 simpll1 1231 . . . . . 6 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → 𝐴 ⊆ No)
151 simpll2 1232 . . . . . 6 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → 𝐴 ∈ V)
152 simpr 490 . . . . . 6 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → 𝑎 ∈ 𝐴)
1533nosupbnd1 28071 . . . . . 6 ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑎 ∈ 𝐴) → (𝑎 ↾ dom 𝑆) <s 𝑆)
154150, 151, 152, 153syl3anc 1398 . . . . 5 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → (𝑎 ↾ dom 𝑆) <s 𝑆)
155 simplr 781 . . . . 5 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → ¬ (𝑍 ↾ dom 𝑆) <s 𝑆)
156 simpl1 1210 . . . . . . . 8 (((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → 𝐴 ⊆ No)
157156sselda 3931 . . . . . . 7 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → 𝑎 ∈ No)
158150, 151, 66syl2anc 596 . . . . . . . 8 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → 𝑆 ∈ No)
159158, 69syl 18 . . . . . . 7 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → dom 𝑆 ∈ On)
160 noreson 28017 . . . . . . 7 ((𝑎 ∈ No ∧ dom 𝑆 ∈ On) → (𝑎 ↾ dom 𝑆) ∈ No)
161157, 159, 160syl2anc 596 . . . . . 6 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → (𝑎 ↾ dom 𝑆) ∈ No)
162 simpll3 1233 . . . . . . 7 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → 𝑍 ∈ No)
163162, 159, 74syl2anc 596 . . . . . 6 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → (𝑍 ↾ dom 𝑆) ∈ No)
164 sotr3 5600 . . . . . . 7 (( <s Or No ∧ ((𝑎 ↾ dom 𝑆) ∈ No ∧ 𝑆 ∈ No ∧ (𝑍 ↾ dom 𝑆) ∈ No)) → (((𝑎 ↾ dom 𝑆) <s 𝑆 ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → (𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆)))
16596, 164mpan 703 . . . . . 6 (((𝑎 ↾ dom 𝑆) ∈ No ∧ 𝑆 ∈ No ∧ (𝑍 ↾ dom 𝑆) ∈ No) → (((𝑎 ↾ dom 𝑆) <s 𝑆 ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → (𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆)))
166161, 158, 163, 165syl3anc 1398 . . . . 5 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → (((𝑎 ↾ dom 𝑆) <s 𝑆 ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → (𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆)))
167154, 155, 166mp2and 712 . . . 4 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → (𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆))
168 ltsres 28019 . . . . 5 ((𝑎 ∈ No ∧ 𝑍 ∈ No ∧ dom 𝑆 ∈ On) → ((𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆) → 𝑎 <s 𝑍))
169157, 162, 159, 168syl3anc 1398 . . . 4 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → ((𝑎 ↾ dom 𝑆) <s (𝑍 ↾ dom 𝑆) → 𝑎 <s 𝑍))
170167, 169mpd 16 . . 3 ((((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) ∧ 𝑎 ∈ 𝐴) → 𝑎 <s 𝑍)
171170ralrimiva 3155 . 2 (((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) ∧ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆) → ∀𝑎 ∈ 𝐴 𝑎 <s 𝑍)
172149, 171impbida 813 1 ((𝐴 ⊆ No ∧ 𝐴 ∈ V ∧ 𝑍 ∈ No) → (∀𝑎 ∈ 𝐴 𝑎 <s 𝑍 ↔ ¬ (𝑍 ↾ dom 𝑆) <s 𝑆))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145  {cab 2739  ∀wral 3077  ∃wrex 3087  ∃!wreu 3364  ∃*wrmo 3365  Vcvv 3451   ∪ cun 3897   ∩ cin 3898   ⊆ wss 3899  ifcif 4482  {csn 4584  ⟨cop 4590   class class class wbr 5103   ↦ cmpt 5186   Or wor 5558  dom cdm 5651   ↾ cres 5653  Rel wrel 5656  Ord word 6361  Oncon0 6362  suc csuc 6364  ℩cio 6492  Fun wfun 6532  ‘cfv 6538  ℩crio 7376  2oc2o 8470  Nocsur 27997   <s clts 27998
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7751
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-ord 6365  df-on 6366  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7377  df-1o 8476  df-2o 8477  df-no 28000  df-lts 28001  df-bday 28002
This theorem is used by:  nosupinfsep  28089  noetasuplem4  28093
  Copyright terms: Public domain W3C validator