Theorem noinfprefixmo 27673

Description: In any class of surreals, there is at most one value of the prefix property. (Contributed by Scott Fenton, 8-Aug-2024.)

Assertion

Ref	Expression
noinfprefixmo	⊢ (𝐴 ⊆ No → ∃*𝑥∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥))

Distinct variable groups:   𝑢,𝐴,𝑣,𝑥   𝑢,𝐺,𝑣,𝑥

Proof of Theorem noinfprefixmo

Dummy variables 𝑦 𝑝 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		reeanv 3209	. . . 4 ⊢ (∃𝑢 ∈ 𝐴 ∃𝑝 ∈ 𝐴 ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)) ↔ (∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ ∃𝑝 ∈ 𝐴 (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))
2		breq2 5103	. . . . . . . . . . . . 13 ⊢ (𝑣 = 𝑝 → (𝑢 <s 𝑣 ↔ 𝑢 <s 𝑝))
3	2	notbid 318	. . . . . . . . . . . 12 ⊢ (𝑣 = 𝑝 → (¬ 𝑢 <s 𝑣 ↔ ¬ 𝑢 <s 𝑝))
4		reseq1 5933	. . . . . . . . . . . . 13 ⊢ (𝑣 = 𝑝 → (𝑣 ↾ suc 𝐺) = (𝑝 ↾ suc 𝐺))
5	4	eqeq2d 2748	. . . . . . . . . . . 12 ⊢ (𝑣 = 𝑝 → ((𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺) ↔ (𝑢 ↾ suc 𝐺) = (𝑝 ↾ suc 𝐺)))
6	3, 5	imbi12d 344	. . . . . . . . . . 11 ⊢ (𝑣 = 𝑝 → ((¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ↔ (¬ 𝑢 <s 𝑝 → (𝑢 ↾ suc 𝐺) = (𝑝 ↾ suc 𝐺))))
7		simprl2 1221	. . . . . . . . . . . 12 ⊢ (((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦))) → ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)))
8	7	adantl 481	. . . . . . . . . . 11 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)))
9		simprlr 780	. . . . . . . . . . 11 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → 𝑝 ∈ 𝐴)
10	6, 8, 9	rspcdva 3578	. . . . . . . . . 10 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (¬ 𝑢 <s 𝑝 → (𝑢 ↾ suc 𝐺) = (𝑝 ↾ suc 𝐺)))
11		breq2 5103	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑢 → (𝑝 <s 𝑣 ↔ 𝑝 <s 𝑢))
12	11	notbid 318	. . . . . . . . . . . . 13 ⊢ (𝑣 = 𝑢 → (¬ 𝑝 <s 𝑣 ↔ ¬ 𝑝 <s 𝑢))
13		reseq1 5933	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑢 → (𝑣 ↾ suc 𝐺) = (𝑢 ↾ suc 𝐺))
14	13	eqeq2d 2748	. . . . . . . . . . . . 13 ⊢ (𝑣 = 𝑢 → ((𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺) ↔ (𝑝 ↾ suc 𝐺) = (𝑢 ↾ suc 𝐺)))
15	12, 14	imbi12d 344	. . . . . . . . . . . 12 ⊢ (𝑣 = 𝑢 → ((¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ↔ (¬ 𝑝 <s 𝑢 → (𝑝 ↾ suc 𝐺) = (𝑢 ↾ suc 𝐺))))
16		simprr2 1224	. . . . . . . . . . . . 13 ⊢ (((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦))) → ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)))
17	16	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)))
18		simprll 779	. . . . . . . . . . . 12 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → 𝑢 ∈ 𝐴)
19	15, 17, 18	rspcdva 3578	. . . . . . . . . . 11 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (¬ 𝑝 <s 𝑢 → (𝑝 ↾ suc 𝐺) = (𝑢 ↾ suc 𝐺)))
20		eqcom 2744	. . . . . . . . . . 11 ⊢ ((𝑝 ↾ suc 𝐺) = (𝑢 ↾ suc 𝐺) ↔ (𝑢 ↾ suc 𝐺) = (𝑝 ↾ suc 𝐺))
21	19, 20	imbitrdi 251	. . . . . . . . . 10 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (¬ 𝑝 <s 𝑢 → (𝑢 ↾ suc 𝐺) = (𝑝 ↾ suc 𝐺)))
22		simpl 482	. . . . . . . . . . . . 13 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → 𝐴 ⊆ No )
23	22, 18	sseldd 3935	. . . . . . . . . . . 12 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → 𝑢 ∈ No )
24	22, 9	sseldd 3935	. . . . . . . . . . . 12 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → 𝑝 ∈ No )
25		ltsso 27648	. . . . . . . . . . . . 13 ⊢ <s Or No
26		soasym 5566	. . . . . . . . . . . . 13 ⊢ (( <s Or No ∧ (𝑢 ∈ No ∧ 𝑝 ∈ No )) → (𝑢 <s 𝑝 → ¬ 𝑝 <s 𝑢))
27	25, 26	mpan 691	. . . . . . . . . . . 12 ⊢ ((𝑢 ∈ No ∧ 𝑝 ∈ No ) → (𝑢 <s 𝑝 → ¬ 𝑝 <s 𝑢))
28	23, 24, 27	syl2anc 585	. . . . . . . . . . 11 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (𝑢 <s 𝑝 → ¬ 𝑝 <s 𝑢))
29		imor 854	. . . . . . . . . . 11 ⊢ ((𝑢 <s 𝑝 → ¬ 𝑝 <s 𝑢) ↔ (¬ 𝑢 <s 𝑝 ∨ ¬ 𝑝 <s 𝑢))
30	28, 29	sylib 218	. . . . . . . . . 10 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (¬ 𝑢 <s 𝑝 ∨ ¬ 𝑝 <s 𝑢))
31	10, 21, 30	mpjaod 861	. . . . . . . . 9 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (𝑢 ↾ suc 𝐺) = (𝑝 ↾ suc 𝐺))
32	31	fveq1d 6837	. . . . . . . 8 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → ((𝑢 ↾ suc 𝐺)‘𝐺) = ((𝑝 ↾ suc 𝐺)‘𝐺))
33		simprl1 1220	. . . . . . . . . . 11 ⊢ (((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦))) → 𝐺 ∈ dom 𝑢)
34	33	adantl 481	. . . . . . . . . 10 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → 𝐺 ∈ dom 𝑢)
35		sucidg 6401	. . . . . . . . . 10 ⊢ (𝐺 ∈ dom 𝑢 → 𝐺 ∈ suc 𝐺)
36	34, 35	syl 17	. . . . . . . . 9 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → 𝐺 ∈ suc 𝐺)
37	36	fvresd 6855	. . . . . . . 8 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → ((𝑢 ↾ suc 𝐺)‘𝐺) = (𝑢‘𝐺))
38	36	fvresd 6855	. . . . . . . 8 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → ((𝑝 ↾ suc 𝐺)‘𝐺) = (𝑝‘𝐺))
39	32, 37, 38	3eqtr3d 2780	. . . . . . 7 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (𝑢‘𝐺) = (𝑝‘𝐺))
40		simprl3 1222	. . . . . . . 8 ⊢ (((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦))) → (𝑢‘𝐺) = 𝑥)
41	40	adantl 481	. . . . . . 7 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (𝑢‘𝐺) = 𝑥)
42		simprr3 1225	. . . . . . . 8 ⊢ (((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦))) → (𝑝‘𝐺) = 𝑦)
43	42	adantl 481	. . . . . . 7 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → (𝑝‘𝐺) = 𝑦)
44	39, 41, 43	3eqtr3d 2780	. . . . . 6 ⊢ ((𝐴 ⊆ No ∧ ((𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴) ∧ ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))) → 𝑥 = 𝑦)
45	44	expr 456	. . . . 5 ⊢ ((𝐴 ⊆ No ∧ (𝑢 ∈ 𝐴 ∧ 𝑝 ∈ 𝐴)) → (((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)) → 𝑥 = 𝑦))
46	45	rexlimdvva 3194	. . . 4 ⊢ (𝐴 ⊆ No → (∃𝑢 ∈ 𝐴 ∃𝑝 ∈ 𝐴 ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)) → 𝑥 = 𝑦))
47	1, 46	biimtrrid 243	. . 3 ⊢ (𝐴 ⊆ No → ((∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ ∃𝑝 ∈ 𝐴 (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)) → 𝑥 = 𝑦))
48	47	alrimivv 1930	. 2 ⊢ (𝐴 ⊆ No → ∀𝑥∀𝑦((∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ ∃𝑝 ∈ 𝐴 (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)) → 𝑥 = 𝑦))
49		eqeq2 2749	. . . . . 6 ⊢ (𝑥 = 𝑦 → ((𝑢‘𝐺) = 𝑥 ↔ (𝑢‘𝐺) = 𝑦))
50	49	3anbi3d 1445	. . . . 5 ⊢ (𝑥 = 𝑦 → ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ↔ (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑦)))
51	50	rexbidv 3161	. . . 4 ⊢ (𝑥 = 𝑦 → (∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ↔ ∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑦)))
52		dmeq 5853	. . . . . . 7 ⊢ (𝑢 = 𝑝 → dom 𝑢 = dom 𝑝)
53	52	eleq2d 2823	. . . . . 6 ⊢ (𝑢 = 𝑝 → (𝐺 ∈ dom 𝑢 ↔ 𝐺 ∈ dom 𝑝))
54		breq1 5102	. . . . . . . . 9 ⊢ (𝑢 = 𝑝 → (𝑢 <s 𝑣 ↔ 𝑝 <s 𝑣))
55	54	notbid 318	. . . . . . . 8 ⊢ (𝑢 = 𝑝 → (¬ 𝑢 <s 𝑣 ↔ ¬ 𝑝 <s 𝑣))
56		reseq1 5933	. . . . . . . . 9 ⊢ (𝑢 = 𝑝 → (𝑢 ↾ suc 𝐺) = (𝑝 ↾ suc 𝐺))
57	56	eqeq1d 2739	. . . . . . . 8 ⊢ (𝑢 = 𝑝 → ((𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺) ↔ (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)))
58	55, 57	imbi12d 344	. . . . . . 7 ⊢ (𝑢 = 𝑝 → ((¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ↔ (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺))))
59	58	ralbidv 3160	. . . . . 6 ⊢ (𝑢 = 𝑝 → (∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ↔ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺))))
60		fveq1 6834	. . . . . . 7 ⊢ (𝑢 = 𝑝 → (𝑢‘𝐺) = (𝑝‘𝐺))
61	60	eqeq1d 2739	. . . . . 6 ⊢ (𝑢 = 𝑝 → ((𝑢‘𝐺) = 𝑦 ↔ (𝑝‘𝐺) = 𝑦))
62	53, 59, 61	3anbi123d 1439	. . . . 5 ⊢ (𝑢 = 𝑝 → ((𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑦) ↔ (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))
63	62	cbvrexvw 3216	. . . 4 ⊢ (∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑦) ↔ ∃𝑝 ∈ 𝐴 (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦))
64	51, 63	bitrdi 287	. . 3 ⊢ (𝑥 = 𝑦 → (∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ↔ ∃𝑝 ∈ 𝐴 (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)))
65	64	mo4 2567	. 2 ⊢ (∃*𝑥∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ↔ ∀𝑥∀𝑦((∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥) ∧ ∃𝑝 ∈ 𝐴 (𝐺 ∈ dom 𝑝 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑝 <s 𝑣 → (𝑝 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑝‘𝐺) = 𝑦)) → 𝑥 = 𝑦))
66	48, 65	sylibr 234	1 ⊢ (𝐴 ⊆ No → ∃*𝑥∃𝑢 ∈ 𝐴 (𝐺 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑢 <s 𝑣 → (𝑢 ↾ suc 𝐺) = (𝑣 ↾ suc 𝐺)) ∧ (𝑢‘𝐺) = 𝑥))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ wo 848   ∧ w3a 1087  ∀wal 1540   = wceq 1542   ∈ wcel 2114  ∃*wmo 2538  ∀wral 3052  ∃wrex 3061   ⊆ wss 3902   class class class wbr 5099   Or wor 5532  dom cdm 5625   ↾ cres 5627  suc csuc 6320  ‘cfv 6493   No csur 27611   <s clts 27612

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5242  ax-nul 5252  ax-pr 5378

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3062  df-rab 3401  df-v 3443  df-sbc 3742  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4287  df-if 4481  df-pw 4557  df-sn 4582  df-pr 4584  df-tp 4586  df-op 4588  df-uni 4865  df-br 5100  df-opab 5162  df-mpt 5181  df-tr 5207  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-ord 6321  df-on 6322  df-suc 6324  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-fv 6501  df-1o 8399  df-2o 8400  df-no 27614  df-lts 27615

This theorem is referenced by:  noinfno  27690  noinffv  27693