Theorem omxpenlem 9006

Description: Lemma for omxpen 9007. (Contributed by Mario Carneiro, 3-Mar-2013.) (Revised by Mario Carneiro, 25-May-2015.)

Hypothesis

Ref	Expression
omxpenlem.1	⊢ 𝐹 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦))

Assertion

Ref	Expression
omxpenlem	⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹:(𝐵 × 𝐴)–1-1-onto→(𝐴 ·o 𝐵))

Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦

Allowed substitution hints:   𝐹(𝑥,𝑦)

Proof of Theorem omxpenlem

Dummy variables 𝑚 𝑛 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eloni 6327	. . . . . . . . 9 ⊢ (𝐵 ∈ On → Ord 𝐵)
2	1	ad2antlr 727	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → Ord 𝐵)
3		simprl 770	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑥 ∈ 𝐵)
4		ordsucss 7760	. . . . . . . 8 ⊢ (Ord 𝐵 → (𝑥 ∈ 𝐵 → suc 𝑥 ⊆ 𝐵))
5	2, 3, 4	sylc 65	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → suc 𝑥 ⊆ 𝐵)
6		onelon 6342	. . . . . . . . . 10 ⊢ ((𝐵 ∈ On ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ On)
7	6	ad2ant2lr 748	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑥 ∈ On)
8		onsuc 7755	. . . . . . . . 9 ⊢ (𝑥 ∈ On → suc 𝑥 ∈ On)
9	7, 8	syl 17	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → suc 𝑥 ∈ On)
10		simplr 768	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝐵 ∈ On)
11		simpll 766	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝐴 ∈ On)
12		omwordi 8498	. . . . . . . 8 ⊢ ((suc 𝑥 ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) → (suc 𝑥 ⊆ 𝐵 → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵)))
13	9, 10, 11, 12	syl3anc 1373	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (suc 𝑥 ⊆ 𝐵 → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵)))
14	5, 13	mpd 15	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵))
15		simprr 772	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑦 ∈ 𝐴)
16		onelon 6342	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ On)
17	16	ad2ant2rl 749	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑦 ∈ On)
18		omcl 8463	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ On)
19	11, 7, 18	syl2anc 584	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o 𝑥) ∈ On)
20		oaord 8474	. . . . . . . . 9 ⊢ ((𝑦 ∈ On ∧ 𝐴 ∈ On ∧ (𝐴 ·o 𝑥) ∈ On) → (𝑦 ∈ 𝐴 ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴)))
21	17, 11, 19, 20	syl3anc 1373	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝑦 ∈ 𝐴 ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴)))
22	15, 21	mpbid 232	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴))
23		omsuc 8453	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝑥 ∈ On) → (𝐴 ·o suc 𝑥) = ((𝐴 ·o 𝑥) +o 𝐴))
24	11, 7, 23	syl2anc 584	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o suc 𝑥) = ((𝐴 ·o 𝑥) +o 𝐴))
25	22, 24	eleqtrrd 2839	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o suc 𝑥))
26	14, 25	sseldd 3934	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
27	26	ralrimivva 3179	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐴 ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
28		omxpenlem.1	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦))
29	28	fmpo 8012	. . . 4 ⊢ (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐴 ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ↔ 𝐹:(𝐵 × 𝐴)⟶(𝐴 ·o 𝐵))
30	27, 29	sylib 218	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹:(𝐵 × 𝐴)⟶(𝐴 ·o 𝐵))
31	30	ffnd 6663	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹 Fn (𝐵 × 𝐴))
32		simpll 766	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝐴 ∈ On)
33		omcl 8463	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 ·o 𝐵) ∈ On)
34		onelon 6342	. . . . . . . 8 ⊢ (((𝐴 ·o 𝐵) ∈ On ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝑚 ∈ On)
35	33, 34	sylan 580	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝑚 ∈ On)
36		noel 4290	. . . . . . . . . . . 12 ⊢ ¬ 𝑚 ∈ ∅
37		oveq1 7365	. . . . . . . . . . . . . 14 ⊢ (𝐴 = ∅ → (𝐴 ·o 𝐵) = (∅ ·o 𝐵))
38		om0r 8466	. . . . . . . . . . . . . 14 ⊢ (𝐵 ∈ On → (∅ ·o 𝐵) = ∅)
39	37, 38	sylan9eqr 2793	. . . . . . . . . . . . 13 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝐴 ·o 𝐵) = ∅)
40	39	eleq2d 2822	. . . . . . . . . . . 12 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝑚 ∈ (𝐴 ·o 𝐵) ↔ 𝑚 ∈ ∅))
41	36, 40	mtbiri 327	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → ¬ 𝑚 ∈ (𝐴 ·o 𝐵))
42	41	ex 412	. . . . . . . . . 10 ⊢ (𝐵 ∈ On → (𝐴 = ∅ → ¬ 𝑚 ∈ (𝐴 ·o 𝐵)))
43	42	necon2ad 2947	. . . . . . . . 9 ⊢ (𝐵 ∈ On → (𝑚 ∈ (𝐴 ·o 𝐵) → 𝐴 ≠ ∅))
44	43	adantl 481	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝑚 ∈ (𝐴 ·o 𝐵) → 𝐴 ≠ ∅))
45	44	imp 406	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝐴 ≠ ∅)
46		omeu 8512	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ 𝑚 ∈ On ∧ 𝐴 ≠ ∅) → ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
47	32, 35, 45, 46	syl3anc 1373	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
48		vex 3444	. . . . . . . . 9 ⊢ 𝑚 ∈ V
49		vex 3444	. . . . . . . . 9 ⊢ 𝑛 ∈ V
50	48, 49	brcnv 5831	. . . . . . . 8 ⊢ (𝑚◡𝐹𝑛 ↔ 𝑛𝐹𝑚)
51		eleq1 2824	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) → (𝑚 ∈ (𝐴 ·o 𝐵) ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)))
52	51	biimpac 478	. . . . . . . . . . . . . . . 16 ⊢ ((𝑚 ∈ (𝐴 ·o 𝐵) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
53	6	ex 412	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝐵 ∈ On → (𝑥 ∈ 𝐵 → 𝑥 ∈ On))
54	53	ad2antlr 727	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ 𝐵 → 𝑥 ∈ On))
55		simplll 774	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝐴 ∈ On)
56		simpr 484	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑥 ∈ On)
57	55, 56, 18	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ On)
58		simplrr 777	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑦 ∈ 𝐴)
59	55, 58, 16	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑦 ∈ On)
60		oaword1 8479	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐴 ·o 𝑥) ∈ On ∧ 𝑦 ∈ On) → (𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦))
61	57, 59, 60	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦))
62		simplrl 776	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
63	33	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝐵) ∈ On)
64		ontr2 6365	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐴 ·o 𝑥) ∈ On ∧ (𝐴 ·o 𝐵) ∈ On) → (((𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
65	57, 63, 64	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (((𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
66	61, 62, 65	mp2and 699	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵))
67		simpllr 775	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝐵 ∈ On)
68	62	ne0d 4294	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝐵) ≠ ∅)
69		on0eln0 6374	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐴 ·o 𝐵) ∈ On → (∅ ∈ (𝐴 ·o 𝐵) ↔ (𝐴 ·o 𝐵) ≠ ∅))
70	63, 69	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (𝐴 ·o 𝐵) ≠ ∅))
71	68, 70	mpbird 257	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ∅ ∈ (𝐴 ·o 𝐵))
72		om00el 8503	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵)))
73	72	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵)))
74	71, 73	mpbid 232	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵))
75	74	simpld 494	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ∅ ∈ 𝐴)
76		omord2 8494	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑥 ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (𝑥 ∈ 𝐵 ↔ (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
77	56, 67, 55, 75, 76	syl31anc 1375	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝑥 ∈ 𝐵 ↔ (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
78	66, 77	mpbird 257	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑥 ∈ 𝐵)
79	78	ex 412	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ On → 𝑥 ∈ 𝐵))
80	54, 79	impbid 212	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ 𝐵 ↔ 𝑥 ∈ On))
81	80	expr 456	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝑦 ∈ 𝐴 → (𝑥 ∈ 𝐵 ↔ 𝑥 ∈ On)))
82	81	pm5.32rd 578	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴)))
83	52, 82	sylan2 593	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑚 ∈ (𝐴 ·o 𝐵) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴)))
84	83	expr 456	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴))))
85	84	pm5.32rd 578	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
86		eqcom 2743	. . . . . . . . . . . . . 14 ⊢ (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) ↔ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)
87	86	anbi2i 623	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
88	85, 87	bitrdi 287	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
89	88	anbi2d 630	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
90		an12 645	. . . . . . . . . . 11 ⊢ ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
91	89, 90	bitrdi 287	. . . . . . . . . 10 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
92	91	2exbidv 1925	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ ∃𝑥∃𝑦((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
93		df-mpo 7363	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦)) = {⟨⟨𝑥, 𝑦⟩, 𝑚⟩ ∣ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))}
94		dfoprab2 7416	. . . . . . . . . . . 12 ⊢ {⟨⟨𝑥, 𝑦⟩, 𝑚⟩ ∣ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))} = {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}
95	28, 93, 94	3eqtri 2763	. . . . . . . . . . 11 ⊢ 𝐹 = {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}
96	95	breqi 5104	. . . . . . . . . 10 ⊢ (𝑛𝐹𝑚 ↔ 𝑛{⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}𝑚)
97		df-br 5099	. . . . . . . . . 10 ⊢ (𝑛{⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}𝑚 ↔ ⟨𝑛, 𝑚⟩ ∈ {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))})
98		opabidw 5472	. . . . . . . . . 10 ⊢ (⟨𝑛, 𝑚⟩ ∈ {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))} ↔ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
99	96, 97, 98	3bitri 297	. . . . . . . . 9 ⊢ (𝑛𝐹𝑚 ↔ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
100		r2ex 3173	. . . . . . . . 9 ⊢ (∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚) ↔ ∃𝑥∃𝑦((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
101	92, 99, 100	3bitr4g 314	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑛𝐹𝑚 ↔ ∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
102	50, 101	bitrid 283	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑚◡𝐹𝑛 ↔ ∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
103	102	eubidv 2586	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (∃!𝑛 𝑚◡𝐹𝑛 ↔ ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
104	47, 103	mpbird 257	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ∃!𝑛 𝑚◡𝐹𝑛)
105	104	ralrimiva 3128	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∀𝑚 ∈ (𝐴 ·o 𝐵)∃!𝑛 𝑚◡𝐹𝑛)
106		fnres 6619	. . . 4 ⊢ ((◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵) ↔ ∀𝑚 ∈ (𝐴 ·o 𝐵)∃!𝑛 𝑚◡𝐹𝑛)
107	105, 106	sylibr 234	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵))
108		relcnv 6063	. . . . 5 ⊢ Rel ◡𝐹
109		df-rn 5635	. . . . . 6 ⊢ ran 𝐹 = dom ◡𝐹
110	30	frnd 6670	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ran 𝐹 ⊆ (𝐴 ·o 𝐵))
111	109, 110	eqsstrrid 3973	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → dom ◡𝐹 ⊆ (𝐴 ·o 𝐵))
112		relssres 5981	. . . . 5 ⊢ ((Rel ◡𝐹 ∧ dom ◡𝐹 ⊆ (𝐴 ·o 𝐵)) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) = ◡𝐹)
113	108, 111, 112	sylancr 587	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) = ◡𝐹)
114	113	fneq1d 6585	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵) ↔ ◡𝐹 Fn (𝐴 ·o 𝐵)))
115	107, 114	mpbid 232	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ◡𝐹 Fn (𝐴 ·o 𝐵))
116		dff1o4 6782	. 2 ⊢ (𝐹:(𝐵 × 𝐴)–1-1-onto→(𝐴 ·o 𝐵) ↔ (𝐹 Fn (𝐵 × 𝐴) ∧ ◡𝐹 Fn (𝐴 ·o 𝐵)))
117	31, 115, 116	sylanbrc 583	1 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹:(𝐵 × 𝐴)–1-1-onto→(𝐴 ·o 𝐵))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1541  ∃wex 1780   ∈ wcel 2113  ∃!weu 2568   ≠ wne 2932  ∀wral 3051  ∃wrex 3060   ⊆ wss 3901  ∅c0 4285  ⟨cop 4586   class class class wbr 5098  {copab 5160   × cxp 5622  ^◡ccnv 5623  dom cdm 5624  ran crn 5625   ↾ cres 5626  Rel wrel 5629  Ord word 6316  Oncon0 6317  suc csuc 6319   Fn wfn 6487  ⟶wf 6488  –1-1-onto→wf1o 6491  (class class class)co 7358  {coprab 7359   ∈ cmpo 7360   +_o coa 8394   ·_o comu 8395

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-rep 5224  ax-sep 5241  ax-nul 5251  ax-pr 5377  ax-un 7680

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3061  df-rmo 3350  df-reu 3351  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-int 4903  df-iun 4948  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-ov 7361  df-oprab 7362  df-mpo 7363  df-om 7809  df-1st 7933  df-2nd 7934  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-oadd 8401  df-omul 8402

This theorem is referenced by:  omxpen  9007  omf1o  9008  infxpenc  9928