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

Theorem noinfbnd1lem1 27853
Description: Lemma for noinfbnd1 27859. Establish a soft lower bound. (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
noinfbnd1lem1 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → ¬ (𝑈 ↾ dom 𝑇) <s 𝑇)
Distinct variable groups:   𝐵,𝑔,𝑢,𝑣,𝑥,𝑦   𝑣,𝑈   𝑔,𝑉
Allowed substitution hints:   𝑇(𝑥,𝑦,𝑣,𝑢,𝑔)   𝑈(𝑥,𝑦,𝑢,𝑔)   𝑉(𝑥,𝑦,𝑣,𝑢)

Proof of Theorem noinfbnd1lem1
Dummy variables 𝑝 𝑞 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 noinfbnd1.1 . . . 4 𝑇 = if(∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥, ((𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥) ∪ {⟨dom (𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥), 1o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐵 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐵 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
21noinfno 27848 . . 3 ((𝐵 No 𝐵𝑉) → 𝑇 No )
323ad2ant2 1150 . 2 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → 𝑇 No )
4 simp2l 1216 . . . 4 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → 𝐵 No )
5 simp3 1154 . . . 4 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → 𝑈𝐵)
64, 5sseldd 3944 . . 3 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → 𝑈 No )
7 nodmon 27780 . . . 4 (𝑇 No → dom 𝑇 ∈ On)
83, 7syl 18 . . 3 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → dom 𝑇 ∈ On)
9 noreson 27790 . . 3 ((𝑈 No ∧ dom 𝑇 ∈ On) → (𝑈 ↾ dom 𝑇) ∈ No )
106, 8, 9syl2anc 595 . 2 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → (𝑈 ↾ dom 𝑇) ∈ No )
11 ssidd 3966 . 2 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → dom 𝑇 ⊆ dom 𝑇)
12 dmres 6012 . . . 4 dom (𝑈 ↾ dom 𝑇) = (dom 𝑇 ∩ dom 𝑈)
13 inss1 4195 . . . 4 (dom 𝑇 ∩ dom 𝑈) ⊆ dom 𝑇
1412, 13eqsstri 3989 . . 3 dom (𝑈 ↾ dom 𝑇) ⊆ dom 𝑇
1514a1i 11 . 2 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → dom (𝑈 ↾ dom 𝑇) ⊆ dom 𝑇)
16 nodmord 27783 . . . . . . . 8 (𝑇 No → Ord dom 𝑇)
173, 16syl 18 . . . . . . 7 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → Ord dom 𝑇)
18 ordsucss 7814 . . . . . . 7 (Ord dom 𝑇 → ( ∈ dom 𝑇 → suc ⊆ dom 𝑇))
1917, 18syl 18 . . . . . 6 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → ( ∈ dom 𝑇 → suc ⊆ dom 𝑇))
2019imp 411 . . . . 5 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ ∈ dom 𝑇) → suc ⊆ dom 𝑇)
2120resabs1d 6008 . . . 4 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ ∈ dom 𝑇) → ((𝑈 ↾ dom 𝑇) ↾ suc ) = (𝑈 ↾ suc ))
221noinfdm 27849 . . . . . . . . 9 (¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 → dom 𝑇 = { ∣ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc )))})
2322eleq2d 2855 . . . . . . . 8 (¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 → ( ∈ dom 𝑇 ∈ { ∣ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc )))}))
24 abid 2751 . . . . . . . . 9 ( ∈ { ∣ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc )))} ↔ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc ))))
25 breq2 5115 . . . . . . . . . . . . . 14 (𝑞 = 𝑣 → (𝑝 <s 𝑞𝑝 <s 𝑣))
2625notbid 321 . . . . . . . . . . . . 13 (𝑞 = 𝑣 → (¬ 𝑝 <s 𝑞 ↔ ¬ 𝑝 <s 𝑣))
27 reseq1 5973 . . . . . . . . . . . . . 14 (𝑞 = 𝑣 → (𝑞 ↾ suc ) = (𝑣 ↾ suc ))
2827eqeq2d 2780 . . . . . . . . . . . . 13 (𝑞 = 𝑣 → ((𝑝 ↾ suc ) = (𝑞 ↾ suc ) ↔ (𝑝 ↾ suc ) = (𝑣 ↾ suc )))
2926, 28imbi12d 347 . . . . . . . . . . . 12 (𝑞 = 𝑣 → ((¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc )) ↔ (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))
3029cbvralvw 3249 . . . . . . . . . . 11 (∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc )) ↔ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc )))
3130anbi2i 634 . . . . . . . . . 10 (( ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc ))) ↔ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))
3231rexbii 3118 . . . . . . . . 9 (∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc ))) ↔ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))
3324, 32bitri 278 . . . . . . . 8 ( ∈ { ∣ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑞𝐵𝑝 <s 𝑞 → (𝑝 ↾ suc ) = (𝑞 ↾ suc )))} ↔ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))
3423, 33bitrdi 290 . . . . . . 7 (¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 → ( ∈ dom 𝑇 ↔ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc )))))
35343ad2ant1 1149 . . . . . 6 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → ( ∈ dom 𝑇 ↔ ∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc )))))
36 simpl2l 1243 . . . . . . . . . . . 12 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → 𝐵 No )
37 simprl 782 . . . . . . . . . . . 12 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → 𝑝𝐵)
3836, 37sseldd 3944 . . . . . . . . . . 11 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → 𝑝 No )
396adantr 485 . . . . . . . . . . 11 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → 𝑈 No )
40 ltsso 27806 . . . . . . . . . . . 12 <s Or No
41 soasym 5603 . . . . . . . . . . . 12 (( <s Or No ∧ (𝑝 No 𝑈 No )) → (𝑝 <s 𝑈 → ¬ 𝑈 <s 𝑝))
4240, 41mpan 702 . . . . . . . . . . 11 ((𝑝 No 𝑈 No ) → (𝑝 <s 𝑈 → ¬ 𝑈 <s 𝑝))
4338, 39, 42syl2anc 595 . . . . . . . . . 10 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → (𝑝 <s 𝑈 → ¬ 𝑈 <s 𝑝))
44 nodmon 27780 . . . . . . . . . . . . . 14 (𝑝 No → dom 𝑝 ∈ On)
4538, 44syl 18 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → dom 𝑝 ∈ On)
46 simprrl 792 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ∈ dom 𝑝)
47 onelon 6386 . . . . . . . . . . . . 13 ((dom 𝑝 ∈ On ∧ ∈ dom 𝑝) → ∈ On)
4845, 46, 47syl2anc 595 . . . . . . . . . . . 12 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ∈ On)
49 onsucb 7813 . . . . . . . . . . . 12 ( ∈ On ↔ suc ∈ On)
5048, 49sylib 221 . . . . . . . . . . 11 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → suc ∈ On)
51 ltsres 27792 . . . . . . . . . . 11 ((𝑈 No 𝑝 No ∧ suc ∈ On) → ((𝑈 ↾ suc ) <s (𝑝 ↾ suc ) → 𝑈 <s 𝑝))
5239, 38, 50, 51syl3anc 1396 . . . . . . . . . 10 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ((𝑈 ↾ suc ) <s (𝑝 ↾ suc ) → 𝑈 <s 𝑝))
5343, 52nsyld 157 . . . . . . . . 9 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → (𝑝 <s 𝑈 → ¬ (𝑈 ↾ suc ) <s (𝑝 ↾ suc )))
54 noreson 27790 . . . . . . . . . . . . . 14 ((𝑈 No ∧ suc ∈ On) → (𝑈 ↾ suc ) ∈ No )
5539, 50, 54syl2anc 595 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → (𝑈 ↾ suc ) ∈ No )
56 sonr 5594 . . . . . . . . . . . . . 14 (( <s Or No ∧ (𝑈 ↾ suc ) ∈ No ) → ¬ (𝑈 ↾ suc ) <s (𝑈 ↾ suc ))
5740, 56mpan 702 . . . . . . . . . . . . 13 ((𝑈 ↾ suc ) ∈ No → ¬ (𝑈 ↾ suc ) <s (𝑈 ↾ suc ))
5855, 57syl 18 . . . . . . . . . . . 12 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ¬ (𝑈 ↾ suc ) <s (𝑈 ↾ suc ))
5958adantr 485 . . . . . . . . . . 11 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) ∧ ¬ 𝑝 <s 𝑈) → ¬ (𝑈 ↾ suc ) <s (𝑈 ↾ suc ))
60 breq2 5115 . . . . . . . . . . . . . . . 16 (𝑣 = 𝑈 → (𝑝 <s 𝑣𝑝 <s 𝑈))
6160notbid 321 . . . . . . . . . . . . . . 15 (𝑣 = 𝑈 → (¬ 𝑝 <s 𝑣 ↔ ¬ 𝑝 <s 𝑈))
62 reseq1 5973 . . . . . . . . . . . . . . . 16 (𝑣 = 𝑈 → (𝑣 ↾ suc ) = (𝑈 ↾ suc ))
6362eqeq2d 2780 . . . . . . . . . . . . . . 15 (𝑣 = 𝑈 → ((𝑝 ↾ suc ) = (𝑣 ↾ suc ) ↔ (𝑝 ↾ suc ) = (𝑈 ↾ suc )))
6461, 63imbi12d 347 . . . . . . . . . . . . . 14 (𝑣 = 𝑈 → ((¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc )) ↔ (¬ 𝑝 <s 𝑈 → (𝑝 ↾ suc ) = (𝑈 ↾ suc ))))
65 simprrr 793 . . . . . . . . . . . . . 14 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc )))
66 simpl3 1210 . . . . . . . . . . . . . 14 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → 𝑈𝐵)
6764, 65, 66rspcdva 3589 . . . . . . . . . . . . 13 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → (¬ 𝑝 <s 𝑈 → (𝑝 ↾ suc ) = (𝑈 ↾ suc )))
6867imp 411 . . . . . . . . . . . 12 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) ∧ ¬ 𝑝 <s 𝑈) → (𝑝 ↾ suc ) = (𝑈 ↾ suc ))
6968breq2d 5123 . . . . . . . . . . 11 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) ∧ ¬ 𝑝 <s 𝑈) → ((𝑈 ↾ suc ) <s (𝑝 ↾ suc ) ↔ (𝑈 ↾ suc ) <s (𝑈 ↾ suc )))
7059, 69mtbird 328 . . . . . . . . . 10 ((((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) ∧ ¬ 𝑝 <s 𝑈) → ¬ (𝑈 ↾ suc ) <s (𝑝 ↾ suc ))
7170ex 417 . . . . . . . . 9 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → (¬ 𝑝 <s 𝑈 → ¬ (𝑈 ↾ suc ) <s (𝑝 ↾ suc )))
7253, 71pm2.61d 181 . . . . . . . 8 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ¬ (𝑈 ↾ suc ) <s (𝑝 ↾ suc ))
73 simpl1 1208 . . . . . . . . . 10 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥)
74 simpl2 1209 . . . . . . . . . 10 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → (𝐵 No 𝐵𝑉))
751noinfres 27852 . . . . . . . . . 10 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ (𝑝𝐵 ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc )))) → (𝑇 ↾ suc ) = (𝑝 ↾ suc ))
7673, 74, 37, 46, 65, 75syl113anc 1407 . . . . . . . . 9 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → (𝑇 ↾ suc ) = (𝑝 ↾ suc ))
7776breq2d 5123 . . . . . . . 8 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ((𝑈 ↾ suc ) <s (𝑇 ↾ suc ) ↔ (𝑈 ↾ suc ) <s (𝑝 ↾ suc )))
7872, 77mtbird 328 . . . . . . 7 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ (𝑝𝐵 ∧ ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))))) → ¬ (𝑈 ↾ suc ) <s (𝑇 ↾ suc ))
7978rexlimdvaa 3173 . . . . . 6 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → (∃𝑝𝐵 ( ∈ dom 𝑝 ∧ ∀𝑣𝐵𝑝 <s 𝑣 → (𝑝 ↾ suc ) = (𝑣 ↾ suc ))) → ¬ (𝑈 ↾ suc ) <s (𝑇 ↾ suc )))
8035, 79sylbid 243 . . . . 5 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → ( ∈ dom 𝑇 → ¬ (𝑈 ↾ suc ) <s (𝑇 ↾ suc )))
8180imp 411 . . . 4 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ ∈ dom 𝑇) → ¬ (𝑈 ↾ suc ) <s (𝑇 ↾ suc ))
8221, 81eqnbrtrd 5131 . . 3 (((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) ∧ ∈ dom 𝑇) → ¬ ((𝑈 ↾ dom 𝑇) ↾ suc ) <s (𝑇 ↾ suc ))
8382ralrimiva 3163 . 2 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → ∀ ∈ dom 𝑇 ¬ ((𝑈 ↾ dom 𝑇) ↾ suc ) <s (𝑇 ↾ suc ))
84 noresle 27827 . 2 (((𝑇 No ∧ (𝑈 ↾ dom 𝑇) ∈ No ) ∧ (dom 𝑇 ⊆ dom 𝑇 ∧ dom (𝑈 ↾ dom 𝑇) ⊆ dom 𝑇 ∧ ∀ ∈ dom 𝑇 ¬ ((𝑈 ↾ dom 𝑇) ↾ suc ) <s (𝑇 ↾ suc ))) → ¬ (𝑈 ↾ dom 𝑇) <s 𝑇)
853, 10, 11, 15, 83, 84syl23anc 1402 1 ((¬ ∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 No 𝐵𝑉) ∧ 𝑈𝐵) → ¬ (𝑈 ↾ dom 𝑇) <s 𝑇)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1101   = wceq 1567  wcel 2149  {cab 2747  wral 3085  wrex 3095  cun 3909  cin 3910  wss 3911  ifcif 4490  {csn 4592  cop 4598   class class class wbr 5111  cmpt 5194   Or wor 5569  dom cdm 5662  cres 5664  Ord word 6360  Oncon0 6361  suc csuc 6363  cio 6491  cfv 6537  crio 7367  1oc1o 8446   No csur 27770   <s clts 27771
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rmo 3375  df-reu 3376  df-rab 3423  df-v 3463  df-sbc 3752  df-csb 3860  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3931  df-nul 4293  df-if 4491  df-pw 4567  df-sn 4593  df-pr 4595  df-tp 4597  df-op 4599  df-uni 4875  df-int 4915  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-ord 6364  df-on 6365  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-fo 6543  df-fv 6545  df-riota 7368  df-1o 8453  df-2o 8454  df-no 27773  df-lts 27774  df-bday 27775
This theorem is referenced by:  noinfbnd1lem2  27854  noinfbnd1lem6  27858
  Copyright terms: Public domain W3C validator