coprmprod - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > coprmprod		Structured version Visualization version GIF version

Theorem coprmprod 16752

Description: The product of the elements of a sequence of pairwise coprime positive integers is coprime to a positive integer which is coprime to all integers of the sequence. (Contributed by AV, 18-Aug-2020.)

**Assertion**
Ref	Expression
coprmprod	⊢ (((𝑀 ∈ Fin ∧ 𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝐹:ℕ⟶ℕ ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1) → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))

Distinct variable groups: 𝑚,𝐹 𝑚,𝑀,𝑛 𝑚,𝑁,𝑛 Allowed substitution hint: 𝐹(𝑛)

Proof of Theorem coprmprod Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sseq1 3956	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝑥 ⊆ ℕ ↔ ∅ ⊆ ℕ))
2	1	3anbi1d 1468	. . . . . . . 8 ⊢ (𝑥 = ∅ → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
3		raleq 3316	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1))
4		difeq1 4067	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → (𝑥 ∖ {𝑚}) = (∅ ∖ {𝑚}))
5	4	raleqdv 3319	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
6	5	raleqbi1dv 3329	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
7	2, 3, 6	3anbi123d 1464	. . . . . . 7 ⊢ (𝑥 = ∅ → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
8		prodeq1 15997	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ ∅ (𝐹‘𝑚))
9	8	oveq1d 7429	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁))
10	9	eqeq1d 2762	. . . . . . 7 ⊢ (𝑥 = ∅ → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1))
11	7, 10	imbi12d 347	. . . . . 6 ⊢ (𝑥 = ∅ → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)))
12		sseq1 3956	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 ⊆ ℕ ↔ 𝑦 ⊆ ℕ))
13	12	3anbi1d 1468	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
14		raleq 3316	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
15		difeq1 4067	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑥 ∖ {𝑚}) = (𝑦 ∖ {𝑚}))
16	15	raleqdv 3319	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
17	16	raleqbi1dv 3329	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
18	13, 14, 17	3anbi123d 1464	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
19		prodeq1 15997	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ 𝑦 (𝐹‘𝑚))
20	19	oveq1d 7429	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁))
21	20	eqeq1d 2762	. . . . . . 7 ⊢ (𝑥 = 𝑦 → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1))
22	18, 21	imbi12d 347	. . . . . 6 ⊢ (𝑥 = 𝑦 → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)))
23		sseq1 3956	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (𝑥 ⊆ ℕ ↔ (𝑦 ∪ {𝑧}) ⊆ ℕ))
24	23	3anbi1d 1468	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ ((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
25		raleq 3316	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1))
26		difeq1 4067	. . . . . . . . . 10 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (𝑥 ∖ {𝑚}) = ((𝑦 ∪ {𝑧}) ∖ {𝑚}))
27	26	raleqdv 3319	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
28	27	raleqbi1dv 3329	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
29	24, 25, 28	3anbi123d 1464	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
30		prodeq1 15997	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚))
31	30	oveq1d 7429	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁))
32	31	eqeq1d 2762	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1))
33	29, 32	imbi12d 347	. . . . . 6 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)))
34		sseq1 3956	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → (𝑥 ⊆ ℕ ↔ 𝑀 ⊆ ℕ))
35	34	3anbi1d 1468	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
36		raleq 3316	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1))
37		difeq1 4067	. . . . . . . . . 10 ⊢ (𝑥 = 𝑀 → (𝑥 ∖ {𝑚}) = (𝑀 ∖ {𝑚}))
38	37	raleqdv 3319	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
39	38	raleqbi1dv 3329	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
40	35, 36, 39	3anbi123d 1464	. . . . . . 7 ⊢ (𝑥 = 𝑀 → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
41		prodeq1 15997	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ 𝑀 (𝐹‘𝑚))
42	41	oveq1d 7429	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁))
43	42	eqeq1d 2762	. . . . . . 7 ⊢ (𝑥 = 𝑀 → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))
44	40, 43	imbi12d 347	. . . . . 6 ⊢ (𝑥 = 𝑀 → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1)))
45		prod0 16031	. . . . . . . . . . 11 ⊢ ∏𝑚 ∈ ∅ (𝐹‘𝑚) = 1
46	45	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → ∏𝑚 ∈ ∅ (𝐹‘𝑚) = 1)
47	46	oveq1d 7429	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = (1 gcd 𝑁))
48		nnz 12637	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
49		1gcd 16624	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℤ → (1 gcd 𝑁) = 1)
50	48, 49	syl 18	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (1 gcd 𝑁) = 1)
51	47, 50	eqtrd 2795	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
52	51	3ad2ant2 1152	. . . . . . 7 ⊢ ((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
53	52	3ad2ant1 1151	. . . . . 6 ⊢ (((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
54		nfv 1947	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑚(((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦))
55		nfcv 2922	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑚(𝐹‘𝑧)
56		simprl 783	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑦 ∈ Fin)
57		unss 4136	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) ↔ (𝑦 ∪ {𝑧}) ⊆ ℕ)
58		vex 3454	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑧 ∈ V
59	58	snss 4745	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 ∈ ℕ ↔ {𝑧} ⊆ ℕ)
60	59	bilanri 512	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) → 𝑧 ∈ ℕ)
61	57, 60	sylbir 238	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∪ {𝑧}) ⊆ ℕ → 𝑧 ∈ ℕ)
62	61	3ad2ant1 1151	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑧 ∈ ℕ)
63	62	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑧 ∈ ℕ)
64		simprr 785	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ¬ 𝑧 ∈ 𝑦)
65		simpll3 1233	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → 𝐹:ℕ⟶ℕ)
66		simpl 488	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) → 𝑦 ⊆ ℕ)
67	57, 66	sylbir 238	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑦 ∪ {𝑧}) ⊆ ℕ → 𝑦 ⊆ ℕ)
68	67	3ad2ant1 1151	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑦 ⊆ ℕ)
69	68	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑦 ⊆ ℕ)
70	69	sselda 3931	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → 𝑚 ∈ ℕ)
71	65, 70	ffvelcdmd 7079	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → (𝐹‘𝑚) ∈ ℕ)
72	71	nncnd 12274	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → (𝐹‘𝑚) ∈ ℂ)
73		fveq2 6879	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 = 𝑧 → (𝐹‘𝑚) = (𝐹‘𝑧))
74		simpr 490	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝐹:ℕ⟶ℕ)
75	61	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑧 ∈ ℕ)
76	74, 75	ffvelcdmd 7079	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℕ)
77	76	3adant2 1149	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℕ)
78	77	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℕ)
79	78	nncnd 12274	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℂ)
80	54, 55, 56, 63, 64, 72, 73, 79	fprodsplitsn 16077	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))
81	80	oveq1d 7429	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = ((∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) gcd 𝑁))
82	56, 71	fprodnncl 16043	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ)
83	82	nnzd 12642	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℤ)
84	78	nnzd 12642	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℤ)
85	83, 84	zmulcld 12732	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) ∈ ℤ)
86	48	3ad2ant2 1152	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑁 ∈ ℤ)
87	86	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑁 ∈ ℤ)
88	85, 87	gcdcomd 16605	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ((∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
89	81, 88	eqtrd 2795	. . . . . . . . . . . . 13 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
90	89	ex 418	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
91	90	3ad2ant1 1151	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
92	91	com12 33	. . . . . . . . . 10 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
93	92	adantr 486	. . . . . . . . 9 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
94	93	imp 412	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
95		simpl2 1211	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑁 ∈ ℕ)
96	95, 82, 78	3jca 1146	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ))
97	96	ex 418	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
98	97	3ad2ant1 1151	. . . . . . . . . . . 12 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
99	98	com12 33	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
100	99	adantr 486	. . . . . . . . . 10 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
101	100	imp 412	. . . . . . . . 9 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ))
102	87, 83	gcdcomd 16605	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁))
103	102	ex 418	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
104	103	3ad2ant1 1151	. . . . . . . . . . . . 13 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
105	104	com12 33	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
106	105	adantr 486	. . . . . . . . . . 11 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
107	106	imp 412	. . . . . . . . . 10 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁))
108	67	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((𝑦 ∪ {𝑧}) ⊆ ℕ → 𝑦 ⊆ ℕ))
109		idd 25	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 ∈ ℕ → 𝑁 ∈ ℕ))
110		idd 25	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝐹:ℕ⟶ℕ → 𝐹:ℕ⟶ℕ))
111	108, 109, 110	3anim123d 1471	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
112		ssun1 4124	. . . . . . . . . . . . . 14 ⊢ 𝑦 ⊆ (𝑦 ∪ {𝑧})
113		ssralv 4000	. . . . . . . . . . . . . 14 ⊢ (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
114	112, 113	mp1i 14	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
115		ssralv 4000	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
116	112, 115	mp1i 14	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
117	112	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑚 ∈ 𝑦) → 𝑦 ⊆ (𝑦 ∪ {𝑧}))
118	117	ssdifd 4092	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑚 ∈ 𝑦) → (𝑦 ∖ {𝑚}) ⊆ ((𝑦 ∪ {𝑧}) ∖ {𝑚}))
119		ssralv 4000	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∖ {𝑚}) ⊆ ((𝑦 ∪ {𝑧}) ∖ {𝑚}) → (∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
120	118, 119	syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑚 ∈ 𝑦) → (∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
121	120	ralimdva 3174	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ 𝑦 ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
122	116, 121	syld 48	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
123	111, 114, 122	3anim123d 1471	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
124	123	imim1d 83	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)))
125	124	imp31 423	. . . . . . . . . 10 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)
126	107, 125	eqtrd 2795	. . . . . . . . 9 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = 1)
127		rpmulgcd 16648	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ) ∧ (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = 1) → (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))) = (𝑁 gcd (𝐹‘𝑧)))
128	101, 126, 127	syl2anc 596	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))) = (𝑁 gcd (𝐹‘𝑧)))
129		vsnid 4624	. . . . . . . . . . . . . . 15 ⊢ 𝑧 ∈ {𝑧}
130	129	olci 880	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ 𝑦 ∨ 𝑧 ∈ {𝑧})
131		elun 4100	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ (𝑦 ∪ {𝑧}) ↔ (𝑧 ∈ 𝑦 ∨ 𝑧 ∈ {𝑧}))
132	130, 131	mpbir 234	. . . . . . . . . . . . 13 ⊢ 𝑧 ∈ (𝑦 ∪ {𝑧})
133	73	oveq1d 7429	. . . . . . . . . . . . . . 15 ⊢ (𝑚 = 𝑧 → ((𝐹‘𝑚) gcd 𝑁) = ((𝐹‘𝑧) gcd 𝑁))
134	133	eqeq1d 2762	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑧 → (((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
135	134	rspcv 3572	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ((𝐹‘𝑧) gcd 𝑁) = 1))
136	132, 135	mp1i 14	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ((𝐹‘𝑧) gcd 𝑁) = 1))
137	136	imp 412	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → ((𝐹‘𝑧) gcd 𝑁) = 1)
138	77	nnzd 12642	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℤ)
139	86, 138	gcdcomd 16605	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝑁 gcd (𝐹‘𝑧)) = ((𝐹‘𝑧) gcd 𝑁))
140	139	eqeq1d 2762	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑁 gcd (𝐹‘𝑧)) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
141	140	adantr 486	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → ((𝑁 gcd (𝐹‘𝑧)) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
142	137, 141	mpbird 260	. . . . . . . . . 10 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → (𝑁 gcd (𝐹‘𝑧)) = 1)
143	142	3adant3 1150	. . . . . . . . 9 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd (𝐹‘𝑧)) = 1)
144	143	adantl 487	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd (𝐹‘𝑧)) = 1)
145	94, 128, 144	3eqtrd 2799	. . . . . . 7 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)
146	145	exp31 425	. . . . . 6 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)))
147	11, 22, 33, 44, 53, 146	findcard2s 9161	. . . . 5 ⊢ (𝑀 ∈ Fin → (((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))
148	147	3expd 1372	. . . 4 ⊢ (𝑀 ∈ Fin → ((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))
149	148	3expd 1372	. . 3 ⊢ (𝑀 ∈ Fin → (𝑀 ⊆ ℕ → (𝑁 ∈ ℕ → (𝐹:ℕ⟶ℕ → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))))
150	149	3imp 1128	. 2 ⊢ ((𝑀 ∈ Fin ∧ 𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ) → (𝐹:ℕ⟶ℕ → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))
151	150	3imp 1128	1 ⊢ (((𝑀 ∈ Fin ∧ 𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝐹:ℕ⟶ℕ ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1) → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 ∀wral 3076 ∖ cdif 3896 ∪ cun 3897 ⊆ wss 3899 ∅c0 4279 {csn 4584 ⟶wf 6529 ‘cfv 6533 (class class class)co 7414 Fincfn 8953 1c1 11126 · cmul 11130 ℕcn 12258 ℤcz 12616 ∏cprod 15993 gcd cgcd 16585

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2732 ax-rep 5232 ax-sep 5251 ax-nul 5263 ax-pow 5330 ax-pr 5398 ax-un 7737 ax-inf2 9621 ax-cnex 11181 ax-resscn 11182 ax-1cn 11183 ax-icn 11184 ax-addcl 11185 ax-addrcl 11186 ax-mulcl 11187 ax-mulrcl 11188 ax-mulcom 11189 ax-addass 11190 ax-mulass 11191 ax-distr 11192 ax-i2m1 11193 ax-1ne0 11194 ax-1rid 11195 ax-rnegex 11196 ax-rrecex 11197 ax-cnre 11198 ax-pre-lttri 11199 ax-pre-lttrn 11200 ax-pre-ltadd 11201 ax-pre-mulgt0 11202 ax-pre-sup 11203

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5550 df-eprel 5555 df-po 5563 df-so 5564 df-fr 5608 df-se 5609 df-we 5610 df-xp 5661 df-rel 5662 df-cnv 5663 df-co 5664 df-dm 5665 df-rn 5666 df-res 5667 df-ima 5668 df-pred 6299 df-ord 6360 df-on 6361 df-lim 6362 df-suc 6363 df-iota 6489 df-fun 6535 df-fn 6536 df-f 6537 df-f1 6538 df-fo 6539 df-f1o 6540 df-fv 6541 df-isom 6542 df-riota 7371 df-ov 7417 df-oprab 7418 df-mpo 7419 df-om 7864 df-1st 7987 df-2nd 7988 df-frecs 8281 df-wrecs 8312 df-recs 8361 df-rdg 8400 df-1o 8456 df-er 8697 df-en 8954 df-dom 8955 df-sdom 8956 df-fin 8957 df-sup 9413 df-inf 9414 df-oi 9483 df-card 9945 df-pnf 11270 df-mnf 11271 df-xr 11272 df-ltxr 11273 df-le 11274 df-sub 11468 df-neg 11469 df-div 11897 df-nn 12259 df-2 12328 df-3 12329 df-n0 12530 df-z 12617 df-uz 12889 df-rp 13044 df-fz 13563 df-fzo 13711 df-fl 13854 df-mod 13932 df-seq 14067 df-exp 14127 df-hash 14396 df-cj 15187 df-re 15188 df-im 15189 df-sqrt 15323 df-abs 15324 df-clim 15576 df-prod 15994 df-dvds 16344 df-gcd 16586

This theorem is used by: coprmproddvdslem 16753

W3C validator