Theorem omxpenlem 9017

Description: Lemma for omxpen 9018. (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 725	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → Ord 𝐵)
3		simprl 769	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑥 ∈ 𝐵)
4		ordsucss 7753	. . . . . . . 8 ⊢ (Ord 𝐵 → (𝑥 ∈ 𝐵 → suc 𝑥 ⊆ 𝐵))
5	2, 3, 4	sylc 65	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → suc 𝑥 ⊆ 𝐵)
6		onelon 6342	. . . . . . . . . 10 ⊢ ((𝐵 ∈ On ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ On)
7	6	ad2ant2lr 746	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑥 ∈ On)
8		onsuc 7746	. . . . . . . . 9 ⊢ (𝑥 ∈ On → suc 𝑥 ∈ On)
9	7, 8	syl 17	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → suc 𝑥 ∈ On)
10		simplr 767	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝐵 ∈ On)
11		simpll 765	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝐴 ∈ On)
12		omwordi 8518	. . . . . . . 8 ⊢ ((suc 𝑥 ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) → (suc 𝑥 ⊆ 𝐵 → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵)))
13	9, 10, 11, 12	syl3anc 1371	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (suc 𝑥 ⊆ 𝐵 → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵)))
14	5, 13	mpd 15	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵))
15		simprr 771	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑦 ∈ 𝐴)
16		onelon 6342	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ On)
17	16	ad2ant2rl 747	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑦 ∈ On)
18		omcl 8482	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ On)
19	11, 7, 18	syl2anc 584	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o 𝑥) ∈ On)
20		oaord 8494	. . . . . . . . 9 ⊢ ((𝑦 ∈ On ∧ 𝐴 ∈ On ∧ (𝐴 ·o 𝑥) ∈ On) → (𝑦 ∈ 𝐴 ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴)))
21	17, 11, 19, 20	syl3anc 1371	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝑦 ∈ 𝐴 ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴)))
22	15, 21	mpbid 231	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴))
23		omsuc 8472	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝑥 ∈ On) → (𝐴 ·o suc 𝑥) = ((𝐴 ·o 𝑥) +o 𝐴))
24	11, 7, 23	syl2anc 584	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o suc 𝑥) = ((𝐴 ·o 𝑥) +o 𝐴))
25	22, 24	eleqtrrd 2841	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o suc 𝑥))
26	14, 25	sseldd 3945	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
27	26	ralrimivva 3197	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐴 ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
28		omxpenlem.1	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦))
29	28	fmpo 8000	. . . 4 ⊢ (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐴 ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ↔ 𝐹:(𝐵 × 𝐴)⟶(𝐴 ·o 𝐵))
30	27, 29	sylib 217	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹:(𝐵 × 𝐴)⟶(𝐴 ·o 𝐵))
31	30	ffnd 6669	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹 Fn (𝐵 × 𝐴))
32		simpll 765	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝐴 ∈ On)
33		omcl 8482	. . . . . . . 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 7364	. . . . . . . . . . . . . 14 ⊢ (𝐴 = ∅ → (𝐴 ·o 𝐵) = (∅ ·o 𝐵))
38		om0r 8485	. . . . . . . . . . . . . 14 ⊢ (𝐵 ∈ On → (∅ ·o 𝐵) = ∅)
39	37, 38	sylan9eqr 2798	. . . . . . . . . . . . 13 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝐴 ·o 𝐵) = ∅)
40	39	eleq2d 2823	. . . . . . . . . . . 12 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝑚 ∈ (𝐴 ·o 𝐵) ↔ 𝑚 ∈ ∅))
41	36, 40	mtbiri 326	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → ¬ 𝑚 ∈ (𝐴 ·o 𝐵))
42	41	ex 413	. . . . . . . . . 10 ⊢ (𝐵 ∈ On → (𝐴 = ∅ → ¬ 𝑚 ∈ (𝐴 ·o 𝐵)))
43	42	necon2ad 2958	. . . . . . . . 9 ⊢ (𝐵 ∈ On → (𝑚 ∈ (𝐴 ·o 𝐵) → 𝐴 ≠ ∅))
44	43	adantl 482	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝑚 ∈ (𝐴 ·o 𝐵) → 𝐴 ≠ ∅))
45	44	imp 407	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝐴 ≠ ∅)
46		omeu 8532	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ 𝑚 ∈ On ∧ 𝐴 ≠ ∅) → ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
47	32, 35, 45, 46	syl3anc 1371	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
48		vex 3449	. . . . . . . . 9 ⊢ 𝑚 ∈ V
49		vex 3449	. . . . . . . . 9 ⊢ 𝑛 ∈ V
50	48, 49	brcnv 5838	. . . . . . . 8 ⊢ (𝑚◡𝐹𝑛 ↔ 𝑛𝐹𝑚)
51		eleq1 2825	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) → (𝑚 ∈ (𝐴 ·o 𝐵) ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)))
52	51	biimpac 479	. . . . . . . . . . . . . . . 16 ⊢ ((𝑚 ∈ (𝐴 ·o 𝐵) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
53	6	ex 413	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝐵 ∈ On → (𝑥 ∈ 𝐵 → 𝑥 ∈ On))
54	53	ad2antlr 725	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ 𝐵 → 𝑥 ∈ On))
55		simplll 773	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝐴 ∈ On)
56		simpr 485	. . . . . . . . . . . . . . . . . . . . . . . 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 776	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑦 ∈ 𝐴)
59	55, 58, 16	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑦 ∈ On)
60		oaword1 8499	. . . . . . . . . . . . . . . . . . . . . . 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 775	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
63	33	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝐵) ∈ On)
64		ontr2 6364	. . . . . . . . . . . . . . . . . . . . . . 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 697	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵))
67		simpllr 774	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝐵 ∈ On)
68	62	ne0d 4295	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝐵) ≠ ∅)
69		on0eln0 6373	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐴 ·o 𝐵) ∈ On → (∅ ∈ (𝐴 ·o 𝐵) ↔ (𝐴 ·o 𝐵) ≠ ∅))
70	63, 69	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (𝐴 ·o 𝐵) ≠ ∅))
71	68, 70	mpbird 256	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ∅ ∈ (𝐴 ·o 𝐵))
72		om00el 8523	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵)))
73	72	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵)))
74	71, 73	mpbid 231	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵))
75	74	simpld 495	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ∅ ∈ 𝐴)
76		omord2 8514	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑥 ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (𝑥 ∈ 𝐵 ↔ (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
77	56, 67, 55, 75, 76	syl31anc 1373	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝑥 ∈ 𝐵 ↔ (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
78	66, 77	mpbird 256	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑥 ∈ 𝐵)
79	78	ex 413	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ On → 𝑥 ∈ 𝐵))
80	54, 79	impbid 211	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ 𝐵 ↔ 𝑥 ∈ On))
81	80	expr 457	. . . . . . . . . . . . . . . . 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 457	. . . . . . . . . . . . . 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 286	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
89	88	anbi2d 629	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
90		an12 643	. . . . . . . . . . 11 ⊢ ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
91	89, 90	bitrdi 286	. . . . . . . . . 10 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
92	91	2exbidv 1927	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ ∃𝑥∃𝑦((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
93		df-mpo 7362	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦)) = {⟨⟨𝑥, 𝑦⟩, 𝑚⟩ ∣ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))}
94		dfoprab2 7415	. . . . . . . . . . . 12 ⊢ {⟨⟨𝑥, 𝑦⟩, 𝑚⟩ ∣ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))} = {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}
95	28, 93, 94	3eqtri 2768	. . . . . . . . . . 11 ⊢ 𝐹 = {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}
96	95	breqi 5111	. . . . . . . . . 10 ⊢ (𝑛𝐹𝑚 ↔ 𝑛{⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}𝑚)
97		df-br 5106	. . . . . . . . . 10 ⊢ (𝑛{⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}𝑚 ↔ ⟨𝑛, 𝑚⟩ ∈ {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))})
98		opabidw 5481	. . . . . . . . . 10 ⊢ (⟨𝑛, 𝑚⟩ ∈ {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))} ↔ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
99	96, 97, 98	3bitri 296	. . . . . . . . 9 ⊢ (𝑛𝐹𝑚 ↔ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
100		r2ex 3192	. . . . . . . . 9 ⊢ (∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚) ↔ ∃𝑥∃𝑦((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
101	92, 99, 100	3bitr4g 313	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑛𝐹𝑚 ↔ ∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
102	50, 101	bitrid 282	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑚◡𝐹𝑛 ↔ ∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
103	102	eubidv 2584	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (∃!𝑛 𝑚◡𝐹𝑛 ↔ ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
104	47, 103	mpbird 256	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ∃!𝑛 𝑚◡𝐹𝑛)
105	104	ralrimiva 3143	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∀𝑚 ∈ (𝐴 ·o 𝐵)∃!𝑛 𝑚◡𝐹𝑛)
106		fnres 6628	. . . 4 ⊢ ((◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵) ↔ ∀𝑚 ∈ (𝐴 ·o 𝐵)∃!𝑛 𝑚◡𝐹𝑛)
107	105, 106	sylibr 233	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵))
108		relcnv 6056	. . . . 5 ⊢ Rel ◡𝐹
109		df-rn 5644	. . . . . 6 ⊢ ran 𝐹 = dom ◡𝐹
110	30	frnd 6676	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ran 𝐹 ⊆ (𝐴 ·o 𝐵))
111	109, 110	eqsstrrid 3993	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → dom ◡𝐹 ⊆ (𝐴 ·o 𝐵))
112		relssres 5978	. . . . 5 ⊢ ((Rel ◡𝐹 ∧ dom ◡𝐹 ⊆ (𝐴 ·o 𝐵)) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) = ◡𝐹)
113	108, 111, 112	sylancr 587	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) = ◡𝐹)
114	113	fneq1d 6595	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵) ↔ ◡𝐹 Fn (𝐴 ·o 𝐵)))
115	107, 114	mpbid 231	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ◡𝐹 Fn (𝐴 ·o 𝐵))
116		dff1o4 6792	. 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 205   ∧ wa 396   = wceq 1541  ∃wex 1781   ∈ wcel 2106  ∃!weu 2566   ≠ wne 2943  ∀wral 3064  ∃wrex 3073   ⊆ wss 3910  ∅c0 4282  ⟨cop 4592   class class class wbr 5105  {copab 5167   × cxp 5631  ^◡ccnv 5632  dom cdm 5633  ran crn 5634   ↾ cres 5635  Rel wrel 5638  Ord word 6316  Oncon0 6317  suc csuc 6319   Fn wfn 6491  ⟶wf 6492  –1-1-onto→wf1o 6495  (class class class)co 7357  {coprab 7358   ∈ cmpo 7359   +_o coa 8409   ·_o comu 8410

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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pr 5384  ax-un 7672

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-ral 3065  df-rex 3074  df-rmo 3353  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-pss 3929  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-int 4908  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-tr 5223  df-id 5531  df-eprel 5537  df-po 5545  df-so 5546  df-fr 5588  df-we 5590  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-pred 6253  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-ov 7360  df-oprab 7361  df-mpo 7362  df-om 7803  df-1st 7921  df-2nd 7922  df-frecs 8212  df-wrecs 8243  df-recs 8317  df-rdg 8356  df-1o 8412  df-oadd 8416  df-omul 8417

This theorem is referenced by:  omxpen  9018  omf1o  9019  infxpenc  9954