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

Theorem noinfbnd1lem3 27089
Description: Lemma for noinfbnd1 27093. If 𝑈 is a prolongment of 𝑇 and in 𝐵, then (𝑈‘dom 𝑇) is not 1o. (Contributed by Scott Fenton, 9-Aug-2024.)
Hypothesis
Ref Expression
noinfbnd1.1 𝑇 = if(∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥, ((𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥) ∪ {⟨dom (𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥), 1o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐵 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐵 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
Assertion
Ref Expression
noinfbnd1lem3 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (𝑈‘dom 𝑇) ≠ 1o)
Distinct variable groups:   𝐵,𝑔,𝑢,𝑣,𝑥,𝑦   𝑣,𝑈   𝑥,𝑢,𝑦   𝑔,𝑉   𝑥,𝑣,𝑦
Allowed substitution hints:   𝑇(𝑥,𝑦,𝑣,𝑢,𝑔)   𝑈(𝑥,𝑦,𝑢,𝑔)   𝑉(𝑥,𝑦,𝑣,𝑢)

Proof of Theorem noinfbnd1lem3
Dummy variables 𝑝 𝑞 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 noinfbnd1.1 . . . . . 6 𝑇 = if(∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥, ((𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥) ∪ {⟨dom (𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥), 1o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐵 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐵 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
21noinfno 27082 . . . . 5 ((𝐵 No 𝐵𝑉) → 𝑇 No )
323ad2ant2 1135 . . . 4 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → 𝑇 No )
4 nodmord 27017 . . . 4 (𝑇 No → Ord dom 𝑇)
5 ordirr 6340 . . . 4 (Ord dom 𝑇 → ¬ dom 𝑇 ∈ dom 𝑇)
63, 4, 53syl 18 . . 3 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → ¬ dom 𝑇 ∈ dom 𝑇)
7 simpl3l 1229 . . . . 5 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝑈𝐵)
8 ndmfv 6882 . . . . . . . 8 (¬ dom 𝑇 ∈ dom 𝑈 → (𝑈‘dom 𝑇) = ∅)
9 1n0 8439 . . . . . . . . . . 11 1o ≠ ∅
109necomi 2999 . . . . . . . . . 10 ∅ ≠ 1o
11 neeq1 3007 . . . . . . . . . 10 ((𝑈‘dom 𝑇) = ∅ → ((𝑈‘dom 𝑇) ≠ 1o ↔ ∅ ≠ 1o))
1210, 11mpbiri 258 . . . . . . . . 9 ((𝑈‘dom 𝑇) = ∅ → (𝑈‘dom 𝑇) ≠ 1o)
1312neneqd 2949 . . . . . . . 8 ((𝑈‘dom 𝑇) = ∅ → ¬ (𝑈‘dom 𝑇) = 1o)
148, 13syl 17 . . . . . . 7 (¬ dom 𝑇 ∈ dom 𝑈 → ¬ (𝑈‘dom 𝑇) = 1o)
1514con4i 114 . . . . . 6 ((𝑈‘dom 𝑇) = 1o → dom 𝑇 ∈ dom 𝑈)
1615adantl 483 . . . . 5 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → dom 𝑇 ∈ dom 𝑈)
17 simpl2l 1227 . . . . . . . . . 10 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝐵 No )
1817, 7sseldd 3950 . . . . . . . . 9 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝑈 No )
1918adantr 482 . . . . . . . 8 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝑈 No )
2017adantr 482 . . . . . . . . 9 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝐵 No )
21 simprl 770 . . . . . . . . 9 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝑞𝐵)
2220, 21sseldd 3950 . . . . . . . 8 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝑞 No )
233adantr 482 . . . . . . . . . 10 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝑇 No )
24 nodmon 27014 . . . . . . . . . 10 (𝑇 No → dom 𝑇 ∈ On)
2523, 24syl 17 . . . . . . . . 9 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → dom 𝑇 ∈ On)
2625adantr 482 . . . . . . . 8 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → dom 𝑇 ∈ On)
27 simpl3r 1230 . . . . . . . . . 10 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → (𝑈 ↾ dom 𝑇) = 𝑇)
2827adantr 482 . . . . . . . . 9 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑈 ↾ dom 𝑇) = 𝑇)
29 simpll1 1213 . . . . . . . . . 10 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → ¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥)
30 simpll2 1214 . . . . . . . . . 10 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝐵 No 𝐵𝑉))
31 simpll3 1215 . . . . . . . . . 10 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇))
32 simpr 486 . . . . . . . . . 10 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞))
331noinfbnd1lem2 27088 . . . . . . . . . 10 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ ((𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞))) → (𝑞 ↾ dom 𝑇) = 𝑇)
3429, 30, 31, 32, 33syl112anc 1375 . . . . . . . . 9 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑞 ↾ dom 𝑇) = 𝑇)
3528, 34eqtr4d 2780 . . . . . . . 8 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑈 ↾ dom 𝑇) = (𝑞 ↾ dom 𝑇))
36 simplr 768 . . . . . . . 8 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑈‘dom 𝑇) = 1o)
37 simprr 772 . . . . . . . 8 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → ¬ 𝑈 <s 𝑞)
38 nogesgn1ores 27038 . . . . . . . 8 (((𝑈 No 𝑞 No ∧ dom 𝑇 ∈ On) ∧ ((𝑈 ↾ dom 𝑇) = (𝑞 ↾ dom 𝑇) ∧ (𝑈‘dom 𝑇) = 1o) ∧ ¬ 𝑈 <s 𝑞) → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))
3919, 22, 26, 35, 36, 37, 38syl321anc 1393 . . . . . . 7 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))
4039expr 458 . . . . . 6 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ 𝑞𝐵) → (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
4140ralrimiva 3144 . . . . 5 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → ∀𝑞𝐵𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
42 dmeq 5864 . . . . . . . 8 (𝑝 = 𝑈 → dom 𝑝 = dom 𝑈)
4342eleq2d 2824 . . . . . . 7 (𝑝 = 𝑈 → (dom 𝑇 ∈ dom 𝑝 ↔ dom 𝑇 ∈ dom 𝑈))
44 breq1 5113 . . . . . . . . . 10 (𝑝 = 𝑈 → (𝑝 <s 𝑞𝑈 <s 𝑞))
4544notbid 318 . . . . . . . . 9 (𝑝 = 𝑈 → (¬ 𝑝 <s 𝑞 ↔ ¬ 𝑈 <s 𝑞))
46 reseq1 5936 . . . . . . . . . 10 (𝑝 = 𝑈 → (𝑝 ↾ suc dom 𝑇) = (𝑈 ↾ suc dom 𝑇))
4746eqeq1d 2739 . . . . . . . . 9 (𝑝 = 𝑈 → ((𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇) ↔ (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
4845, 47imbi12d 345 . . . . . . . 8 (𝑝 = 𝑈 → ((¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)) ↔ (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
4948ralbidv 3175 . . . . . . 7 (𝑝 = 𝑈 → (∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)) ↔ ∀𝑞𝐵𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
5043, 49anbi12d 632 . . . . . 6 (𝑝 = 𝑈 → ((dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))) ↔ (dom 𝑇 ∈ dom 𝑈 ∧ ∀𝑞𝐵𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
5150rspcev 3584 . . . . 5 ((𝑈𝐵 ∧ (dom 𝑇 ∈ dom 𝑈 ∧ ∀𝑞𝐵𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))) → ∃𝑝𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
527, 16, 41, 51syl12anc 836 . . . 4 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → ∃𝑝𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
531noinfdm 27083 . . . . . . . 8 (¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 → dom 𝑇 = {𝑧 ∣ ∃𝑝𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))})
5453eleq2d 2824 . . . . . . 7 (¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 → (dom 𝑇 ∈ dom 𝑇 ↔ dom 𝑇 ∈ {𝑧 ∣ ∃𝑝𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))}))
55543ad2ant1 1134 . . . . . 6 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (dom 𝑇 ∈ dom 𝑇 ↔ dom 𝑇 ∈ {𝑧 ∣ ∃𝑝𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))}))
56 eleq1 2826 . . . . . . . . . 10 (𝑧 = dom 𝑇 → (𝑧 ∈ dom 𝑝 ↔ dom 𝑇 ∈ dom 𝑝))
57 suceq 6388 . . . . . . . . . . . . . 14 (𝑧 = dom 𝑇 → suc 𝑧 = suc dom 𝑇)
5857reseq2d 5942 . . . . . . . . . . . . 13 (𝑧 = dom 𝑇 → (𝑝 ↾ suc 𝑧) = (𝑝 ↾ suc dom 𝑇))
5957reseq2d 5942 . . . . . . . . . . . . 13 (𝑧 = dom 𝑇 → (𝑞 ↾ suc 𝑧) = (𝑞 ↾ suc dom 𝑇))
6058, 59eqeq12d 2753 . . . . . . . . . . . 12 (𝑧 = dom 𝑇 → ((𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧) ↔ (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
6160imbi2d 341 . . . . . . . . . . 11 (𝑧 = dom 𝑇 → ((¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)) ↔ (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
6261ralbidv 3175 . . . . . . . . . 10 (𝑧 = dom 𝑇 → (∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)) ↔ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
6356, 62anbi12d 632 . . . . . . . . 9 (𝑧 = dom 𝑇 → ((𝑧 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧))) ↔ (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
6463rexbidv 3176 . . . . . . . 8 (𝑧 = dom 𝑇 → (∃𝑝𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧))) ↔ ∃𝑝𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
6564elabg 3633 . . . . . . 7 (dom 𝑇 ∈ On → (dom 𝑇 ∈ {𝑧 ∣ ∃𝑝𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))} ↔ ∃𝑝𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
663, 24, 653syl 18 . . . . . 6 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (dom 𝑇 ∈ {𝑧 ∣ ∃𝑝𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))} ↔ ∃𝑝𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
6755, 66bitrd 279 . . . . 5 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (dom 𝑇 ∈ dom 𝑇 ↔ ∃𝑝𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
6867adantr 482 . . . 4 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → (dom 𝑇 ∈ dom 𝑇 ↔ ∃𝑝𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
6952, 68mpbird 257 . . 3 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → dom 𝑇 ∈ dom 𝑇)
706, 69mtand 815 . 2 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → ¬ (𝑈‘dom 𝑇) = 1o)
7170neqned 2951 1 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑈𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (𝑈‘dom 𝑇) ≠ 1o)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397  w3a 1088   = wceq 1542  wcel 2107  {cab 2714  wne 2944  wral 3065  wrex 3074  cun 3913  wss 3915  c0 4287  ifcif 4491  {csn 4591  cop 4597   class class class wbr 5110  cmpt 5193  dom cdm 5638  cres 5640  Ord word 6321  Oncon0 6322  suc csuc 6324  cio 6451  cfv 6501  crio 7317  1oc1o 8410   No csur 27004   <s cslt 27005
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2708  ax-rep 5247  ax-sep 5261  ax-nul 5268  ax-pr 5389  ax-un 7677
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2890  df-ne 2945  df-ral 3066  df-rex 3075  df-rmo 3356  df-reu 3357  df-rab 3411  df-v 3450  df-sbc 3745  df-csb 3861  df-dif 3918  df-un 3920  df-in 3922  df-ss 3932  df-pss 3934  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4871  df-int 4913  df-iun 4961  df-br 5111  df-opab 5173  df-mpt 5194  df-tr 5228  df-id 5536  df-eprel 5542  df-po 5550  df-so 5551  df-fr 5593  df-we 5595  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-ord 6325  df-on 6326  df-suc 6328  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-riota 7318  df-1o 8417  df-2o 8418  df-no 27007  df-slt 27008  df-bday 27009
This theorem is referenced by:  noinfbnd1lem4  27090  noinfbnd1lem5  27091  noinfbnd1lem6  27092
  Copyright terms: Public domain W3C validator