Theorem unxpdomlem3 9214

Description: Lemma for unxpdom 9215. (Contributed by Mario Carneiro, 13-Jan-2013.) (Revised by Mario Carneiro, 16-Nov-2014.)

Hypotheses

Ref	Expression
unxpdomlem1.1	⊢ 𝐹 = (𝑥 ∈ (𝑎 ∪ 𝑏) ↦ 𝐺)
unxpdomlem1.2	⊢ 𝐺 = if(𝑥 ∈ 𝑎, ⟨𝑥, if(𝑥 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑥 = 𝑡, 𝑛, 𝑚), 𝑥⟩)

Assertion

Ref	Expression
unxpdomlem3	⊢ ((1o ≺ 𝑎 ∧ 1o ≺ 𝑏) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏))

Distinct variable group:   𝑎,𝑏,𝑚,𝑛,𝑠,𝑡,𝑥

Allowed substitution hints:   𝐹(𝑥,𝑡,𝑚,𝑛,𝑠,𝑎,𝑏)   𝐺(𝑥,𝑡,𝑚,𝑛,𝑠,𝑎,𝑏)

Proof of Theorem unxpdomlem3

Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		1sdom 9211	. . 3 ⊢ (𝑎 ∈ V → (1o ≺ 𝑎 ↔ ∃𝑚 ∈ 𝑎 ∃𝑛 ∈ 𝑎 ¬ 𝑚 = 𝑛))
2	1	elv 3460	. 2 ⊢ (1o ≺ 𝑎 ↔ ∃𝑚 ∈ 𝑎 ∃𝑛 ∈ 𝑎 ¬ 𝑚 = 𝑛)
3		1sdom 9211	. . 3 ⊢ (𝑏 ∈ V → (1o ≺ 𝑏 ↔ ∃𝑠 ∈ 𝑏 ∃𝑡 ∈ 𝑏 ¬ 𝑠 = 𝑡))
4	3	elv 3460	. 2 ⊢ (1o ≺ 𝑏 ↔ ∃𝑠 ∈ 𝑏 ∃𝑡 ∈ 𝑏 ¬ 𝑠 = 𝑡)
5		reeanv 3237	. . 3 ⊢ (∃𝑚 ∈ 𝑎 ∃𝑠 ∈ 𝑏 (∃𝑛 ∈ 𝑎 ¬ 𝑚 = 𝑛 ∧ ∃𝑡 ∈ 𝑏 ¬ 𝑠 = 𝑡) ↔ (∃𝑚 ∈ 𝑎 ∃𝑛 ∈ 𝑎 ¬ 𝑚 = 𝑛 ∧ ∃𝑠 ∈ 𝑏 ∃𝑡 ∈ 𝑏 ¬ 𝑠 = 𝑡))
6		reeanv 3237	. . . . 5 ⊢ (∃𝑛 ∈ 𝑎 ∃𝑡 ∈ 𝑏 (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ↔ (∃𝑛 ∈ 𝑎 ¬ 𝑚 = 𝑛 ∧ ∃𝑡 ∈ 𝑏 ¬ 𝑠 = 𝑡))
7		vex 3459	. . . . . . . . 9 ⊢ 𝑎 ∈ V
8		vex 3459	. . . . . . . . 9 ⊢ 𝑏 ∈ V
9	7, 8	unex 7742	. . . . . . . 8 ⊢ (𝑎 ∪ 𝑏) ∈ V
10	7, 8	xpex 7748	. . . . . . . 8 ⊢ (𝑎 × 𝑏) ∈ V
11		unxpdomlem1.2	. . . . . . . . . . 11 ⊢ 𝐺 = if(𝑥 ∈ 𝑎, ⟨𝑥, if(𝑥 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑥 = 𝑡, 𝑛, 𝑚), 𝑥⟩)
12		simpr 489	. . . . . . . . . . . . 13 ⊢ (((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) ∧ 𝑥 ∈ 𝑎) → 𝑥 ∈ 𝑎)
13		simp2r 1219	. . . . . . . . . . . . . . 15 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → 𝑡 ∈ 𝑏)
14		simp1r 1217	. . . . . . . . . . . . . . 15 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → 𝑠 ∈ 𝑏)
15	13, 14	ifcld 4534	. . . . . . . . . . . . . 14 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → if(𝑥 = 𝑚, 𝑡, 𝑠) ∈ 𝑏)
16	15	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) ∧ 𝑥 ∈ 𝑎) → if(𝑥 = 𝑚, 𝑡, 𝑠) ∈ 𝑏)
17	12, 16	opelxpd 5700	. . . . . . . . . . . 12 ⊢ (((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) ∧ 𝑥 ∈ 𝑎) → ⟨𝑥, if(𝑥 = 𝑚, 𝑡, 𝑠)⟩ ∈ (𝑎 × 𝑏))
18		simp2l 1218	. . . . . . . . . . . . . . 15 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → 𝑛 ∈ 𝑎)
19		simp1l 1216	. . . . . . . . . . . . . . 15 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → 𝑚 ∈ 𝑎)
20	18, 19	ifcld 4534	. . . . . . . . . . . . . 14 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → if(𝑥 = 𝑡, 𝑛, 𝑚) ∈ 𝑎)
21	20	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) ∧ ¬ 𝑥 ∈ 𝑎) → if(𝑥 = 𝑡, 𝑛, 𝑚) ∈ 𝑎)
22		elun 4107	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (𝑎 ∪ 𝑏) ↔ (𝑥 ∈ 𝑎 ∨ 𝑥 ∈ 𝑏))
23	22	bilani 509	. . . . . . . . . . . . . 14 ⊢ ((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) → (𝑥 ∈ 𝑎 ∨ 𝑥 ∈ 𝑏))
24	23	orcanai 1018	. . . . . . . . . . . . 13 ⊢ (((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) ∧ ¬ 𝑥 ∈ 𝑎) → 𝑥 ∈ 𝑏)
25	21, 24	opelxpd 5700	. . . . . . . . . . . 12 ⊢ (((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) ∧ ¬ 𝑥 ∈ 𝑎) → ⟨if(𝑥 = 𝑡, 𝑛, 𝑚), 𝑥⟩ ∈ (𝑎 × 𝑏))
26	17, 25	ifclda 4523	. . . . . . . . . . 11 ⊢ ((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) → if(𝑥 ∈ 𝑎, ⟨𝑥, if(𝑥 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑥 = 𝑡, 𝑛, 𝑚), 𝑥⟩) ∈ (𝑎 × 𝑏))
27	11, 26	eqeltrid 2867	. . . . . . . . . 10 ⊢ ((((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) ∧ 𝑥 ∈ (𝑎 ∪ 𝑏)) → 𝐺 ∈ (𝑎 × 𝑏))
28		unxpdomlem1.1	. . . . . . . . . 10 ⊢ 𝐹 = (𝑥 ∈ (𝑎 ∪ 𝑏) ↦ 𝐺)
29	27, 28	fmptd 7109	. . . . . . . . 9 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → 𝐹:(𝑎 ∪ 𝑏)⟶(𝑎 × 𝑏))
30	28, 11	unxpdomlem1 9212	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 ∈ (𝑎 ∪ 𝑏) → (𝐹‘𝑧) = if(𝑧 ∈ 𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩))
31	30	ad2antrl 740	. . . . . . . . . . . . . . 15 ⊢ (((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) → (𝐹‘𝑧) = if(𝑧 ∈ 𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩))
32		iftrue 4493	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 ∈ 𝑎 → if(𝑧 ∈ 𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩) = ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩)
33	32	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎) → if(𝑧 ∈ 𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩) = ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩)
34	31, 33	sylan9eq 2818	. . . . . . . . . . . . . 14 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎)) → (𝐹‘𝑧) = ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩)
35	28, 11	unxpdomlem1 9212	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ (𝑎 ∪ 𝑏) → (𝐹‘𝑤) = if(𝑤 ∈ 𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩))
36	35	ad2antll 741	. . . . . . . . . . . . . . 15 ⊢ (((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) → (𝐹‘𝑤) = if(𝑤 ∈ 𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩))
37		iftrue 4493	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ∈ 𝑎 → if(𝑤 ∈ 𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩) = ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩)
38	37	adantl 486	. . . . . . . . . . . . . . 15 ⊢ ((𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎) → if(𝑤 ∈ 𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩) = ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩)
39	36, 38	sylan9eq 2818	. . . . . . . . . . . . . 14 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎)) → (𝐹‘𝑤) = ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩)
40	34, 39	eqeq12d 2779	. . . . . . . . . . . . 13 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎)) → ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩ = ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩))
41		vex 3459	. . . . . . . . . . . . . 14 ⊢ 𝑧 ∈ V
42		vex 3459	. . . . . . . . . . . . . . 15 ⊢ 𝑡 ∈ V
43		vex 3459	. . . . . . . . . . . . . . 15 ⊢ 𝑠 ∈ V
44	42, 43	ifex 4538	. . . . . . . . . . . . . 14 ⊢ if(𝑧 = 𝑚, 𝑡, 𝑠) ∈ V
45	41, 44	opth1 5457	. . . . . . . . . . . . 13 ⊢ (⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩ = ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩ → 𝑧 = 𝑤)
46	40, 45	biimtrdi 256	. . . . . . . . . . . 12 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎)) → ((𝐹‘𝑧) = (𝐹‘𝑤) → 𝑧 = 𝑤))
47		simprr 784	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) → 𝑤 ∈ (𝑎 ∪ 𝑏))
48		simpll 778	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) → ¬ 𝑚 = 𝑛)
49		simplr 780	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) → ¬ 𝑠 = 𝑡)
50	28, 11, 47, 48, 49	unxpdomlem2 9213	. . . . . . . . . . . . 13 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (𝑧 ∈ 𝑎 ∧ ¬ 𝑤 ∈ 𝑎)) → ¬ (𝐹‘𝑧) = (𝐹‘𝑤))
51	50	pm2.21d 122	. . . . . . . . . . . 12 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (𝑧 ∈ 𝑎 ∧ ¬ 𝑤 ∈ 𝑎)) → ((𝐹‘𝑧) = (𝐹‘𝑤) → 𝑧 = 𝑤))
52		eqcom 2770	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ (𝐹‘𝑤) = (𝐹‘𝑧))
53		simprl 782	. . . . . . . . . . . . . . . 16 ⊢ (((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) → 𝑧 ∈ (𝑎 ∪ 𝑏))
54	28, 11, 53, 48, 49	unxpdomlem2 9213	. . . . . . . . . . . . . . 15 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (𝑤 ∈ 𝑎 ∧ ¬ 𝑧 ∈ 𝑎)) → ¬ (𝐹‘𝑤) = (𝐹‘𝑧))
55	54	ancom2s 662	. . . . . . . . . . . . . 14 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (¬ 𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎)) → ¬ (𝐹‘𝑤) = (𝐹‘𝑧))
56	55	pm2.21d 122	. . . . . . . . . . . . 13 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (¬ 𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎)) → ((𝐹‘𝑤) = (𝐹‘𝑧) → 𝑧 = 𝑤))
57	52, 56	biimtrid 245	. . . . . . . . . . . 12 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (¬ 𝑧 ∈ 𝑎 ∧ 𝑤 ∈ 𝑎)) → ((𝐹‘𝑧) = (𝐹‘𝑤) → 𝑧 = 𝑤))
58		iffalse 4496	. . . . . . . . . . . . . . . 16 ⊢ (¬ 𝑧 ∈ 𝑎 → if(𝑧 ∈ 𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩) = ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩)
59	58	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((¬ 𝑧 ∈ 𝑎 ∧ ¬ 𝑤 ∈ 𝑎) → if(𝑧 ∈ 𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩) = ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩)
60	31, 59	sylan9eq 2818	. . . . . . . . . . . . . 14 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (¬ 𝑧 ∈ 𝑎 ∧ ¬ 𝑤 ∈ 𝑎)) → (𝐹‘𝑧) = ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩)
61		iffalse 4496	. . . . . . . . . . . . . . . 16 ⊢ (¬ 𝑤 ∈ 𝑎 → if(𝑤 ∈ 𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩) = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩)
62	61	adantl 486	. . . . . . . . . . . . . . 15 ⊢ ((¬ 𝑧 ∈ 𝑎 ∧ ¬ 𝑤 ∈ 𝑎) → if(𝑤 ∈ 𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩) = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩)
63	36, 62	sylan9eq 2818	. . . . . . . . . . . . . 14 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (¬ 𝑧 ∈ 𝑎 ∧ ¬ 𝑤 ∈ 𝑎)) → (𝐹‘𝑤) = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩)
64	60, 63	eqeq12d 2779	. . . . . . . . . . . . 13 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (¬ 𝑧 ∈ 𝑎 ∧ ¬ 𝑤 ∈ 𝑎)) → ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩ = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩))
65		vex 3459	. . . . . . . . . . . . . . . 16 ⊢ 𝑛 ∈ V
66		vex 3459	. . . . . . . . . . . . . . . 16 ⊢ 𝑚 ∈ V
67	65, 66	ifex 4538	. . . . . . . . . . . . . . 15 ⊢ if(𝑧 = 𝑡, 𝑛, 𝑚) ∈ V
68	67, 41	opth 5458	. . . . . . . . . . . . . 14 ⊢ (⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩ = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩ ↔ (if(𝑧 = 𝑡, 𝑛, 𝑚) = if(𝑤 = 𝑡, 𝑛, 𝑚) ∧ 𝑧 = 𝑤))
69	68	simprbi 502	. . . . . . . . . . . . 13 ⊢ (⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩ = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩ → 𝑧 = 𝑤)
70	64, 69	biimtrdi 256	. . . . . . . . . . . 12 ⊢ ((((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) ∧ (¬ 𝑧 ∈ 𝑎 ∧ ¬ 𝑤 ∈ 𝑎)) → ((𝐹‘𝑧) = (𝐹‘𝑤) → 𝑧 = 𝑤))
71	46, 51, 57, 70	4casesdan 1057	. . . . . . . . . . 11 ⊢ (((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) ∧ (𝑧 ∈ (𝑎 ∪ 𝑏) ∧ 𝑤 ∈ (𝑎 ∪ 𝑏))) → ((𝐹‘𝑧) = (𝐹‘𝑤) → 𝑧 = 𝑤))
72	71	ralrimivva 3208	. . . . . . . . . 10 ⊢ ((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) → ∀𝑧 ∈ (𝑎 ∪ 𝑏)∀𝑤 ∈ (𝑎 ∪ 𝑏)((𝐹‘𝑧) = (𝐹‘𝑤) → 𝑧 = 𝑤))
73	72	3ad2ant3 1153	. . . . . . . . 9 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → ∀𝑧 ∈ (𝑎 ∪ 𝑏)∀𝑤 ∈ (𝑎 ∪ 𝑏)((𝐹‘𝑧) = (𝐹‘𝑤) → 𝑧 = 𝑤))
74		dff13 7252	. . . . . . . . 9 ⊢ (𝐹:(𝑎 ∪ 𝑏)–1-1→(𝑎 × 𝑏) ↔ (𝐹:(𝑎 ∪ 𝑏)⟶(𝑎 × 𝑏) ∧ ∀𝑧 ∈ (𝑎 ∪ 𝑏)∀𝑤 ∈ (𝑎 ∪ 𝑏)((𝐹‘𝑧) = (𝐹‘𝑤) → 𝑧 = 𝑤)))
75	29, 73, 74	sylanbrc 594	. . . . . . . 8 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → 𝐹:(𝑎 ∪ 𝑏)–1-1→(𝑎 × 𝑏))
76		f1dom2g 8962	. . . . . . . 8 ⊢ (((𝑎 ∪ 𝑏) ∈ V ∧ (𝑎 × 𝑏) ∈ V ∧ 𝐹:(𝑎 ∪ 𝑏)–1-1→(𝑎 × 𝑏)) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏))
77	9, 10, 75, 76	mp3an12i 1494	. . . . . . 7 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏) ∧ (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡)) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏))
78	77	3expia 1139	. . . . . 6 ⊢ (((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) ∧ (𝑛 ∈ 𝑎 ∧ 𝑡 ∈ 𝑏)) → ((¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏)))
79	78	rexlimdvva 3222	. . . . 5 ⊢ ((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) → (∃𝑛 ∈ 𝑎 ∃𝑡 ∈ 𝑏 (¬ 𝑚 = 𝑛 ∧ ¬ 𝑠 = 𝑡) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏)))
80	6, 79	biimtrrid 246	. . . 4 ⊢ ((𝑚 ∈ 𝑎 ∧ 𝑠 ∈ 𝑏) → ((∃𝑛 ∈ 𝑎 ¬ 𝑚 = 𝑛 ∧ ∃𝑡 ∈ 𝑏 ¬ 𝑠 = 𝑡) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏)))
81	80	rexlimivv 3207	. . 3 ⊢ (∃𝑚 ∈ 𝑎 ∃𝑠 ∈ 𝑏 (∃𝑛 ∈ 𝑎 ¬ 𝑚 = 𝑛 ∧ ∃𝑡 ∈ 𝑏 ¬ 𝑠 = 𝑡) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏))
82	5, 81	sylbir 238	. 2 ⊢ ((∃𝑚 ∈ 𝑎 ∃𝑛 ∈ 𝑎 ¬ 𝑚 = 𝑛 ∧ ∃𝑠 ∈ 𝑏 ∃𝑡 ∈ 𝑏 ¬ 𝑠 = 𝑡) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏))
83	2, 4, 82	syl2anb 609	1 ⊢ ((1o ≺ 𝑎 ∧ 1o ≺ 𝑏) → (𝑎 ∪ 𝑏) ≼ (𝑎 × 𝑏))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   ∧ w3a 1103   = wceq 1570   ∈ wcel 2143  ∀wral 3079  ∃wrex 3089  Vcvv 3455   ∪ cun 3903  ifcif 4487  ⟨cop 4595   class class class wbr 5109   ↦ cmpt 5192   × cxp 5659  ⟶wf 6532  –1-1→wf1 6533  ‘cfv 6536  1_oc1o 8442   ≼ cdom 8937   ≺ csdm 8938

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rab 3417  df-v 3457  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-br 5110  df-opab 5174  df-mpt 5193  df-id 5556  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-1o 8449  df-2o 8450  df-en 8940  df-dom 8941  df-sdom 8942

This theorem is referenced by:  unxpdom  9215