Theorem omxpenlem 8601

Description: Lemma for omxpen 8602. (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 6169	. . . . . . . . 9 ⊢ (𝐵 ∈ On → Ord 𝐵)
2	1	ad2antlr 726	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → Ord 𝐵)
3		simprl 770	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑥 ∈ 𝐵)
4		ordsucss 7513	. . . . . . . 8 ⊢ (Ord 𝐵 → (𝑥 ∈ 𝐵 → suc 𝑥 ⊆ 𝐵))
5	2, 3, 4	sylc 65	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → suc 𝑥 ⊆ 𝐵)
6		onelon 6184	. . . . . . . . . 10 ⊢ ((𝐵 ∈ On ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ On)
7	6	ad2ant2lr 747	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑥 ∈ On)
8		suceloni 7508	. . . . . . . . 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 8180	. . . . . . . 8 ⊢ ((suc 𝑥 ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) → (suc 𝑥 ⊆ 𝐵 → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵)))
13	9, 10, 11, 12	syl3anc 1368	. . . . . . 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 6184	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ On)
17	16	ad2ant2rl 748	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑦 ∈ On)
18		omcl 8144	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ On)
19	11, 7, 18	syl2anc 587	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o 𝑥) ∈ On)
20		oaord 8156	. . . . . . . . 9 ⊢ ((𝑦 ∈ On ∧ 𝐴 ∈ On ∧ (𝐴 ·o 𝑥) ∈ On) → (𝑦 ∈ 𝐴 ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴)))
21	17, 11, 19, 20	syl3anc 1368	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝑦 ∈ 𝐴 ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴)))
22	15, 21	mpbid 235	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴))
23		omsuc 8134	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝑥 ∈ On) → (𝐴 ·o suc 𝑥) = ((𝐴 ·o 𝑥) +o 𝐴))
24	11, 7, 23	syl2anc 587	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o suc 𝑥) = ((𝐴 ·o 𝑥) +o 𝐴))
25	22, 24	eleqtrrd 2893	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o suc 𝑥))
26	14, 25	sseldd 3916	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
27	26	ralrimivva 3156	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐴 ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
28		omxpenlem.1	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦))
29	28	fmpo 7748	. . . 4 ⊢ (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐴 ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ↔ 𝐹:(𝐵 × 𝐴)⟶(𝐴 ·o 𝐵))
30	27, 29	sylib 221	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹:(𝐵 × 𝐴)⟶(𝐴 ·o 𝐵))
31	30	ffnd 6488	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹 Fn (𝐵 × 𝐴))
32		simpll 766	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝐴 ∈ On)
33		omcl 8144	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 ·o 𝐵) ∈ On)
34		onelon 6184	. . . . . . . 8 ⊢ (((𝐴 ·o 𝐵) ∈ On ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝑚 ∈ On)
35	33, 34	sylan 583	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝑚 ∈ On)
36		noel 4247	. . . . . . . . . . . 12 ⊢ ¬ 𝑚 ∈ ∅
37		oveq1 7142	. . . . . . . . . . . . . 14 ⊢ (𝐴 = ∅ → (𝐴 ·o 𝐵) = (∅ ·o 𝐵))
38		om0r 8147	. . . . . . . . . . . . . 14 ⊢ (𝐵 ∈ On → (∅ ·o 𝐵) = ∅)
39	37, 38	sylan9eqr 2855	. . . . . . . . . . . . 13 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝐴 ·o 𝐵) = ∅)
40	39	eleq2d 2875	. . . . . . . . . . . 12 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝑚 ∈ (𝐴 ·o 𝐵) ↔ 𝑚 ∈ ∅))
41	36, 40	mtbiri 330	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → ¬ 𝑚 ∈ (𝐴 ·o 𝐵))
42	41	ex 416	. . . . . . . . . 10 ⊢ (𝐵 ∈ On → (𝐴 = ∅ → ¬ 𝑚 ∈ (𝐴 ·o 𝐵)))
43	42	necon2ad 3002	. . . . . . . . 9 ⊢ (𝐵 ∈ On → (𝑚 ∈ (𝐴 ·o 𝐵) → 𝐴 ≠ ∅))
44	43	adantl 485	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝑚 ∈ (𝐴 ·o 𝐵) → 𝐴 ≠ ∅))
45	44	imp 410	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝐴 ≠ ∅)
46		omeu 8194	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ 𝑚 ∈ On ∧ 𝐴 ≠ ∅) → ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
47	32, 35, 45, 46	syl3anc 1368	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
48		vex 3444	. . . . . . . . 9 ⊢ 𝑚 ∈ V
49		vex 3444	. . . . . . . . 9 ⊢ 𝑛 ∈ V
50	48, 49	brcnv 5717	. . . . . . . 8 ⊢ (𝑚◡𝐹𝑛 ↔ 𝑛𝐹𝑚)
51		eleq1 2877	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) → (𝑚 ∈ (𝐴 ·o 𝐵) ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)))
52	51	biimpac 482	. . . . . . . . . . . . . . . 16 ⊢ ((𝑚 ∈ (𝐴 ·o 𝐵) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
53	6	ex 416	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝐵 ∈ On → (𝑥 ∈ 𝐵 → 𝑥 ∈ On))
54	53	ad2antlr 726	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ 𝐵 → 𝑥 ∈ On))
55		simplll 774	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝐴 ∈ On)
56		simpr 488	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑥 ∈ On)
57	55, 56, 18	syl2anc 587	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ On)
58		simplrr 777	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑦 ∈ 𝐴)
59	55, 58, 16	syl2anc 587	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑦 ∈ On)
60		oaword1 8161	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐴 ·o 𝑥) ∈ On ∧ 𝑦 ∈ On) → (𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦))
61	57, 59, 60	syl2anc 587	. . . . . . . . . . . . . . . . . . . . . 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 725	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝐵) ∈ On)
64		ontr2 6206	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐴 ·o 𝑥) ∈ On ∧ (𝐴 ·o 𝐵) ∈ On) → (((𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
65	57, 63, 64	syl2anc 587	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (((𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
66	61, 62, 65	mp2and 698	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵))
67		simpllr 775	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝐵 ∈ On)
68	62	ne0d 4251	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝐵) ≠ ∅)
69		on0eln0 6214	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐴 ·o 𝐵) ∈ On → (∅ ∈ (𝐴 ·o 𝐵) ↔ (𝐴 ·o 𝐵) ≠ ∅))
70	63, 69	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (𝐴 ·o 𝐵) ≠ ∅))
71	68, 70	mpbird 260	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ∅ ∈ (𝐴 ·o 𝐵))
72		om00el 8185	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵)))
73	72	ad2antrr 725	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵)))
74	71, 73	mpbid 235	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵))
75	74	simpld 498	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ∅ ∈ 𝐴)
76		omord2 8176	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑥 ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (𝑥 ∈ 𝐵 ↔ (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
77	56, 67, 55, 75, 76	syl31anc 1370	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝑥 ∈ 𝐵 ↔ (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
78	66, 77	mpbird 260	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑥 ∈ 𝐵)
79	78	ex 416	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ On → 𝑥 ∈ 𝐵))
80	54, 79	impbid 215	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ 𝐵 ↔ 𝑥 ∈ On))
81	80	expr 460	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝑦 ∈ 𝐴 → (𝑥 ∈ 𝐵 ↔ 𝑥 ∈ On)))
82	81	pm5.32rd 581	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴)))
83	52, 82	sylan2 595	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑚 ∈ (𝐴 ·o 𝐵) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴)))
84	83	expr 460	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴))))
85	84	pm5.32rd 581	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
86		eqcom 2805	. . . . . . . . . . . . . 14 ⊢ (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) ↔ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)
87	86	anbi2i 625	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
88	85, 87	syl6bb 290	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
89	88	anbi2d 631	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
90		an12 644	. . . . . . . . . . 11 ⊢ ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
91	89, 90	syl6bb 290	. . . . . . . . . 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 7140	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦)) = {⟨⟨𝑥, 𝑦⟩, 𝑚⟩ ∣ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))}
94		dfoprab2 7191	. . . . . . . . . . . 12 ⊢ {⟨⟨𝑥, 𝑦⟩, 𝑚⟩ ∣ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))} = {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}
95	28, 93, 94	3eqtri 2825	. . . . . . . . . . 11 ⊢ 𝐹 = {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}
96	95	breqi 5036	. . . . . . . . . 10 ⊢ (𝑛𝐹𝑚 ↔ 𝑛{⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}𝑚)
97		df-br 5031	. . . . . . . . . 10 ⊢ (𝑛{⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}𝑚 ↔ ⟨𝑛, 𝑚⟩ ∈ {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))})
98		opabidw 5377	. . . . . . . . . 10 ⊢ (⟨𝑛, 𝑚⟩ ∈ {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))} ↔ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
99	96, 97, 98	3bitri 300	. . . . . . . . 9 ⊢ (𝑛𝐹𝑚 ↔ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
100		r2ex 3262	. . . . . . . . 9 ⊢ (∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚) ↔ ∃𝑥∃𝑦((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
101	92, 99, 100	3bitr4g 317	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑛𝐹𝑚 ↔ ∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
102	50, 101	syl5bb 286	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑚◡𝐹𝑛 ↔ ∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
103	102	eubidv 2647	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (∃!𝑛 𝑚◡𝐹𝑛 ↔ ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
104	47, 103	mpbird 260	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ∃!𝑛 𝑚◡𝐹𝑛)
105	104	ralrimiva 3149	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∀𝑚 ∈ (𝐴 ·o 𝐵)∃!𝑛 𝑚◡𝐹𝑛)
106		fnres 6446	. . . 4 ⊢ ((◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵) ↔ ∀𝑚 ∈ (𝐴 ·o 𝐵)∃!𝑛 𝑚◡𝐹𝑛)
107	105, 106	sylibr 237	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵))
108		relcnv 5934	. . . . 5 ⊢ Rel ◡𝐹
109		df-rn 5530	. . . . . 6 ⊢ ran 𝐹 = dom ◡𝐹
110	30	frnd 6494	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ran 𝐹 ⊆ (𝐴 ·o 𝐵))
111	109, 110	eqsstrrid 3964	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → dom ◡𝐹 ⊆ (𝐴 ·o 𝐵))
112		relssres 5859	. . . . 5 ⊢ ((Rel ◡𝐹 ∧ dom ◡𝐹 ⊆ (𝐴 ·o 𝐵)) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) = ◡𝐹)
113	108, 111, 112	sylancr 590	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) = ◡𝐹)
114	113	fneq1d 6416	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵) ↔ ◡𝐹 Fn (𝐴 ·o 𝐵)))
115	107, 114	mpbid 235	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ◡𝐹 Fn (𝐴 ·o 𝐵))
116		dff1o4 6598	. 2 ⊢ (𝐹:(𝐵 × 𝐴)–1-1-onto→(𝐴 ·o 𝐵) ↔ (𝐹 Fn (𝐵 × 𝐴) ∧ ◡𝐹 Fn (𝐴 ·o 𝐵)))
117	31, 115, 116	sylanbrc 586	1 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹:(𝐵 × 𝐴)–1-1-onto→(𝐴 ·o 𝐵))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 399   = wceq 1538  ∃wex 1781   ∈ wcel 2111  ∃!weu 2628   ≠ wne 2987  ∀wral 3106  ∃wrex 3107   ⊆ wss 3881  ∅c0 4243  ⟨cop 4531   class class class wbr 5030  {copab 5092   × cxp 5517  ^◡ccnv 5518  dom cdm 5519  ran crn 5520   ↾ cres 5521  Rel wrel 5524  Ord word 6158  Oncon0 6159  suc csuc 6161   Fn wfn 6319  ⟶wf 6320  –1-1-onto→wf1o 6323  (class class class)co 7135  {coprab 7136   ∈ cmpo 7137   +_o coa 8082   ·_o comu 8083

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 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-rep 5154  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-ral 3111  df-rex 3112  df-reu 3113  df-rmo 3114  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-pss 3900  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-tp 4530  df-op 4532  df-uni 4801  df-int 4839  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-tr 5137  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6116  df-ord 6162  df-on 6163  df-lim 6164  df-suc 6165  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-f1 6329  df-fo 6330  df-f1o 6331  df-fv 6332  df-ov 7138  df-oprab 7139  df-mpo 7140  df-om 7561  df-1st 7671  df-2nd 7672  df-wrecs 7930  df-recs 7991  df-rdg 8029  df-1o 8085  df-oadd 8089  df-omul 8090

This theorem is referenced by:  omxpen  8602  omf1o  8603  infxpenc  9429