Theorem mapxpen 8667

Description: Equinumerosity law for double set exponentiation. Proposition 10.45 of [TakeutiZaring] p. 96. (Contributed by NM, 21-Feb-2004.) (Revised by Mario Carneiro, 24-Jun-2015.)

Assertion

Ref	Expression
mapxpen	⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → ((𝐴 ↑m 𝐵) ↑m 𝐶) ≈ (𝐴 ↑m (𝐵 × 𝐶)))

Proof of Theorem mapxpen

Dummy variables 𝑓 𝑔 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ovexd 7170	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → ((𝐴 ↑m 𝐵) ↑m 𝐶) ∈ V)
2		ovexd 7170	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → (𝐴 ↑m (𝐵 × 𝐶)) ∈ V)
3		elmapi 8411	. . . . . . . . . 10 ⊢ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) → 𝑓:𝐶⟶(𝐴 ↑m 𝐵))
4	3	ffvelrnda 6828	. . . . . . . . 9 ⊢ ((𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑦 ∈ 𝐶) → (𝑓‘𝑦) ∈ (𝐴 ↑m 𝐵))
5		elmapi 8411	. . . . . . . . 9 ⊢ ((𝑓‘𝑦) ∈ (𝐴 ↑m 𝐵) → (𝑓‘𝑦):𝐵⟶𝐴)
6	4, 5	syl 17	. . . . . . . 8 ⊢ ((𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑦 ∈ 𝐶) → (𝑓‘𝑦):𝐵⟶𝐴)
7	6	ffvelrnda 6828	. . . . . . 7 ⊢ (((𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑦 ∈ 𝐶) ∧ 𝑥 ∈ 𝐵) → ((𝑓‘𝑦)‘𝑥) ∈ 𝐴)
8	7	an32s 651	. . . . . 6 ⊢ (((𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑥 ∈ 𝐵) ∧ 𝑦 ∈ 𝐶) → ((𝑓‘𝑦)‘𝑥) ∈ 𝐴)
9	8	ralrimiva 3149	. . . . 5 ⊢ ((𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑥 ∈ 𝐵) → ∀𝑦 ∈ 𝐶 ((𝑓‘𝑦)‘𝑥) ∈ 𝐴)
10	9	ralrimiva 3149	. . . 4 ⊢ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐶 ((𝑓‘𝑦)‘𝑥) ∈ 𝐴)
11		eqid 2798	. . . . 5 ⊢ (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))
12	11	fmpo 7748	. . . 4 ⊢ (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐶 ((𝑓‘𝑦)‘𝑥) ∈ 𝐴 ↔ (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)):(𝐵 × 𝐶)⟶𝐴)
13	10, 12	sylib 221	. . 3 ⊢ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) → (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)):(𝐵 × 𝐶)⟶𝐴)
14		simp1 1133	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → 𝐴 ∈ 𝑉)
15		xpexg 7453	. . . . 5 ⊢ ((𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → (𝐵 × 𝐶) ∈ V)
16	15	3adant1 1127	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → (𝐵 × 𝐶) ∈ V)
17		elmapg 8402	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝐵 × 𝐶) ∈ V) → ((𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) ∈ (𝐴 ↑m (𝐵 × 𝐶)) ↔ (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)):(𝐵 × 𝐶)⟶𝐴))
18	14, 16, 17	syl2anc 587	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → ((𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) ∈ (𝐴 ↑m (𝐵 × 𝐶)) ↔ (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)):(𝐵 × 𝐶)⟶𝐴))
19	13, 18	syl5ibr 249	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) → (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) ∈ (𝐴 ↑m (𝐵 × 𝐶))))
20		elmapi 8411	. . . . . . . . 9 ⊢ (𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)) → 𝑔:(𝐵 × 𝐶)⟶𝐴)
21	20	adantl 485	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶))) → 𝑔:(𝐵 × 𝐶)⟶𝐴)
22		fovrn 7298	. . . . . . . . . 10 ⊢ ((𝑔:(𝐵 × 𝐶)⟶𝐴 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → (𝑥𝑔𝑦) ∈ 𝐴)
23	22	3expa 1115	. . . . . . . . 9 ⊢ (((𝑔:(𝐵 × 𝐶)⟶𝐴 ∧ 𝑥 ∈ 𝐵) ∧ 𝑦 ∈ 𝐶) → (𝑥𝑔𝑦) ∈ 𝐴)
24	23	an32s 651	. . . . . . . 8 ⊢ (((𝑔:(𝐵 × 𝐶)⟶𝐴 ∧ 𝑦 ∈ 𝐶) ∧ 𝑥 ∈ 𝐵) → (𝑥𝑔𝑦) ∈ 𝐴)
25	21, 24	sylanl1 679	. . . . . . 7 ⊢ (((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶))) ∧ 𝑦 ∈ 𝐶) ∧ 𝑥 ∈ 𝐵) → (𝑥𝑔𝑦) ∈ 𝐴)
26	25	fmpttd 6856	. . . . . 6 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶))) ∧ 𝑦 ∈ 𝐶) → (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)):𝐵⟶𝐴)
27		elmapg 8402	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → ((𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) ∈ (𝐴 ↑m 𝐵) ↔ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)):𝐵⟶𝐴))
28	27	3adant3 1129	. . . . . . 7 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → ((𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) ∈ (𝐴 ↑m 𝐵) ↔ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)):𝐵⟶𝐴))
29	28	ad2antrr 725	. . . . . 6 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶))) ∧ 𝑦 ∈ 𝐶) → ((𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) ∈ (𝐴 ↑m 𝐵) ↔ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)):𝐵⟶𝐴))
30	26, 29	mpbird 260	. . . . 5 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶))) ∧ 𝑦 ∈ 𝐶) → (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) ∈ (𝐴 ↑m 𝐵))
31	30	fmpttd 6856	. . . 4 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶))) → (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))):𝐶⟶(𝐴 ↑m 𝐵))
32	31	ex 416	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → (𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)) → (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))):𝐶⟶(𝐴 ↑m 𝐵)))
33		ovex 7168	. . . 4 ⊢ (𝐴 ↑m 𝐵) ∈ V
34		simp3 1135	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → 𝐶 ∈ 𝑋)
35		elmapg 8402	. . . 4 ⊢ (((𝐴 ↑m 𝐵) ∈ V ∧ 𝐶 ∈ 𝑋) → ((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ↔ (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))):𝐶⟶(𝐴 ↑m 𝐵)))
36	33, 34, 35	sylancr 590	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → ((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ↔ (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))):𝐶⟶(𝐴 ↑m 𝐵)))
37	32, 36	sylibrd 262	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → (𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)) → (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶)))
38		elmapfn 8412	. . . . . . . 8 ⊢ (𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)) → 𝑔 Fn (𝐵 × 𝐶))
39	38	ad2antll 728	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → 𝑔 Fn (𝐵 × 𝐶))
40		fnov 7261	. . . . . . 7 ⊢ (𝑔 Fn (𝐵 × 𝐶) ↔ 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ (𝑥𝑔𝑦)))
41	39, 40	sylib 221	. . . . . 6 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ (𝑥𝑔𝑦)))
42		simp3 1135	. . . . . . . . . 10 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → 𝑦 ∈ 𝐶)
43	26	adantlrl 719	. . . . . . . . . . . 12 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑦 ∈ 𝐶) → (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)):𝐵⟶𝐴)
44	43	3adant2 1128	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)):𝐵⟶𝐴)
45		simp1l2 1264	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → 𝐵 ∈ 𝑊)
46		simp1l1 1263	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → 𝐴 ∈ 𝑉)
47		fex2 7620	. . . . . . . . . . 11 ⊢ (((𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)):𝐵⟶𝐴 ∧ 𝐵 ∈ 𝑊 ∧ 𝐴 ∈ 𝑉) → (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) ∈ V)
48	44, 45, 46, 47	syl3anc 1368	. . . . . . . . . 10 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) ∈ V)
49		eqid 2798	. . . . . . . . . . 11 ⊢ (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))
50	49	fvmpt2 6756	. . . . . . . . . 10 ⊢ ((𝑦 ∈ 𝐶 ∧ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) ∈ V) → ((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦) = (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))
51	42, 48, 50	syl2anc 587	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → ((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦) = (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))
52	51	fveq1d 6647	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥) = ((𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))‘𝑥))
53		simp2 1134	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → 𝑥 ∈ 𝐵)
54		ovex 7168	. . . . . . . . 9 ⊢ (𝑥𝑔𝑦) ∈ V
55		eqid 2798	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) = (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))
56	55	fvmpt2 6756	. . . . . . . . 9 ⊢ ((𝑥 ∈ 𝐵 ∧ (𝑥𝑔𝑦) ∈ V) → ((𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))‘𝑥) = (𝑥𝑔𝑦))
57	53, 54, 56	sylancl 589	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → ((𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))‘𝑥) = (𝑥𝑔𝑦))
58	52, 57	eqtrd 2833	. . . . . . 7 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥) = (𝑥𝑔𝑦))
59	58	mpoeq3dva 7210	. . . . . 6 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥)) = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ (𝑥𝑔𝑦)))
60	41, 59	eqtr4d 2836	. . . . 5 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥)))
61		eqid 2798	. . . . . . 7 ⊢ 𝐵 = 𝐵
62		nfcv 2955	. . . . . . . . . 10 ⊢ Ⅎ𝑥𝐶
63		nfmpt1 5128	. . . . . . . . . 10 ⊢ Ⅎ𝑥(𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))
64	62, 63	nfmpt 5127	. . . . . . . . 9 ⊢ Ⅎ𝑥(𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))
65	64	nfeq2 2972	. . . . . . . 8 ⊢ Ⅎ𝑥 𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))
66		nfmpt1 5128	. . . . . . . . . . . 12 ⊢ Ⅎ𝑦(𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))
67	66	nfeq2 2972	. . . . . . . . . . 11 ⊢ Ⅎ𝑦 𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))
68		fveq1 6644	. . . . . . . . . . . . 13 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → (𝑓‘𝑦) = ((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦))
69	68	fveq1d 6647	. . . . . . . . . . . 12 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → ((𝑓‘𝑦)‘𝑥) = (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥))
70	69	a1d 25	. . . . . . . . . . 11 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → (𝑦 ∈ 𝐶 → ((𝑓‘𝑦)‘𝑥) = (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥)))
71	67, 70	ralrimi 3180	. . . . . . . . . 10 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → ∀𝑦 ∈ 𝐶 ((𝑓‘𝑦)‘𝑥) = (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥))
72		eqid 2798	. . . . . . . . . 10 ⊢ 𝐶 = 𝐶
73	71, 72	jctil 523	. . . . . . . . 9 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → (𝐶 = 𝐶 ∧ ∀𝑦 ∈ 𝐶 ((𝑓‘𝑦)‘𝑥) = (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥)))
74	73	a1d 25	. . . . . . . 8 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → (𝑥 ∈ 𝐵 → (𝐶 = 𝐶 ∧ ∀𝑦 ∈ 𝐶 ((𝑓‘𝑦)‘𝑥) = (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥))))
75	65, 74	ralrimi 3180	. . . . . . 7 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → ∀𝑥 ∈ 𝐵 (𝐶 = 𝐶 ∧ ∀𝑦 ∈ 𝐶 ((𝑓‘𝑦)‘𝑥) = (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥)))
76		mpoeq123 7205	. . . . . . 7 ⊢ ((𝐵 = 𝐵 ∧ ∀𝑥 ∈ 𝐵 (𝐶 = 𝐶 ∧ ∀𝑦 ∈ 𝐶 ((𝑓‘𝑦)‘𝑥) = (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥))) → (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥)))
77	61, 75, 76	sylancr 590	. . . . . 6 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥)))
78	77	eqeq2d 2809	. . . . 5 ⊢ (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) ↔ 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ (((𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))‘𝑦)‘𝑥))))
79	60, 78	syl5ibrcom 250	. . . 4 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) → 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))))
80	3	ad2antrl 727	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → 𝑓:𝐶⟶(𝐴 ↑m 𝐵))
81	80	feqmptd 6708	. . . . . 6 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → 𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑓‘𝑦)))
82		simprl 770	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → 𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶))
83	82, 6	sylan 583	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑦 ∈ 𝐶) → (𝑓‘𝑦):𝐵⟶𝐴)
84	83	feqmptd 6708	. . . . . . 7 ⊢ ((((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) ∧ 𝑦 ∈ 𝐶) → (𝑓‘𝑦) = (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥)))
85	84	mpteq2dva 5125	. . . . . 6 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → (𝑦 ∈ 𝐶 ↦ (𝑓‘𝑦)) = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥))))
86	81, 85	eqtrd 2833	. . . . 5 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → 𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥))))
87		nfmpo2 7214	. . . . . . . . 9 ⊢ Ⅎ𝑦(𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))
88	87	nfeq2 2972	. . . . . . . 8 ⊢ Ⅎ𝑦 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))
89		eqidd 2799	. . . . . . . . 9 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → 𝐵 = 𝐵)
90		nfmpo1 7213	. . . . . . . . . . 11 ⊢ Ⅎ𝑥(𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))
91	90	nfeq2 2972	. . . . . . . . . 10 ⊢ Ⅎ𝑥 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))
92		nfv 1915	. . . . . . . . . 10 ⊢ Ⅎ𝑥 𝑦 ∈ 𝐶
93		fvex 6658	. . . . . . . . . . . . 13 ⊢ ((𝑓‘𝑦)‘𝑥) ∈ V
94	11	ovmpt4g 7276	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶 ∧ ((𝑓‘𝑦)‘𝑥) ∈ V) → (𝑥(𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))𝑦) = ((𝑓‘𝑦)‘𝑥))
95	93, 94	mp3an3 1447	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → (𝑥(𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))𝑦) = ((𝑓‘𝑦)‘𝑥))
96		oveq 7141	. . . . . . . . . . . . 13 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → (𝑥𝑔𝑦) = (𝑥(𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))𝑦))
97	96	eqeq1d 2800	. . . . . . . . . . . 12 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → ((𝑥𝑔𝑦) = ((𝑓‘𝑦)‘𝑥) ↔ (𝑥(𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))𝑦) = ((𝑓‘𝑦)‘𝑥)))
98	95, 97	syl5ibr 249	. . . . . . . . . . 11 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → ((𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐶) → (𝑥𝑔𝑦) = ((𝑓‘𝑦)‘𝑥)))
99	98	expcomd 420	. . . . . . . . . 10 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → (𝑦 ∈ 𝐶 → (𝑥 ∈ 𝐵 → (𝑥𝑔𝑦) = ((𝑓‘𝑦)‘𝑥))))
100	91, 92, 99	ralrimd 3182	. . . . . . . . 9 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → (𝑦 ∈ 𝐶 → ∀𝑥 ∈ 𝐵 (𝑥𝑔𝑦) = ((𝑓‘𝑦)‘𝑥)))
101		mpteq12 5117	. . . . . . . . 9 ⊢ ((𝐵 = 𝐵 ∧ ∀𝑥 ∈ 𝐵 (𝑥𝑔𝑦) = ((𝑓‘𝑦)‘𝑥)) → (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) = (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥)))
102	89, 100, 101	syl6an 683	. . . . . . . 8 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → (𝑦 ∈ 𝐶 → (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) = (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥))))
103	88, 102	ralrimi 3180	. . . . . . 7 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → ∀𝑦 ∈ 𝐶 (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) = (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥)))
104		mpteq12 5117	. . . . . . 7 ⊢ ((𝐶 = 𝐶 ∧ ∀𝑦 ∈ 𝐶 (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)) = (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥))) → (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥))))
105	72, 103, 104	sylancr 590	. . . . . 6 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥))))
106	105	eqeq2d 2809	. . . . 5 ⊢ (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) ↔ 𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ ((𝑓‘𝑦)‘𝑥)))))
107	86, 106	syl5ibrcom 250	. . . 4 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → (𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)) → 𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦)))))
108	79, 107	impbid 215	. . 3 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) ∧ (𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶)))) → (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) ↔ 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥))))
109	108	ex 416	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → ((𝑓 ∈ ((𝐴 ↑m 𝐵) ↑m 𝐶) ∧ 𝑔 ∈ (𝐴 ↑m (𝐵 × 𝐶))) → (𝑓 = (𝑦 ∈ 𝐶 ↦ (𝑥 ∈ 𝐵 ↦ (𝑥𝑔𝑦))) ↔ 𝑔 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐶 ↦ ((𝑓‘𝑦)‘𝑥)))))
110	1, 2, 19, 37, 109	en3d 8529	1 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊 ∧ 𝐶 ∈ 𝑋) → ((𝐴 ↑m 𝐵) ↑m 𝐶) ≈ (𝐴 ↑m (𝐵 × 𝐶)))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 399   ∧ w3a 1084   = wceq 1538   ∈ wcel 2111  ∀wral 3106  Vcvv 3441   class class class wbr 5030   ↦ cmpt 5110   × cxp 5517   Fn wfn 6319  ⟶wf 6320  ‘cfv 6324  (class class class)co 7135   ∈ cmpo 7137   ↑_m cmap 8389   ≈ cen 8489

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-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-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-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-op 4532  df-uni 4801  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-id 5425  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-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-1st 7671  df-2nd 7672  df-map 8391  df-en 8493

This theorem is referenced by:  mappwen  9523  cfpwsdom  9995  rpnnen  15572  rexpen  15573  enrelmap  40698