Theorem noinfbnd1lem3 27645

Description: Lemma for noinfbnd1 27649. If 𝑈 is a prolongment of 𝑇 and in 𝐵, then (𝑈‘dom 𝑇) is not 1_o. (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.

Step	Hyp	Ref	Expression
1		noinfbnd1.1	. . . . . 6 ⊢ 𝑇 = if(∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥, ((℩𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥) ∪ {⟨dom (℩𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥), 1o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢 ∈ 𝐵 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐵 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥∃𝑢 ∈ 𝐵 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐵 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢‘𝑔) = 𝑥))))
2	1	noinfno 27638	. . . . 5 ⊢ ((𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) → 𝑇 ∈ No )
3	2	3ad2ant2 1132	. . . 4 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → 𝑇 ∈ No )
4		nodmord 27573	. . . 4 ⊢ (𝑇 ∈ No → Ord dom 𝑇)
5		ordirr 6381	. . . 4 ⊢ (Ord dom 𝑇 → ¬ dom 𝑇 ∈ dom 𝑇)
6	3, 4, 5	3syl 18	. . 3 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → ¬ dom 𝑇 ∈ dom 𝑇)
7		simpl3l 1226	. . . . 5 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝑈 ∈ 𝐵)
8		ndmfv 6926	. . . . . . . 8 ⊢ (¬ dom 𝑇 ∈ dom 𝑈 → (𝑈‘dom 𝑇) = ∅)
9		1n0 8502	. . . . . . . . . . 11 ⊢ 1o ≠ ∅
10	9	necomi 2990	. . . . . . . . . 10 ⊢ ∅ ≠ 1o
11		neeq1 2998	. . . . . . . . . 10 ⊢ ((𝑈‘dom 𝑇) = ∅ → ((𝑈‘dom 𝑇) ≠ 1o ↔ ∅ ≠ 1o))
12	10, 11	mpbiri 258	. . . . . . . . 9 ⊢ ((𝑈‘dom 𝑇) = ∅ → (𝑈‘dom 𝑇) ≠ 1o)
13	12	neneqd 2940	. . . . . . . 8 ⊢ ((𝑈‘dom 𝑇) = ∅ → ¬ (𝑈‘dom 𝑇) = 1o)
14	8, 13	syl 17	. . . . . . 7 ⊢ (¬ dom 𝑇 ∈ dom 𝑈 → ¬ (𝑈‘dom 𝑇) = 1o)
15	14	con4i 114	. . . . . 6 ⊢ ((𝑈‘dom 𝑇) = 1o → dom 𝑇 ∈ dom 𝑈)
16	15	adantl 481	. . . . 5 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → dom 𝑇 ∈ dom 𝑈)
17		simpl2l 1224	. . . . . . . . . 10 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝐵 ⊆ No )
18	17, 7	sseldd 3979	. . . . . . . . 9 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝑈 ∈ No )
19	18	adantr 480	. . . . . . . 8 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝑈 ∈ No )
20	17	adantr 480	. . . . . . . . 9 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝐵 ⊆ No )
21		simprl 770	. . . . . . . . 9 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝑞 ∈ 𝐵)
22	20, 21	sseldd 3979	. . . . . . . 8 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝑞 ∈ No )
23	3	adantr 480	. . . . . . . . . 10 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝑇 ∈ No )
24		nodmon 27570	. . . . . . . . . 10 ⊢ (𝑇 ∈ No → dom 𝑇 ∈ On)
25	23, 24	syl 17	. . . . . . . . 9 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → dom 𝑇 ∈ On)
26	25	adantr 480	. . . . . . . 8 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → dom 𝑇 ∈ On)
27		simpl3r 1227	. . . . . . . . . 10 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → (𝑈 ↾ dom 𝑇) = 𝑇)
28	27	adantr 480	. . . . . . . . 9 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑈 ↾ dom 𝑇) = 𝑇)
29		simpll1 1210	. . . . . . . . . 10 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → ¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥)
30		simpll2 1211	. . . . . . . . . 10 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉))
31		simpll3 1212	. . . . . . . . . 10 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇))
32		simpr 484	. . . . . . . . . 10 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞))
33	1	noinfbnd1lem2 27644	. . . . . . . . . 10 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ ((𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞))) → (𝑞 ↾ dom 𝑇) = 𝑇)
34	29, 30, 31, 32, 33	syl112anc 1372	. . . . . . . . 9 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑞 ↾ dom 𝑇) = 𝑇)
35	28, 34	eqtr4d 2770	. . . . . . . 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 27594	. . . . . . . 8 ⊢ (((𝑈 ∈ No ∧ 𝑞 ∈ No ∧ dom 𝑇 ∈ On) ∧ ((𝑈 ↾ dom 𝑇) = (𝑞 ↾ dom 𝑇) ∧ (𝑈‘dom 𝑇) = 1o) ∧ ¬ 𝑈 <s 𝑞) → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))
39	19, 22, 26, 35, 36, 37, 38	syl321anc 1390	. . . . . . 7 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))
40	39	expr 456	. . . . . 6 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ 𝑞 ∈ 𝐵) → (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
41	40	ralrimiva 3141	. . . . 5 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → ∀𝑞 ∈ 𝐵 (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
42		dmeq 5900	. . . . . . . 8 ⊢ (𝑝 = 𝑈 → dom 𝑝 = dom 𝑈)
43	42	eleq2d 2814	. . . . . . 7 ⊢ (𝑝 = 𝑈 → (dom 𝑇 ∈ dom 𝑝 ↔ dom 𝑇 ∈ dom 𝑈))
44		breq1 5145	. . . . . . . . . 10 ⊢ (𝑝 = 𝑈 → (𝑝 <s 𝑞 ↔ 𝑈 <s 𝑞))
45	44	notbid 318	. . . . . . . . 9 ⊢ (𝑝 = 𝑈 → (¬ 𝑝 <s 𝑞 ↔ ¬ 𝑈 <s 𝑞))
46		reseq1 5973	. . . . . . . . . 10 ⊢ (𝑝 = 𝑈 → (𝑝 ↾ suc dom 𝑇) = (𝑈 ↾ suc dom 𝑇))
47	46	eqeq1d 2729	. . . . . . . . 9 ⊢ (𝑝 = 𝑈 → ((𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇) ↔ (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
48	45, 47	imbi12d 344	. . . . . . . 8 ⊢ (𝑝 = 𝑈 → ((¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)) ↔ (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
49	48	ralbidv 3172	. . . . . . 7 ⊢ (𝑝 = 𝑈 → (∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)) ↔ ∀𝑞 ∈ 𝐵 (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
50	43, 49	anbi12d 630	. . . . . 6 ⊢ (𝑝 = 𝑈 → ((dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))) ↔ (dom 𝑇 ∈ dom 𝑈 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
51	50	rspcev 3607	. . . . 5 ⊢ ((𝑈 ∈ 𝐵 ∧ (dom 𝑇 ∈ dom 𝑈 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))) → ∃𝑝 ∈ 𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
52	7, 16, 41, 51	syl12anc 836	. . . 4 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → ∃𝑝 ∈ 𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
53	1	noinfdm 27639	. . . . . . . 8 ⊢ (¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 → dom 𝑇 = {𝑧 ∣ ∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))})
54	53	eleq2d 2814	. . . . . . 7 ⊢ (¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 → (dom 𝑇 ∈ dom 𝑇 ↔ dom 𝑇 ∈ {𝑧 ∣ ∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))}))
55	54	3ad2ant1 1131	. . . . . 6 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (dom 𝑇 ∈ dom 𝑇 ↔ dom 𝑇 ∈ {𝑧 ∣ ∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))}))
56		eleq1 2816	. . . . . . . . . 10 ⊢ (𝑧 = dom 𝑇 → (𝑧 ∈ dom 𝑝 ↔ dom 𝑇 ∈ dom 𝑝))
57		suceq 6429	. . . . . . . . . . . . . 14 ⊢ (𝑧 = dom 𝑇 → suc 𝑧 = suc dom 𝑇)
58	57	reseq2d 5979	. . . . . . . . . . . . 13 ⊢ (𝑧 = dom 𝑇 → (𝑝 ↾ suc 𝑧) = (𝑝 ↾ suc dom 𝑇))
59	57	reseq2d 5979	. . . . . . . . . . . . 13 ⊢ (𝑧 = dom 𝑇 → (𝑞 ↾ suc 𝑧) = (𝑞 ↾ suc dom 𝑇))
60	58, 59	eqeq12d 2743	. . . . . . . . . . . 12 ⊢ (𝑧 = dom 𝑇 → ((𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧) ↔ (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
61	60	imbi2d 340	. . . . . . . . . . 11 ⊢ (𝑧 = dom 𝑇 → ((¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)) ↔ (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
62	61	ralbidv 3172	. . . . . . . . . 10 ⊢ (𝑧 = dom 𝑇 → (∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)) ↔ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
63	56, 62	anbi12d 630	. . . . . . . . 9 ⊢ (𝑧 = dom 𝑇 → ((𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧))) ↔ (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
64	63	rexbidv 3173	. . . . . . . 8 ⊢ (𝑧 = dom 𝑇 → (∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧))) ↔ ∃𝑝 ∈ 𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
65	64	elabg 3663	. . . . . . 7 ⊢ (dom 𝑇 ∈ On → (dom 𝑇 ∈ {𝑧 ∣ ∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))} ↔ ∃𝑝 ∈ 𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
66	3, 24, 65	3syl 18	. . . . . 6 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (dom 𝑇 ∈ {𝑧 ∣ ∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))} ↔ ∃𝑝 ∈ 𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
67	55, 66	bitrd 279	. . . . 5 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (dom 𝑇 ∈ dom 𝑇 ↔ ∃𝑝 ∈ 𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
68	67	adantr 480	. . . 4 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → (dom 𝑇 ∈ dom 𝑇 ↔ ∃𝑝 ∈ 𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
69	52, 68	mpbird 257	. . 3 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → dom 𝑇 ∈ dom 𝑇)
70	6, 69	mtand 815	. 2 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → ¬ (𝑈‘dom 𝑇) = 1o)
71	70	neqned 2942	1 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (𝑈‘dom 𝑇) ≠ 1o)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 395   ∧ w3a 1085   = wceq 1534   ∈ wcel 2099  {cab 2704   ≠ wne 2935  ∀wral 3056  ∃wrex 3065   ∪ cun 3942   ⊆ wss 3944  ∅c0 4318  ifcif 4524  {csn 4624  ⟨cop 4630   class class class wbr 5142   ↦ cmpt 5225  dom cdm 5672   ↾ cres 5674  Ord word 6362  Oncon0 6363  suc csuc 6365  ℩cio 6492  ‘cfv 6542  ℩crio 7369  1_oc1o 8473   No csur 27560   <s cslt 27561

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2164  ax-ext 2698  ax-rep 5279  ax-sep 5293  ax-nul 5300  ax-pr 5423  ax-un 7734

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3or 1086  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2705  df-cleq 2719  df-clel 2805  df-nfc 2880  df-ne 2936  df-ral 3057  df-rex 3066  df-rmo 3371  df-reu 3372  df-rab 3428  df-v 3471  df-sbc 3775  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-pss 3963  df-nul 4319  df-if 4525  df-pw 4600  df-sn 4625  df-pr 4627  df-tp 4629  df-op 4631  df-uni 4904  df-int 4945  df-iun 4993  df-br 5143  df-opab 5205  df-mpt 5226  df-tr 5260  df-id 5570  df-eprel 5576  df-po 5584  df-so 5585  df-fr 5627  df-we 5629  df-xp 5678  df-rel 5679  df-cnv 5680  df-co 5681  df-dm 5682  df-rn 5683  df-res 5684  df-ima 5685  df-ord 6366  df-on 6367  df-suc 6369  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-riota 7370  df-1o 8480  df-2o 8481  df-no 27563  df-slt 27564  df-bday 27565

This theorem is referenced by:  noinfbnd1lem4  27646  noinfbnd1lem5  27647  noinfbnd1lem6  27648