Theorem omxpenlem 9077

Description: Lemma for omxpen 9078. (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 6374	. . . . . . . . 9 ⊢ (𝐵 ∈ On → Ord 𝐵)
2	1	ad2antlr 724	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → Ord 𝐵)
3		simprl 768	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑥 ∈ 𝐵)
4		ordsucss 7810	. . . . . . . 8 ⊢ (Ord 𝐵 → (𝑥 ∈ 𝐵 → suc 𝑥 ⊆ 𝐵))
5	2, 3, 4	sylc 65	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → suc 𝑥 ⊆ 𝐵)
6		onelon 6389	. . . . . . . . . 10 ⊢ ((𝐵 ∈ On ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ On)
7	6	ad2ant2lr 745	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑥 ∈ On)
8		onsuc 7803	. . . . . . . . 9 ⊢ (𝑥 ∈ On → suc 𝑥 ∈ On)
9	7, 8	syl 17	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → suc 𝑥 ∈ On)
10		simplr 766	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝐵 ∈ On)
11		simpll 764	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝐴 ∈ On)
12		omwordi 8575	. . . . . . . 8 ⊢ ((suc 𝑥 ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) → (suc 𝑥 ⊆ 𝐵 → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵)))
13	9, 10, 11, 12	syl3anc 1370	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (suc 𝑥 ⊆ 𝐵 → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵)))
14	5, 13	mpd 15	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o suc 𝑥) ⊆ (𝐴 ·o 𝐵))
15		simprr 770	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑦 ∈ 𝐴)
16		onelon 6389	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ On)
17	16	ad2ant2rl 746	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → 𝑦 ∈ On)
18		omcl 8540	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ On)
19	11, 7, 18	syl2anc 583	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o 𝑥) ∈ On)
20		oaord 8551	. . . . . . . . 9 ⊢ ((𝑦 ∈ On ∧ 𝐴 ∈ On ∧ (𝐴 ·o 𝑥) ∈ On) → (𝑦 ∈ 𝐴 ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴)))
21	17, 11, 19, 20	syl3anc 1370	. . . . . . . 8 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝑦 ∈ 𝐴 ↔ ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴)))
22	15, 21	mpbid 231	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ ((𝐴 ·o 𝑥) +o 𝐴))
23		omsuc 8530	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝑥 ∈ On) → (𝐴 ·o suc 𝑥) = ((𝐴 ·o 𝑥) +o 𝐴))
24	11, 7, 23	syl2anc 583	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → (𝐴 ·o suc 𝑥) = ((𝐴 ·o 𝑥) +o 𝐴))
25	22, 24	eleqtrrd 2835	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o suc 𝑥))
26	14, 25	sseldd 3983	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴)) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
27	26	ralrimivva 3199	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐴 ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
28		omxpenlem.1	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦))
29	28	fmpo 8058	. . . 4 ⊢ (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐴 ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ↔ 𝐹:(𝐵 × 𝐴)⟶(𝐴 ·o 𝐵))
30	27, 29	sylib 217	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹:(𝐵 × 𝐴)⟶(𝐴 ·o 𝐵))
31	30	ffnd 6718	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹 Fn (𝐵 × 𝐴))
32		simpll 764	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝐴 ∈ On)
33		omcl 8540	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 ·o 𝐵) ∈ On)
34		onelon 6389	. . . . . . . 8 ⊢ (((𝐴 ·o 𝐵) ∈ On ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝑚 ∈ On)
35	33, 34	sylan 579	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝑚 ∈ On)
36		noel 4330	. . . . . . . . . . . 12 ⊢ ¬ 𝑚 ∈ ∅
37		oveq1 7419	. . . . . . . . . . . . . 14 ⊢ (𝐴 = ∅ → (𝐴 ·o 𝐵) = (∅ ·o 𝐵))
38		om0r 8543	. . . . . . . . . . . . . 14 ⊢ (𝐵 ∈ On → (∅ ·o 𝐵) = ∅)
39	37, 38	sylan9eqr 2793	. . . . . . . . . . . . 13 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝐴 ·o 𝐵) = ∅)
40	39	eleq2d 2818	. . . . . . . . . . . 12 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝑚 ∈ (𝐴 ·o 𝐵) ↔ 𝑚 ∈ ∅))
41	36, 40	mtbiri 327	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → ¬ 𝑚 ∈ (𝐴 ·o 𝐵))
42	41	ex 412	. . . . . . . . . 10 ⊢ (𝐵 ∈ On → (𝐴 = ∅ → ¬ 𝑚 ∈ (𝐴 ·o 𝐵)))
43	42	necon2ad 2954	. . . . . . . . 9 ⊢ (𝐵 ∈ On → (𝑚 ∈ (𝐴 ·o 𝐵) → 𝐴 ≠ ∅))
44	43	adantl 481	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝑚 ∈ (𝐴 ·o 𝐵) → 𝐴 ≠ ∅))
45	44	imp 406	. . . . . . 7 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → 𝐴 ≠ ∅)
46		omeu 8589	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ 𝑚 ∈ On ∧ 𝐴 ≠ ∅) → ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
47	32, 35, 45, 46	syl3anc 1370	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
48		vex 3477	. . . . . . . . 9 ⊢ 𝑚 ∈ V
49		vex 3477	. . . . . . . . 9 ⊢ 𝑛 ∈ V
50	48, 49	brcnv 5882	. . . . . . . 8 ⊢ (𝑚◡𝐹𝑛 ↔ 𝑛𝐹𝑚)
51		eleq1 2820	. . . . . . . . . . . . . . . . 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 724	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ 𝐵 → 𝑥 ∈ On))
55		simplll 772	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝐴 ∈ On)
56		simpr 484	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑥 ∈ On)
57	55, 56, 18	syl2anc 583	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ On)
58		simplrr 775	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑦 ∈ 𝐴)
59	55, 58, 16	syl2anc 583	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝑦 ∈ On)
60		oaword1 8556	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐴 ·o 𝑥) ∈ On ∧ 𝑦 ∈ On) → (𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦))
61	57, 59, 60	syl2anc 583	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦))
62		simplrl 774	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵))
63	33	ad2antrr 723	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝐵) ∈ On)
64		ontr2 6411	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐴 ·o 𝑥) ∈ On ∧ (𝐴 ·o 𝐵) ∈ On) → (((𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
65	57, 63, 64	syl2anc 583	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (((𝐴 ·o 𝑥) ⊆ ((𝐴 ·o 𝑥) +o 𝑦) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
66	61, 62, 65	mp2and 696	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵))
67		simpllr 773	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → 𝐵 ∈ On)
68	62	ne0d 4335	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (𝐴 ·o 𝐵) ≠ ∅)
69		on0eln0 6420	. . . . . . . . . . . . . . . . . . . . . . . . . 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 8580	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵)))
73	72	ad2antrr 723	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ (𝐴 ·o 𝐵) ↔ (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵)))
74	71, 73	mpbid 231	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → (∅ ∈ 𝐴 ∧ ∅ ∈ 𝐵))
75	74	simpld 494	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) ∧ 𝑥 ∈ On) → ∅ ∈ 𝐴)
76		omord2 8571	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑥 ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (𝑥 ∈ 𝐵 ↔ (𝐴 ·o 𝑥) ∈ (𝐴 ·o 𝐵)))
77	56, 67, 55, 75, 76	syl31anc 1372	. . . . . . . . . . . . . . . . . . . . 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 211	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵) ∧ 𝑦 ∈ 𝐴)) → (𝑥 ∈ 𝐵 ↔ 𝑥 ∈ On))
81	80	expr 456	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → (𝑦 ∈ 𝐴 → (𝑥 ∈ 𝐵 ↔ 𝑥 ∈ On)))
82	81	pm5.32rd 577	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ ((𝐴 ·o 𝑥) +o 𝑦) ∈ (𝐴 ·o 𝐵)) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴)))
83	52, 82	sylan2 592	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑚 ∈ (𝐴 ·o 𝐵) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴)))
84	83	expr 456	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ On ∧ 𝑦 ∈ 𝐴))))
85	84	pm5.32rd 577	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
86		eqcom 2738	. . . . . . . . . . . . . 14 ⊢ (𝑚 = ((𝐴 ·o 𝑥) +o 𝑦) ↔ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)
87	86	anbi2i 622	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))
88	85, 87	bitrdi 287	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
89	88	anbi2d 628	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
90		an12 642	. . . . . . . . . . 11 ⊢ ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
91	89, 90	bitrdi 287	. . . . . . . . . 10 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ((𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
92	91	2exbidv 1926	. . . . . . . . 9 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))) ↔ ∃𝑥∃𝑦((𝑥 ∈ On ∧ 𝑦 ∈ 𝐴) ∧ (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚))))
93		df-mpo 7417	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐴 ↦ ((𝐴 ·o 𝑥) +o 𝑦)) = {⟨⟨𝑥, 𝑦⟩, 𝑚⟩ ∣ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))}
94		dfoprab2 7470	. . . . . . . . . . . 12 ⊢ {⟨⟨𝑥, 𝑦⟩, 𝑚⟩ ∣ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))} = {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}
95	28, 93, 94	3eqtri 2763	. . . . . . . . . . 11 ⊢ 𝐹 = {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}
96	95	breqi 5154	. . . . . . . . . 10 ⊢ (𝑛𝐹𝑚 ↔ 𝑛{⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}𝑚)
97		df-br 5149	. . . . . . . . . 10 ⊢ (𝑛{⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))}𝑚 ↔ ⟨𝑛, 𝑚⟩ ∈ {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))})
98		opabidw 5524	. . . . . . . . . 10 ⊢ (⟨𝑛, 𝑚⟩ ∈ {⟨𝑛, 𝑚⟩ ∣ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦)))} ↔ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
99	96, 97, 98	3bitri 297	. . . . . . . . 9 ⊢ (𝑛𝐹𝑚 ↔ ∃𝑥∃𝑦(𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐴) ∧ 𝑚 = ((𝐴 ·o 𝑥) +o 𝑦))))
100		r2ex 3194	. . . . . . . . 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 2579	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → (∃!𝑛 𝑚◡𝐹𝑛 ↔ ∃!𝑛∃𝑥 ∈ On ∃𝑦 ∈ 𝐴 (𝑛 = ⟨𝑥, 𝑦⟩ ∧ ((𝐴 ·o 𝑥) +o 𝑦) = 𝑚)))
104	47, 103	mpbird 257	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑚 ∈ (𝐴 ·o 𝐵)) → ∃!𝑛 𝑚◡𝐹𝑛)
105	104	ralrimiva 3145	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∀𝑚 ∈ (𝐴 ·o 𝐵)∃!𝑛 𝑚◡𝐹𝑛)
106		fnres 6677	. . . 4 ⊢ ((◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵) ↔ ∀𝑚 ∈ (𝐴 ·o 𝐵)∃!𝑛 𝑚◡𝐹𝑛)
107	105, 106	sylibr 233	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵))
108		relcnv 6103	. . . . 5 ⊢ Rel ◡𝐹
109		df-rn 5687	. . . . . 6 ⊢ ran 𝐹 = dom ◡𝐹
110	30	frnd 6725	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ran 𝐹 ⊆ (𝐴 ·o 𝐵))
111	109, 110	eqsstrrid 4031	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → dom ◡𝐹 ⊆ (𝐴 ·o 𝐵))
112		relssres 6022	. . . . 5 ⊢ ((Rel ◡𝐹 ∧ dom ◡𝐹 ⊆ (𝐴 ·o 𝐵)) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) = ◡𝐹)
113	108, 111, 112	sylancr 586	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (◡𝐹 ↾ (𝐴 ·o 𝐵)) = ◡𝐹)
114	113	fneq1d 6642	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((◡𝐹 ↾ (𝐴 ·o 𝐵)) Fn (𝐴 ·o 𝐵) ↔ ◡𝐹 Fn (𝐴 ·o 𝐵)))
115	107, 114	mpbid 231	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ◡𝐹 Fn (𝐴 ·o 𝐵))
116		dff1o4 6841	. 2 ⊢ (𝐹:(𝐵 × 𝐴)–1-1-onto→(𝐴 ·o 𝐵) ↔ (𝐹 Fn (𝐵 × 𝐴) ∧ ◡𝐹 Fn (𝐴 ·o 𝐵)))
117	31, 115, 116	sylanbrc 582	1 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐹:(𝐵 × 𝐴)–1-1-onto→(𝐴 ·o 𝐵))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 395   = wceq 1540  ∃wex 1780   ∈ wcel 2105  ∃!weu 2561   ≠ wne 2939  ∀wral 3060  ∃wrex 3069   ⊆ wss 3948  ∅c0 4322  ⟨cop 4634   class class class wbr 5148  {copab 5210   × cxp 5674  ^◡ccnv 5675  dom cdm 5676  ran crn 5677   ↾ cres 5678  Rel wrel 5681  Ord word 6363  Oncon0 6364  suc csuc 6366   Fn wfn 6538  ⟶wf 6539  –1-1-onto→wf1o 6542  (class class class)co 7412  {coprab 7413   ∈ cmpo 7414   +_o coa 8467   ·_o comu 8468

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 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pr 5427  ax-un 7729

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7860  df-1st 7979  df-2nd 7980  df-frecs 8270  df-wrecs 8301  df-recs 8375  df-rdg 8414  df-1o 8470  df-oadd 8474  df-omul 8475

This theorem is referenced by:  omxpen  9078  omf1o  9079  infxpenc  10017