Theorem coprmprod 16695

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 3961	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝑥 ⊆ ℕ ↔ ∅ ⊆ ℕ))
2	1	3anbi1d 1461	. . . . . . . 8 ⊢ (𝑥 = ∅ → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
3		raleq 3317	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1))
4		difeq1 4073	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → (𝑥 ∖ {𝑚}) = (∅ ∖ {𝑚}))
5	4	raleqdv 3320	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
6	5	raleqbi1dv 3330	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
7	2, 3, 6	3anbi123d 1457	. . . . . . 7 ⊢ (𝑥 = ∅ → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
8		prodeq1 15937	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ ∅ (𝐹‘𝑚))
9	8	oveq1d 7411	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁))
10	9	eqeq1d 2764	. . . . . . 7 ⊢ (𝑥 = ∅ → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1))
11	7, 10	imbi12d 346	. . . . . 6 ⊢ (𝑥 = ∅ → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)))
12		sseq1 3961	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 ⊆ ℕ ↔ 𝑦 ⊆ ℕ))
13	12	3anbi1d 1461	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
14		raleq 3317	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
15		difeq1 4073	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑥 ∖ {𝑚}) = (𝑦 ∖ {𝑚}))
16	15	raleqdv 3320	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
17	16	raleqbi1dv 3330	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
18	13, 14, 17	3anbi123d 1457	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
19		prodeq1 15937	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ 𝑦 (𝐹‘𝑚))
20	19	oveq1d 7411	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁))
21	20	eqeq1d 2764	. . . . . . 7 ⊢ (𝑥 = 𝑦 → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1))
22	18, 21	imbi12d 346	. . . . . 6 ⊢ (𝑥 = 𝑦 → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)))
23		sseq1 3961	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (𝑥 ⊆ ℕ ↔ (𝑦 ∪ {𝑧}) ⊆ ℕ))
24	23	3anbi1d 1461	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ ((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
25		raleq 3317	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1))
26		difeq1 4073	. . . . . . . . . 10 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (𝑥 ∖ {𝑚}) = ((𝑦 ∪ {𝑧}) ∖ {𝑚}))
27	26	raleqdv 3320	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
28	27	raleqbi1dv 3330	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
29	24, 25, 28	3anbi123d 1457	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
30		prodeq1 15937	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚))
31	30	oveq1d 7411	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁))
32	31	eqeq1d 2764	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1))
33	29, 32	imbi12d 346	. . . . . 6 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)))
34		sseq1 3961	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → (𝑥 ⊆ ℕ ↔ 𝑀 ⊆ ℕ))
35	34	3anbi1d 1461	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
36		raleq 3317	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1))
37		difeq1 4073	. . . . . . . . . 10 ⊢ (𝑥 = 𝑀 → (𝑥 ∖ {𝑚}) = (𝑀 ∖ {𝑚}))
38	37	raleqdv 3320	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
39	38	raleqbi1dv 3330	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
40	35, 36, 39	3anbi123d 1457	. . . . . . 7 ⊢ (𝑥 = 𝑀 → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
41		prodeq1 15937	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ 𝑀 (𝐹‘𝑚))
42	41	oveq1d 7411	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁))
43	42	eqeq1d 2764	. . . . . . 7 ⊢ (𝑥 = 𝑀 → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))
44	40, 43	imbi12d 346	. . . . . 6 ⊢ (𝑥 = 𝑀 → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1)))
45		prod0 15973	. . . . . . . . . . 11 ⊢ ∏𝑚 ∈ ∅ (𝐹‘𝑚) = 1
46	45	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → ∏𝑚 ∈ ∅ (𝐹‘𝑚) = 1)
47	46	oveq1d 7411	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = (1 gcd 𝑁))
48		nnz 12589	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
49		1gcd 16567	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℤ → (1 gcd 𝑁) = 1)
50	48, 49	syl 17	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (1 gcd 𝑁) = 1)
51	47, 50	eqtrd 2797	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
52	51	3ad2ant2 1147	. . . . . . 7 ⊢ ((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
53	52	3ad2ant1 1146	. . . . . 6 ⊢ (((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
54		nfv 1934	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑚(((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦))
55		nfcv 2924	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑚(𝐹‘𝑧)
56		simprl 780	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑦 ∈ Fin)
57		unss 4142	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) ↔ (𝑦 ∪ {𝑧}) ⊆ ℕ)
58		vex 3458	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑧 ∈ V
59	58	snss 4743	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 ∈ ℕ ↔ {𝑧} ⊆ ℕ)
60	59	bilanri 510	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) → 𝑧 ∈ ℕ)
61	57, 60	sylbir 237	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∪ {𝑧}) ⊆ ℕ → 𝑧 ∈ ℕ)
62	61	3ad2ant1 1146	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑧 ∈ ℕ)
63	62	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑧 ∈ ℕ)
64		simprr 782	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ¬ 𝑧 ∈ 𝑦)
65		simpll3 1228	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → 𝐹:ℕ⟶ℕ)
66		simpl 486	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) → 𝑦 ⊆ ℕ)
67	57, 66	sylbir 237	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑦 ∪ {𝑧}) ⊆ ℕ → 𝑦 ⊆ ℕ)
68	67	3ad2ant1 1146	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑦 ⊆ ℕ)
69	68	adantr 484	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑦 ⊆ ℕ)
70	69	sselda 3936	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → 𝑚 ∈ ℕ)
71	65, 70	ffvelcdmd 7066	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → (𝐹‘𝑚) ∈ ℕ)
72	71	nncnd 12226	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → (𝐹‘𝑚) ∈ ℂ)
73		fveq2 6867	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 = 𝑧 → (𝐹‘𝑚) = (𝐹‘𝑧))
74		simpr 488	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝐹:ℕ⟶ℕ)
75	61	adantr 484	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑧 ∈ ℕ)
76	74, 75	ffvelcdmd 7066	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℕ)
77	76	3adant2 1144	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℕ)
78	77	adantr 484	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℕ)
79	78	nncnd 12226	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℂ)
80	54, 55, 56, 63, 64, 72, 73, 79	fprodsplitsn 16019	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))
81	80	oveq1d 7411	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = ((∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) gcd 𝑁))
82	56, 71	fprodnncl 15985	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ)
83	82	nnzd 12594	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℤ)
84	78	nnzd 12594	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℤ)
85	83, 84	zmulcld 12683	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) ∈ ℤ)
86	48	3ad2ant2 1147	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑁 ∈ ℤ)
87	86	adantr 484	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑁 ∈ ℤ)
88	85, 87	gcdcomd 16548	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ((∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
89	81, 88	eqtrd 2797	. . . . . . . . . . . . 13 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
90	89	ex 416	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
91	90	3ad2ant1 1146	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
92	91	com12 32	. . . . . . . . . 10 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
93	92	adantr 484	. . . . . . . . 9 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
94	93	imp 410	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
95		simpl2 1206	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑁 ∈ ℕ)
96	95, 82, 78	3jca 1141	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ))
97	96	ex 416	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
98	97	3ad2ant1 1146	. . . . . . . . . . . 12 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
99	98	com12 32	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
100	99	adantr 484	. . . . . . . . . 10 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
101	100	imp 410	. . . . . . . . 9 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ))
102	87, 83	gcdcomd 16548	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁))
103	102	ex 416	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
104	103	3ad2ant1 1146	. . . . . . . . . . . . 13 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
105	104	com12 32	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
106	105	adantr 484	. . . . . . . . . . 11 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
107	106	imp 410	. . . . . . . . . 10 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁))
108	67	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((𝑦 ∪ {𝑧}) ⊆ ℕ → 𝑦 ⊆ ℕ))
109		idd 24	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 ∈ ℕ → 𝑁 ∈ ℕ))
110		idd 24	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝐹:ℕ⟶ℕ → 𝐹:ℕ⟶ℕ))
111	108, 109, 110	3anim123d 1464	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
112		ssun1 4130	. . . . . . . . . . . . . 14 ⊢ 𝑦 ⊆ (𝑦 ∪ {𝑧})
113		ssralv 4005	. . . . . . . . . . . . . 14 ⊢ (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
114	112, 113	mp1i 13	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
115		ssralv 4005	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
116	112, 115	mp1i 13	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
117	112	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑚 ∈ 𝑦) → 𝑦 ⊆ (𝑦 ∪ {𝑧}))
118	117	ssdifd 4098	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑚 ∈ 𝑦) → (𝑦 ∖ {𝑚}) ⊆ ((𝑦 ∪ {𝑧}) ∖ {𝑚}))
119		ssralv 4005	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∖ {𝑚}) ⊆ ((𝑦 ∪ {𝑧}) ∖ {𝑚}) → (∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
120	118, 119	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑚 ∈ 𝑦) → (∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
121	120	ralimdva 3174	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ 𝑦 ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
122	116, 121	syld 47	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
123	111, 114, 122	3anim123d 1464	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
124	123	imim1d 82	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)))
125	124	imp31 421	. . . . . . . . . 10 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)
126	107, 125	eqtrd 2797	. . . . . . . . 9 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = 1)
127		rpmulgcd 16591	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ) ∧ (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = 1) → (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))) = (𝑁 gcd (𝐹‘𝑧)))
128	101, 126, 127	syl2anc 593	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))) = (𝑁 gcd (𝐹‘𝑧)))
129		vsnid 4622	. . . . . . . . . . . . . . 15 ⊢ 𝑧 ∈ {𝑧}
130	129	olci 877	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ 𝑦 ∨ 𝑧 ∈ {𝑧})
131		elun 4106	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ (𝑦 ∪ {𝑧}) ↔ (𝑧 ∈ 𝑦 ∨ 𝑧 ∈ {𝑧}))
132	130, 131	mpbir 233	. . . . . . . . . . . . 13 ⊢ 𝑧 ∈ (𝑦 ∪ {𝑧})
133	73	oveq1d 7411	. . . . . . . . . . . . . . 15 ⊢ (𝑚 = 𝑧 → ((𝐹‘𝑚) gcd 𝑁) = ((𝐹‘𝑧) gcd 𝑁))
134	133	eqeq1d 2764	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑧 → (((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
135	134	rspcv 3577	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ((𝐹‘𝑧) gcd 𝑁) = 1))
136	132, 135	mp1i 13	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ((𝐹‘𝑧) gcd 𝑁) = 1))
137	136	imp 410	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → ((𝐹‘𝑧) gcd 𝑁) = 1)
138	77	nnzd 12594	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℤ)
139	86, 138	gcdcomd 16548	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝑁 gcd (𝐹‘𝑧)) = ((𝐹‘𝑧) gcd 𝑁))
140	139	eqeq1d 2764	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑁 gcd (𝐹‘𝑧)) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
141	140	adantr 484	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → ((𝑁 gcd (𝐹‘𝑧)) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
142	137, 141	mpbird 259	. . . . . . . . . 10 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → (𝑁 gcd (𝐹‘𝑧)) = 1)
143	142	3adant3 1145	. . . . . . . . 9 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd (𝐹‘𝑧)) = 1)
144	143	adantl 485	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd (𝐹‘𝑧)) = 1)
145	94, 128, 144	3eqtrd 2801	. . . . . . 7 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)
146	145	exp31 423	. . . . . 6 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)))
147	11, 22, 33, 44, 53, 146	findcard2s 9134	. . . . 5 ⊢ (𝑀 ∈ Fin → (((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))
148	147	3expd 1367	. . . 4 ⊢ (𝑀 ∈ Fin → ((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))
149	148	3expd 1367	. . 3 ⊢ (𝑀 ∈ Fin → (𝑀 ⊆ ℕ → (𝑁 ∈ ℕ → (𝐹:ℕ⟶ℕ → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))))
150	149	3imp 1123	. 2 ⊢ ((𝑀 ∈ Fin ∧ 𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ) → (𝐹:ℕ⟶ℕ → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))
151	150	3imp 1123	1 ⊢ (((𝑀 ∈ Fin ∧ 𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝐹:ℕ⟶ℕ ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1) → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 399   ∨ wo 858   ∧ w3a 1098   = wceq 1560   ∈ wcel 2142  ∀wral 3076   ∖ cdif 3901   ∪ cun 3902   ⊆ wss 3904  ∅c0 4285  {csn 4582  ⟶wf 6517  ‘cfv 6521  (class class class)co 7396  Fincfn 8927  1c1 11074   · cmul 11078  ℕcn 12210  ℤcz 12568  ∏cprod 15933   gcd cgcd 16528

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718  ax-inf2 9596  ax-cnex 11129  ax-resscn 11130  ax-1cn 11131  ax-icn 11132  ax-addcl 11133  ax-addrcl 11134  ax-mulcl 11135  ax-mulrcl 11136  ax-mulcom 11137  ax-addass 11138  ax-mulass 11139  ax-distr 11140  ax-i2m1 11141  ax-1ne0 11142  ax-1rid 11143  ax-rnegex 11144  ax-rrecex 11145  ax-cnre 11146  ax-pre-lttri 11147  ax-pre-lttrn 11148  ax-pre-ltadd 11149  ax-pre-mulgt0 11150  ax-pre-sup 11151

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4906  df-iun 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-se 5601  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6288  df-ord 6349  df-on 6350  df-lim 6351  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-isom 6530  df-riota 7353  df-ov 7399  df-oprab 7400  df-mpo 7401  df-om 7847  df-1st 7970  df-2nd 7971  df-frecs 8262  df-wrecs 8293  df-recs 8342  df-rdg 8381  df-1o 8437  df-er 8678  df-en 8928  df-dom 8929  df-sdom 8930  df-fin 8931  df-sup 9388  df-inf 9389  df-oi 9458  df-card 9897  df-pnf 11218  df-mnf 11219  df-xr 11220  df-ltxr 11221  df-le 11222  df-sub 11416  df-neg 11417  df-div 11845  df-nn 12211  df-2 12280  df-3 12281  df-n0 12482  df-z 12569  df-uz 12840  df-rp 12994  df-fz 13513  df-fzo 13660  df-fl 13802  df-mod 13880  df-seq 14015  df-exp 14075  df-hash 14344  df-cj 15126  df-re 15127  df-im 15128  df-sqrt 15262  df-abs 15263  df-clim 15515  df-prod 15934  df-dvds 16287  df-gcd 16529

This theorem is referenced by:  coprmproddvdslem  16696