Theorem noinfbnd1lem3 27635

Description: Lemma for noinfbnd1 27639. 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 27628	. . . . 5 ⊢ ((𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) → 𝑇 ∈ No )
3	2	3ad2ant2 1134	. . . 4 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → 𝑇 ∈ No )
4		nodmord 27563	. . . 4 ⊢ (𝑇 ∈ No → Ord dom 𝑇)
5		ordirr 6325	. . . 4 ⊢ (Ord dom 𝑇 → ¬ dom 𝑇 ∈ dom 𝑇)
6	3, 4, 5	3syl 18	. . 3 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → ¬ dom 𝑇 ∈ dom 𝑇)
7		simpl3l 1229	. . . . 5 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝑈 ∈ 𝐵)
8		ndmfv 6855	. . . . . . . 8 ⊢ (¬ dom 𝑇 ∈ dom 𝑈 → (𝑈‘dom 𝑇) = ∅)
9		1n0 8406	. . . . . . . . . . 11 ⊢ 1o ≠ ∅
10	9	necomi 2979	. . . . . . . . . 10 ⊢ ∅ ≠ 1o
11		neeq1 2987	. . . . . . . . . 10 ⊢ ((𝑈‘dom 𝑇) = ∅ → ((𝑈‘dom 𝑇) ≠ 1o ↔ ∅ ≠ 1o))
12	10, 11	mpbiri 258	. . . . . . . . 9 ⊢ ((𝑈‘dom 𝑇) = ∅ → (𝑈‘dom 𝑇) ≠ 1o)
13	12	neneqd 2930	. . . . . . . 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 1227	. . . . . . . . . 10 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝐵 ⊆ No )
18	17, 7	sseldd 3936	. . . . . . . . 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 3936	. . . . . . . 8 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → 𝑞 ∈ No )
23	3	adantr 480	. . . . . . . . . 10 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → 𝑇 ∈ No )
24		nodmon 27560	. . . . . . . . . 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 1230	. . . . . . . . . 10 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → (𝑈 ↾ dom 𝑇) = 𝑇)
28	27	adantr 480	. . . . . . . . 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 484	. . . . . . . . . 10 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞))
33	1	noinfbnd1lem2 27634	. . . . . . . . . 10 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ ((𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞))) → (𝑞 ↾ dom 𝑇) = 𝑇)
34	29, 30, 31, 32, 33	syl112anc 1376	. . . . . . . . 9 ⊢ ((((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) ∧ (𝑞 ∈ 𝐵 ∧ ¬ 𝑈 <s 𝑞)) → (𝑞 ↾ dom 𝑇) = 𝑇)
35	28, 34	eqtr4d 2767	. . . . . . . 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 27584	. . . . . . . 8 ⊢ (((𝑈 ∈ No ∧ 𝑞 ∈ No ∧ dom 𝑇 ∈ On) ∧ ((𝑈 ↾ dom 𝑇) = (𝑞 ↾ dom 𝑇) ∧ (𝑈‘dom 𝑇) = 1o) ∧ ¬ 𝑈 <s 𝑞) → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))
39	19, 22, 26, 35, 36, 37, 38	syl321anc 1394	. . . . . . 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 3121	. . . . 5 ⊢ (((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) ∧ (𝑈‘dom 𝑇) = 1o) → ∀𝑞 ∈ 𝐵 (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))
42		dmeq 5846	. . . . . . . 8 ⊢ (𝑝 = 𝑈 → dom 𝑝 = dom 𝑈)
43	42	eleq2d 2814	. . . . . . 7 ⊢ (𝑝 = 𝑈 → (dom 𝑇 ∈ dom 𝑝 ↔ dom 𝑇 ∈ dom 𝑈))
44		breq1 5095	. . . . . . . . . 10 ⊢ (𝑝 = 𝑈 → (𝑝 <s 𝑞 ↔ 𝑈 <s 𝑞))
45	44	notbid 318	. . . . . . . . 9 ⊢ (𝑝 = 𝑈 → (¬ 𝑝 <s 𝑞 ↔ ¬ 𝑈 <s 𝑞))
46		reseq1 5924	. . . . . . . . . 10 ⊢ (𝑝 = 𝑈 → (𝑝 ↾ suc dom 𝑇) = (𝑈 ↾ suc dom 𝑇))
47	46	eqeq1d 2731	. . . . . . . . 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 3152	. . . . . . 7 ⊢ (𝑝 = 𝑈 → (∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)) ↔ ∀𝑞 ∈ 𝐵 (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
50	43, 49	anbi12d 632	. . . . . 6 ⊢ (𝑝 = 𝑈 → ((dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))) ↔ (dom 𝑇 ∈ dom 𝑈 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑈 <s 𝑞 → (𝑈 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
51	50	rspcev 3577	. . . . 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 27629	. . . . . . . 8 ⊢ (¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 → dom 𝑇 = {𝑧 ∣ ∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))})
54	53	eleq2d 2814	. . . . . . 7 ⊢ (¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 → (dom 𝑇 ∈ dom 𝑇 ↔ dom 𝑇 ∈ {𝑧 ∣ ∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))}))
55	54	3ad2ant1 1133	. . . . . 6 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (dom 𝑇 ∈ dom 𝑇 ↔ dom 𝑇 ∈ {𝑧 ∣ ∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)))}))
56		eleq1 2816	. . . . . . . . . 10 ⊢ (𝑧 = dom 𝑇 → (𝑧 ∈ dom 𝑝 ↔ dom 𝑇 ∈ dom 𝑝))
57		suceq 6375	. . . . . . . . . . . . . 14 ⊢ (𝑧 = dom 𝑇 → suc 𝑧 = suc dom 𝑇)
58	57	reseq2d 5930	. . . . . . . . . . . . 13 ⊢ (𝑧 = dom 𝑇 → (𝑝 ↾ suc 𝑧) = (𝑝 ↾ suc dom 𝑇))
59	57	reseq2d 5930	. . . . . . . . . . . . 13 ⊢ (𝑧 = dom 𝑇 → (𝑞 ↾ suc 𝑧) = (𝑞 ↾ suc dom 𝑇))
60	58, 59	eqeq12d 2745	. . . . . . . . . . . 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 3152	. . . . . . . . . 10 ⊢ (𝑧 = dom 𝑇 → (∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧)) ↔ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇))))
63	56, 62	anbi12d 632	. . . . . . . . 9 ⊢ (𝑧 = dom 𝑇 → ((𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧))) ↔ (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
64	63	rexbidv 3153	. . . . . . . 8 ⊢ (𝑧 = dom 𝑇 → (∃𝑝 ∈ 𝐵 (𝑧 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc 𝑧) = (𝑞 ↾ suc 𝑧))) ↔ ∃𝑝 ∈ 𝐵 (dom 𝑇 ∈ dom 𝑝 ∧ ∀𝑞 ∈ 𝐵 (¬ 𝑝 <s 𝑞 → (𝑝 ↾ suc dom 𝑇) = (𝑞 ↾ suc dom 𝑇)))))
65	64	elabg 3632	. . . . . . 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 2932	1 ⊢ ((¬ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦 <s 𝑥 ∧ (𝐵 ⊆ No ∧ 𝐵 ∈ 𝑉) ∧ (𝑈 ∈ 𝐵 ∧ (𝑈 ↾ dom 𝑇) = 𝑇)) → (𝑈‘dom 𝑇) ≠ 1o)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1540   ∈ wcel 2109  {cab 2707   ≠ wne 2925  ∀wral 3044  ∃wrex 3053   ∪ cun 3901   ⊆ wss 3903  ∅c0 4284  ifcif 4476  {csn 4577  ⟨cop 4583   class class class wbr 5092   ↦ cmpt 5173  dom cdm 5619   ↾ cres 5621  Ord word 6306  Oncon0 6307  suc csuc 6309  ℩cio 6436  ‘cfv 6482  ℩crio 7305  1_oc1o 8381   No csur 27549   <s cslt 27550

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5218  ax-sep 5235  ax-nul 5245  ax-pow 5304  ax-pr 5371  ax-un 7671

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-rmo 3343  df-reu 3344  df-rab 3395  df-v 3438  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4285  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-tp 4582  df-op 4584  df-uni 4859  df-int 4897  df-br 5093  df-opab 5155  df-mpt 5174  df-tr 5200  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-ord 6310  df-on 6311  df-suc 6313  df-iota 6438  df-fun 6484  df-fn 6485  df-f 6486  df-fo 6488  df-fv 6490  df-riota 7306  df-1o 8388  df-2o 8389  df-no 27552  df-slt 27553  df-bday 27554

This theorem is referenced by:  noinfbnd1lem4  27636  noinfbnd1lem5  27637  noinfbnd1lem6  27638