fprodmul - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > fprodmul		GIF version

Theorem fprodmul 11946

Description: The product of two finite products. (Contributed by Scott Fenton, 14-Dec-2017.)

**Hypotheses**
Ref	Expression
fprodmul.1	⊢ (𝜑 → 𝐴 ∈ Fin)
fprodmul.2	⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ)
fprodmul.3	⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ ℂ)

**Assertion**
Ref	Expression
fprodmul	⊢ (𝜑 → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶))

Distinct variable groups: 𝐴,𝑘 𝜑,𝑘 Allowed substitution hints: 𝐵(𝑘) 𝐶(𝑘)

Proof of Theorem fprodmul Dummy variables 𝑝 𝑓 𝑚 𝑛 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		1t1e1 9196	. . . . 5 ⊢ (1 · 1) = 1
2		prod0 11940	. . . . . 6 ⊢ ∏𝑘 ∈ ∅ 𝐵 = 1
3		prod0 11940	. . . . . 6 ⊢ ∏𝑘 ∈ ∅ 𝐶 = 1
4	2, 3	oveq12i 5963	. . . . 5 ⊢ (∏𝑘 ∈ ∅ 𝐵 · ∏𝑘 ∈ ∅ 𝐶) = (1 · 1)
5		prod0 11940	. . . . 5 ⊢ ∏𝑘 ∈ ∅ (𝐵 · 𝐶) = 1
6	1, 4, 5	3eqtr4ri 2238	. . . 4 ⊢ ∏𝑘 ∈ ∅ (𝐵 · 𝐶) = (∏𝑘 ∈ ∅ 𝐵 · ∏𝑘 ∈ ∅ 𝐶)
7		prodeq1 11908	. . . 4 ⊢ (𝐴 = ∅ → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = ∏𝑘 ∈ ∅ (𝐵 · 𝐶))
8		prodeq1 11908	. . . . 5 ⊢ (𝐴 = ∅ → ∏𝑘 ∈ 𝐴 𝐵 = ∏𝑘 ∈ ∅ 𝐵)
9		prodeq1 11908	. . . . 5 ⊢ (𝐴 = ∅ → ∏𝑘 ∈ 𝐴 𝐶 = ∏𝑘 ∈ ∅ 𝐶)
10	8, 9	oveq12d 5969	. . . 4 ⊢ (𝐴 = ∅ → (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶) = (∏𝑘 ∈ ∅ 𝐵 · ∏𝑘 ∈ ∅ 𝐶))
11	6, 7, 10	3eqtr4a 2265	. . 3 ⊢ (𝐴 = ∅ → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶))
12	11	a1i 9	. 2 ⊢ (𝜑 → (𝐴 = ∅ → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶)))
13		simprl 529	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (♯‘𝐴) ∈ ℕ)
14		nnuz 9691	. . . . . . . . 9 ⊢ ℕ = (ℤ_≥‘1)
15	13, 14	eleqtrdi 2299	. . . . . . . 8 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (♯‘𝐴) ∈ (ℤ_≥‘1))
16		elnnuz 9692	. . . . . . . . . . . 12 ⊢ (𝑝 ∈ ℕ ↔ 𝑝 ∈ (ℤ_≥‘1))
17	16	biimpri 133	. . . . . . . . . . 11 ⊢ (𝑝 ∈ (ℤ_≥‘1) → 𝑝 ∈ ℕ)
18	17	adantl 277	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → 𝑝 ∈ ℕ)
19		fprodmul.2	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ)
20	19	fmpttd 5742	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ)
21	20	adantr 276	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ)
22		f1of 5529	. . . . . . . . . . . . . . 15 ⊢ (𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → 𝑓:(1...(♯‘𝐴))⟶𝐴)
23	22	ad2antll 491	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → 𝑓:(1...(♯‘𝐴))⟶𝐴)
24		fco 5447	. . . . . . . . . . . . . 14 ⊢ (((𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ ∧ 𝑓:(1...(♯‘𝐴))⟶𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
25	21, 23, 24	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
26	25	ad2antrr 488	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
27		simpr 110	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → 𝑝 ≤ (♯‘𝐴))
28		simplr 528	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → 𝑝 ∈ (ℤ_≥‘1))
29	13	ad2antrr 488	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (♯‘𝐴) ∈ ℕ)
30	29	nnzd 9501	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (♯‘𝐴) ∈ ℤ)
31		elfz5 10146	. . . . . . . . . . . . . 14 ⊢ ((𝑝 ∈ (ℤ_≥‘1) ∧ (♯‘𝐴) ∈ ℤ) → (𝑝 ∈ (1...(♯‘𝐴)) ↔ 𝑝 ≤ (♯‘𝐴)))
32	28, 30, 31	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (𝑝 ∈ (1...(♯‘𝐴)) ↔ 𝑝 ≤ (♯‘𝐴)))
33	27, 32	mpbird 167	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → 𝑝 ∈ (1...(♯‘𝐴)))
34	26, 33	ffvelcdmd 5723	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝) ∈ ℂ)
35		1cnd 8095	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ ¬ 𝑝 ≤ (♯‘𝐴)) → 1 ∈ ℂ)
36	18	nnzd 9501	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → 𝑝 ∈ ℤ)
37	13	adantr 276	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → (♯‘𝐴) ∈ ℕ)
38	37	nnzd 9501	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → (♯‘𝐴) ∈ ℤ)
39		zdcle 9456	. . . . . . . . . . . 12 ⊢ ((𝑝 ∈ ℤ ∧ (♯‘𝐴) ∈ ℤ) → DECID 𝑝 ≤ (♯‘𝐴))
40	36, 38, 39	syl2anc 411	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → DECID 𝑝 ≤ (♯‘𝐴))
41	34, 35, 40	ifcldadc 3601	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) ∈ ℂ)
42		breq1 4050	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑝 → (𝑛 ≤ (♯‘𝐴) ↔ 𝑝 ≤ (♯‘𝐴)))
43		fveq2 5583	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑝 → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) = (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝))
44	42, 43	ifbieq1d 3594	. . . . . . . . . . 11 ⊢ (𝑛 = 𝑝 → if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1))
45		eqid 2206	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1))
46	44, 45	fvmptg 5662	. . . . . . . . . 10 ⊢ ((𝑝 ∈ ℕ ∧ if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) ∈ ℂ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1))‘𝑝) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1))
47	18, 41, 46	syl2anc 411	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1))‘𝑝) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1))
48	47, 41	eqeltrd 2283	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1))‘𝑝) ∈ ℂ)
49		fprodmul.3	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ ℂ)
50	49	fmpttd 5742	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ 𝐶):𝐴⟶ℂ)
51	50	adantr 276	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝑘 ∈ 𝐴 ↦ 𝐶):𝐴⟶ℂ)
52		fco 5447	. . . . . . . . . . . . . 14 ⊢ (((𝑘 ∈ 𝐴 ↦ 𝐶):𝐴⟶ℂ ∧ 𝑓:(1...(♯‘𝐴))⟶𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
53	51, 23, 52	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → ((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
54	53	ad2antrr 488	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
55	54, 33	ffvelcdmd 5723	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝) ∈ ℂ)
56	55, 35, 40	ifcldadc 3601	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1) ∈ ℂ)
57		fveq2 5583	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑝 → (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛) = (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝))
58	42, 57	ifbieq1d 3594	. . . . . . . . . . 11 ⊢ (𝑛 = 𝑝 → if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1))
59		eqid 2206	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1))
60	58, 59	fvmptg 5662	. . . . . . . . . 10 ⊢ ((𝑝 ∈ ℕ ∧ if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1) ∈ ℂ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1))‘𝑝) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1))
61	18, 56, 60	syl2anc 411	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1))‘𝑝) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1))
62	61, 56	eqeltrd 2283	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1))‘𝑝) ∈ ℂ)
63	23	ad2antrr 488	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → 𝑓:(1...(♯‘𝐴))⟶𝐴)
64	63, 33	ffvelcdmd 5723	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (𝑓‘𝑝) ∈ 𝐴)
65		csbov12g 5991	. . . . . . . . . . . . . 14 ⊢ ((𝑓‘𝑝) ∈ 𝐴 → ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶) = (⦋(𝑓‘𝑝) / 𝑘⦌𝐵 · ⦋(𝑓‘𝑝) / 𝑘⦌𝐶))
66	64, 65	syl 14	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶) = (⦋(𝑓‘𝑝) / 𝑘⦌𝐵 · ⦋(𝑓‘𝑝) / 𝑘⦌𝐶))
67	19, 49	mulcld 8100	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐵 · 𝐶) ∈ ℂ)
68	67	ralrimiva 2580	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 (𝐵 · 𝐶) ∈ ℂ)
69	68	ad3antrrr 492	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ∀𝑘 ∈ 𝐴 (𝐵 · 𝐶) ∈ ℂ)
70		nfcsb1v 3127	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑘⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶)
71	70	nfel1 2360	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑘⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶) ∈ ℂ
72		csbeq1a 3103	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑓‘𝑝) → (𝐵 · 𝐶) = ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶))
73	72	eleq1d 2275	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑓‘𝑝) → ((𝐵 · 𝐶) ∈ ℂ ↔ ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶) ∈ ℂ))
74	71, 73	rspc 2872	. . . . . . . . . . . . . . 15 ⊢ ((𝑓‘𝑝) ∈ 𝐴 → (∀𝑘 ∈ 𝐴 (𝐵 · 𝐶) ∈ ℂ → ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶) ∈ ℂ))
75	64, 69, 74	sylc 62	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶) ∈ ℂ)
76		eqid 2206	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) = (𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))
77	76	fvmpts 5664	. . . . . . . . . . . . . 14 ⊢ (((𝑓‘𝑝) ∈ 𝐴 ∧ ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶) ∈ ℂ) → ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑝)) = ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶))
78	64, 75, 77	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑝)) = ⦋(𝑓‘𝑝) / 𝑘⦌(𝐵 · 𝐶))
79	19	ralrimiva 2580	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ)
80	79	ad3antrrr 492	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ)
81		nfcsb1v 3127	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑘⦋(𝑓‘𝑝) / 𝑘⦌𝐵
82	81	nfel1 2360	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑘⦋(𝑓‘𝑝) / 𝑘⦌𝐵 ∈ ℂ
83		csbeq1a 3103	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = (𝑓‘𝑝) → 𝐵 = ⦋(𝑓‘𝑝) / 𝑘⦌𝐵)
84	83	eleq1d 2275	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑓‘𝑝) → (𝐵 ∈ ℂ ↔ ⦋(𝑓‘𝑝) / 𝑘⦌𝐵 ∈ ℂ))
85	82, 84	rspc 2872	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓‘𝑝) ∈ 𝐴 → (∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ → ⦋(𝑓‘𝑝) / 𝑘⦌𝐵 ∈ ℂ))
86	64, 80, 85	sylc 62	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ⦋(𝑓‘𝑝) / 𝑘⦌𝐵 ∈ ℂ)
87		eqid 2206	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ 𝐴 ↦ 𝐵) = (𝑘 ∈ 𝐴 ↦ 𝐵)
88	87	fvmpts 5664	. . . . . . . . . . . . . . 15 ⊢ (((𝑓‘𝑝) ∈ 𝐴 ∧ ⦋(𝑓‘𝑝) / 𝑘⦌𝐵 ∈ ℂ) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑝)) = ⦋(𝑓‘𝑝) / 𝑘⦌𝐵)
89	64, 86, 88	syl2anc 411	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑝)) = ⦋(𝑓‘𝑝) / 𝑘⦌𝐵)
90	49	ralrimiva 2580	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝐶 ∈ ℂ)
91	90	ad3antrrr 492	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ∀𝑘 ∈ 𝐴 𝐶 ∈ ℂ)
92		nfcsb1v 3127	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑘⦋(𝑓‘𝑝) / 𝑘⦌𝐶
93	92	nfel1 2360	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑘⦋(𝑓‘𝑝) / 𝑘⦌𝐶 ∈ ℂ
94		csbeq1a 3103	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = (𝑓‘𝑝) → 𝐶 = ⦋(𝑓‘𝑝) / 𝑘⦌𝐶)
95	94	eleq1d 2275	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑓‘𝑝) → (𝐶 ∈ ℂ ↔ ⦋(𝑓‘𝑝) / 𝑘⦌𝐶 ∈ ℂ))
96	93, 95	rspc 2872	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓‘𝑝) ∈ 𝐴 → (∀𝑘 ∈ 𝐴 𝐶 ∈ ℂ → ⦋(𝑓‘𝑝) / 𝑘⦌𝐶 ∈ ℂ))
97	64, 91, 96	sylc 62	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ⦋(𝑓‘𝑝) / 𝑘⦌𝐶 ∈ ℂ)
98		eqid 2206	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ 𝐴 ↦ 𝐶) = (𝑘 ∈ 𝐴 ↦ 𝐶)
99	98	fvmpts 5664	. . . . . . . . . . . . . . 15 ⊢ (((𝑓‘𝑝) ∈ 𝐴 ∧ ⦋(𝑓‘𝑝) / 𝑘⦌𝐶 ∈ ℂ) → ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑝)) = ⦋(𝑓‘𝑝) / 𝑘⦌𝐶)
100	64, 97, 99	syl2anc 411	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑝)) = ⦋(𝑓‘𝑝) / 𝑘⦌𝐶)
101	89, 100	oveq12d 5969	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑝)) · ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑝))) = (⦋(𝑓‘𝑝) / 𝑘⦌𝐵 · ⦋(𝑓‘𝑝) / 𝑘⦌𝐶))
102	66, 78, 101	3eqtr4d 2249	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑝)) = (((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑝)) · ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑝))))
103		fvco3 5657	. . . . . . . . . . . . 13 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑝 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝) = ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑝)))
104	63, 33, 103	syl2anc 411	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝) = ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑝)))
105		fvco3 5657	. . . . . . . . . . . . . 14 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑝 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑝)))
106	63, 33, 105	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑝)))
107		fvco3 5657	. . . . . . . . . . . . . 14 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑝 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝) = ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑝)))
108	63, 33, 107	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝) = ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑝)))
109	106, 108	oveq12d 5969	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ((((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝) · (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝)) = (((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑝)) · ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑝))))
110	102, 104, 109	3eqtr4d 2249	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝) = ((((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝) · (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝)))
111	27	iftrued 3579	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1) = (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝))
112	27	iftrued 3579	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) = (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝))
113	27	iftrued 3579	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1) = (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝))
114	112, 113	oveq12d 5969	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) · if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1)) = ((((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝) · (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝)))
115	110, 111, 114	3eqtr4d 2249	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1) = (if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) · if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1)))
116	1	eqcomi 2210	. . . . . . . . . . 11 ⊢ 1 = (1 · 1)
117		simpr 110	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ ¬ 𝑝 ≤ (♯‘𝐴)) → ¬ 𝑝 ≤ (♯‘𝐴))
118	117	iffalsed 3582	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ ¬ 𝑝 ≤ (♯‘𝐴)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1) = 1)
119	117	iffalsed 3582	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ ¬ 𝑝 ≤ (♯‘𝐴)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) = 1)
120	117	iffalsed 3582	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ ¬ 𝑝 ≤ (♯‘𝐴)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1) = 1)
121	119, 120	oveq12d 5969	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ ¬ 𝑝 ≤ (♯‘𝐴)) → (if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) · if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1)) = (1 · 1))
122	116, 118, 121	3eqtr4a 2265	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ ¬ 𝑝 ≤ (♯‘𝐴)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1) = (if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) · if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1)))
123		exmiddc 838	. . . . . . . . . . 11 ⊢ (DECID 𝑝 ≤ (♯‘𝐴) → (𝑝 ≤ (♯‘𝐴) ∨ ¬ 𝑝 ≤ (♯‘𝐴)))
124	40, 123	syl 14	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → (𝑝 ≤ (♯‘𝐴) ∨ ¬ 𝑝 ≤ (♯‘𝐴)))
125	115, 122, 124	mpjaodan 800	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1) = (if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) · if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1)))
126	78, 75	eqeltrd 2283	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑝)) ∈ ℂ)
127	104, 126	eqeltrd 2283	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) ∧ 𝑝 ≤ (♯‘𝐴)) → (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝) ∈ ℂ)
128	127, 35, 40	ifcldadc 3601	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1) ∈ ℂ)
129		fveq2 5583	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑝 → (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛) = (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝))
130	42, 129	ifbieq1d 3594	. . . . . . . . . . 11 ⊢ (𝑛 = 𝑝 → if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛), 1) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1))
131		eqid 2206	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛), 1))
132	130, 131	fvmptg 5662	. . . . . . . . . 10 ⊢ ((𝑝 ∈ ℕ ∧ if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1) ∈ ℂ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛), 1))‘𝑝) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1))
133	18, 128, 132	syl2anc 411	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛), 1))‘𝑝) = if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑝), 1))
134	47, 61	oveq12d 5969	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → (((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1))‘𝑝) · ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1))‘𝑝)) = (if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑝), 1) · if(𝑝 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑝), 1)))
135	125, 133, 134	3eqtr4d 2249	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑝 ∈ (ℤ_≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛), 1))‘𝑝) = (((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1))‘𝑝) · ((𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1))‘𝑝)))
136	15, 48, 62, 135	prod3fmul 11896	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛), 1)))‘(♯‘𝐴)) = ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1)))‘(♯‘𝐴)) · (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1)))‘(♯‘𝐴))))
137		fveq2 5583	. . . . . . . 8 ⊢ (𝑚 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘𝑚) = ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑛)))
138		simprr 531	. . . . . . . 8 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)
139	67	fmpttd 5742	. . . . . . . . . 10 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)):𝐴⟶ℂ)
140	139	adantr 276	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)):𝐴⟶ℂ)
141	140	ffvelcdmda 5722	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑚 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘𝑚) ∈ ℂ)
142		fvco3 5657	. . . . . . . . 9 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑛)))
143	23, 142	sylan 283	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘(𝑓‘𝑛)))
144	137, 13, 138, 141, 143	fprodseq 11938	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘𝑚) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶)) ∘ 𝑓)‘𝑛), 1)))‘(♯‘𝐴)))
145		fveq2 5583	. . . . . . . . 9 ⊢ (𝑚 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
146	21	ffvelcdmda 5722	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑚 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) ∈ ℂ)
147		fvco3 5657	. . . . . . . . . 10 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
148	23, 147	sylan 283	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
149	145, 13, 138, 146, 148	fprodseq 11938	. . . . . . . 8 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1)))‘(♯‘𝐴)))
150		fveq2 5583	. . . . . . . . 9 ⊢ (𝑚 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚) = ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑛)))
151	51	ffvelcdmda 5722	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑚 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚) ∈ ℂ)
152		fvco3 5657	. . . . . . . . . 10 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑛)))
153	23, 152	sylan 283	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ 𝐶)‘(𝑓‘𝑛)))
154	150, 13, 138, 151, 153	fprodseq 11938	. . . . . . . 8 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1)))‘(♯‘𝐴)))
155	149, 154	oveq12d 5969	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) · ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚)) = ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛), 1)))‘(♯‘𝐴)) · (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), (((𝑘 ∈ 𝐴 ↦ 𝐶) ∘ 𝑓)‘𝑛), 1)))‘(♯‘𝐴))))
156	136, 144, 155	3eqtr4d 2249	. . . . . 6 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘𝑚) = (∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) · ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚)))
157		prodfct 11942	. . . . . . . 8 ⊢ (∀𝑘 ∈ 𝐴 (𝐵 · 𝐶) ∈ ℂ → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘𝑚) = ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶))
158	68, 157	syl 14	. . . . . . 7 ⊢ (𝜑 → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘𝑚) = ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶))
159	158	adantr 276	. . . . . 6 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐵 · 𝐶))‘𝑚) = ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶))
160		prodfct 11942	. . . . . . . . 9 ⊢ (∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = ∏𝑘 ∈ 𝐴 𝐵)
161	79, 160	syl 14	. . . . . . . 8 ⊢ (𝜑 → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = ∏𝑘 ∈ 𝐴 𝐵)
162		prodfct 11942	. . . . . . . . 9 ⊢ (∀𝑘 ∈ 𝐴 𝐶 ∈ ℂ → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚) = ∏𝑘 ∈ 𝐴 𝐶)
163	90, 162	syl 14	. . . . . . . 8 ⊢ (𝜑 → ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚) = ∏𝑘 ∈ 𝐴 𝐶)
164	161, 163	oveq12d 5969	. . . . . . 7 ⊢ (𝜑 → (∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) · ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚)) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶))
165	164	adantr 276	. . . . . 6 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) · ∏𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐶)‘𝑚)) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶))
166	156, 159, 165	3eqtr3d 2247	. . . . 5 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶))
167	166	expr 375	. . . 4 ⊢ ((𝜑 ∧ (♯‘𝐴) ∈ ℕ) → (𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶)))
168	167	exlimdv 1843	. . 3 ⊢ ((𝜑 ∧ (♯‘𝐴) ∈ ℕ) → (∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶)))
169	168	expimpd 363	. 2 ⊢ (𝜑 → (((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴) → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶)))
170		fprodmul.1	. . 3 ⊢ (𝜑 → 𝐴 ∈ Fin)
171		fz1f1o 11730	. . 3 ⊢ (𝐴 ∈ Fin → (𝐴 = ∅ ∨ ((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)))
172	170, 171	syl 14	. 2 ⊢ (𝜑 → (𝐴 = ∅ ∨ ((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)))
173	12, 169, 172	mpjaod 720	1 ⊢ (𝜑 → ∏𝑘 ∈ 𝐴 (𝐵 · 𝐶) = (∏𝑘 ∈ 𝐴 𝐵 · ∏𝑘 ∈ 𝐴 𝐶))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ↔ wb 105 ∨ wo 710 DECID wdc 836 = wceq 1373 ∃wex 1516 ∈ wcel 2177 ∀wral 2485 ⦋csb 3094 ∅c0 3461 ifcif 3572 class class class wbr 4047 ↦ cmpt 4109 ∘ ccom 4683 ⟶wf 5272 –1-1-onto→wf1o 5275 ‘cfv 5276 (class class class)co 5951 Fincfn 6834 ℂcc 7930 1c1 7933 · cmul 7937 ≤ cle 8115 ℕcn 9043 ℤcz 9379 ℤ_≥cuz 9655 ...cfz 10137 seqcseq 10599 ♯chash 10927 ∏cprod 11905

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 106 ax-ia2 107 ax-ia3 108 ax-in1 615 ax-in2 616 ax-io 711 ax-5 1471 ax-7 1472 ax-gen 1473 ax-ie1 1517 ax-ie2 1518 ax-8 1528 ax-10 1529 ax-11 1530 ax-i12 1531 ax-bndl 1533 ax-4 1534 ax-17 1550 ax-i9 1554 ax-ial 1558 ax-i5r 1559 ax-13 2179 ax-14 2180 ax-ext 2188 ax-coll 4163 ax-sep 4166 ax-nul 4174 ax-pow 4222 ax-pr 4257 ax-un 4484 ax-setind 4589 ax-iinf 4640 ax-cnex 8023 ax-resscn 8024 ax-1cn 8025 ax-1re 8026 ax-icn 8027 ax-addcl 8028 ax-addrcl 8029 ax-mulcl 8030 ax-mulrcl 8031 ax-addcom 8032 ax-mulcom 8033 ax-addass 8034 ax-mulass 8035 ax-distr 8036 ax-i2m1 8037 ax-0lt1 8038 ax-1rid 8039 ax-0id 8040 ax-rnegex 8041 ax-precex 8042 ax-cnre 8043 ax-pre-ltirr 8044 ax-pre-ltwlin 8045 ax-pre-lttrn 8046 ax-pre-apti 8047 ax-pre-ltadd 8048 ax-pre-mulgt0 8049 ax-pre-mulext 8050 ax-arch 8051 ax-caucvg 8052

This theorem depends on definitions: df-bi 117 df-dc 837 df-3or 982 df-3an 983 df-tru 1376 df-fal 1379 df-nf 1485 df-sb 1787 df-eu 2058 df-mo 2059 df-clab 2193 df-cleq 2199 df-clel 2202 df-nfc 2338 df-ne 2378 df-nel 2473 df-ral 2490 df-rex 2491 df-reu 2492 df-rmo 2493 df-rab 2494 df-v 2775 df-sbc 3000 df-csb 3095 df-dif 3169 df-un 3171 df-in 3173 df-ss 3180 df-nul 3462 df-if 3573 df-pw 3619 df-sn 3640 df-pr 3641 df-op 3643 df-uni 3853 df-int 3888 df-iun 3931 df-br 4048 df-opab 4110 df-mpt 4111 df-tr 4147 df-id 4344 df-po 4347 df-iso 4348 df-iord 4417 df-on 4419 df-ilim 4420 df-suc 4422 df-iom 4643 df-xp 4685 df-rel 4686 df-cnv 4687 df-co 4688 df-dm 4689 df-rn 4690 df-res 4691 df-ima 4692 df-iota 5237 df-fun 5278 df-fn 5279 df-f 5280 df-f1 5281 df-fo 5282 df-f1o 5283 df-fv 5284 df-isom 5285 df-riota 5906 df-ov 5954 df-oprab 5955 df-mpo 5956 df-1st 6233 df-2nd 6234 df-recs 6398 df-irdg 6463 df-frec 6484 df-1o 6509 df-oadd 6513 df-er 6627 df-en 6835 df-dom 6836 df-fin 6837 df-pnf 8116 df-mnf 8117 df-xr 8118 df-ltxr 8119 df-le 8120 df-sub 8252 df-neg 8253 df-reap 8655 df-ap 8662 df-div 8753 df-inn 9044 df-2 9102 df-3 9103 df-4 9104 df-n0 9303 df-z 9380 df-uz 9656 df-q 9748 df-rp 9783 df-fz 10138 df-fzo 10272 df-seqfrec 10600 df-exp 10691 df-ihash 10928 df-cj 11197 df-re 11198 df-im 11199 df-rsqrt 11353 df-abs 11354 df-clim 11634 df-proddc 11906

This theorem is referenced by: fprodsplitdc 11951 fproddivap 11985 gausslemma2dlem5 15587 gausslemma2dlem6 15588

W3C validator