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 16621

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 3940	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝑥 ⊆ ℕ ↔ ∅ ⊆ ℕ))
2	1	3anbi1d 1448	. . . . . . . 8 ⊢ (𝑥 = ∅ → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
3		raleq 3294	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1))
4		difeq1 4050	. . . . . . . . . 10 ⊢ (𝑥 = ∅ → (𝑥 ∖ {𝑚}) = (∅ ∖ {𝑚}))
5	4	raleqdv 3297	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
6	5	raleqbi1dv 3307	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
7	2, 3, 6	3anbi123d 1444	. . . . . . 7 ⊢ (𝑥 = ∅ → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
8		prodeq1 15863	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ ∅ (𝐹‘𝑚))
9	8	oveq1d 7371	. . . . . . . 8 ⊢ (𝑥 = ∅ → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁))
10	9	eqeq1d 2741	. . . . . . 7 ⊢ (𝑥 = ∅ → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1))
11	7, 10	imbi12d 345	. . . . . 6 ⊢ (𝑥 = ∅ → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)))
12		sseq1 3940	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 ⊆ ℕ ↔ 𝑦 ⊆ ℕ))
13	12	3anbi1d 1448	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
14		raleq 3294	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
15		difeq1 4050	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑥 ∖ {𝑚}) = (𝑦 ∖ {𝑚}))
16	15	raleqdv 3297	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
17	16	raleqbi1dv 3307	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
18	13, 14, 17	3anbi123d 1444	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
19		prodeq1 15863	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ 𝑦 (𝐹‘𝑚))
20	19	oveq1d 7371	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁))
21	20	eqeq1d 2741	. . . . . . 7 ⊢ (𝑥 = 𝑦 → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1))
22	18, 21	imbi12d 345	. . . . . 6 ⊢ (𝑥 = 𝑦 → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)))
23		sseq1 3940	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (𝑥 ⊆ ℕ ↔ (𝑦 ∪ {𝑧}) ⊆ ℕ))
24	23	3anbi1d 1448	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ ((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
25		raleq 3294	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1))
26		difeq1 4050	. . . . . . . . . 10 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (𝑥 ∖ {𝑚}) = ((𝑦 ∪ {𝑧}) ∖ {𝑚}))
27	26	raleqdv 3297	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
28	27	raleqbi1dv 3307	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
29	24, 25, 28	3anbi123d 1444	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
30		prodeq1 15863	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚))
31	30	oveq1d 7371	. . . . . . . 8 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁))
32	31	eqeq1d 2741	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1))
33	29, 32	imbi12d 345	. . . . . 6 ⊢ (𝑥 = (𝑦 ∪ {𝑧}) → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)))
34		sseq1 3940	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → (𝑥 ⊆ ℕ ↔ 𝑀 ⊆ ℕ))
35	34	3anbi1d 1448	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → ((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ↔ (𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
36		raleq 3294	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1))
37		difeq1 4050	. . . . . . . . . 10 ⊢ (𝑥 = 𝑀 → (𝑥 ∖ {𝑚}) = (𝑀 ∖ {𝑚}))
38	37	raleqdv 3297	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → (∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
39	38	raleqbi1dv 3307	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 ↔ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
40	35, 36, 39	3anbi123d 1444	. . . . . . 7 ⊢ (𝑥 = 𝑀 → (((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) ↔ ((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)))
41		prodeq1 15863	. . . . . . . . 9 ⊢ (𝑥 = 𝑀 → ∏𝑚 ∈ 𝑥 (𝐹‘𝑚) = ∏𝑚 ∈ 𝑀 (𝐹‘𝑚))
42	41	oveq1d 7371	. . . . . . . 8 ⊢ (𝑥 = 𝑀 → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁))
43	42	eqeq1d 2741	. . . . . . 7 ⊢ (𝑥 = 𝑀 → ((∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1 ↔ (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))
44	40, 43	imbi12d 345	. . . . . 6 ⊢ (𝑥 = 𝑀 → ((((𝑥 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑥 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑥 ∀𝑛 ∈ (𝑥 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑥 (𝐹‘𝑚) gcd 𝑁) = 1) ↔ (((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1)))
45		prod0 15899	. . . . . . . . . . 11 ⊢ ∏𝑚 ∈ ∅ (𝐹‘𝑚) = 1
46	45	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → ∏𝑚 ∈ ∅ (𝐹‘𝑚) = 1)
47	46	oveq1d 7371	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = (1 gcd 𝑁))
48		nnz 12536	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
49		1gcd 16493	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℤ → (1 gcd 𝑁) = 1)
50	48, 49	syl 17	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (1 gcd 𝑁) = 1)
51	47, 50	eqtrd 2774	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
52	51	3ad2ant2 1140	. . . . . . 7 ⊢ ((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
53	52	3ad2ant1 1139	. . . . . 6 ⊢ (((∅ ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ ∅ ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ ∅ ∀𝑛 ∈ (∅ ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ ∅ (𝐹‘𝑚) gcd 𝑁) = 1)
54		nfv 1921	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑚(((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦))
55		nfcv 2901	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑚(𝐹‘𝑧)
56		simprl 776	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑦 ∈ Fin)
57		unss 4119	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) ↔ (𝑦 ∪ {𝑧}) ⊆ ℕ)
58		vex 3435	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑧 ∈ V
59	58	snss 4716	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 ∈ ℕ ↔ {𝑧} ⊆ ℕ)
60	59	bilanri 507	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) → 𝑧 ∈ ℕ)
61	57, 60	sylbir 236	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∪ {𝑧}) ⊆ ℕ → 𝑧 ∈ ℕ)
62	61	3ad2ant1 1139	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑧 ∈ ℕ)
63	62	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑧 ∈ ℕ)
64		simprr 778	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ¬ 𝑧 ∈ 𝑦)
65		simpll3 1221	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → 𝐹:ℕ⟶ℕ)
66		simpl 483	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑦 ⊆ ℕ ∧ {𝑧} ⊆ ℕ) → 𝑦 ⊆ ℕ)
67	57, 66	sylbir 236	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑦 ∪ {𝑧}) ⊆ ℕ → 𝑦 ⊆ ℕ)
68	67	3ad2ant1 1139	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑦 ⊆ ℕ)
69	68	adantr 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑦 ⊆ ℕ)
70	69	sselda 3915	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → 𝑚 ∈ ℕ)
71	65, 70	ffvelcdmd 7026	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → (𝐹‘𝑚) ∈ ℕ)
72	71	nncnd 12181	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) ∧ 𝑚 ∈ 𝑦) → (𝐹‘𝑚) ∈ ℂ)
73		fveq2 6827	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 = 𝑧 → (𝐹‘𝑚) = (𝐹‘𝑧))
74		simpr 485	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝐹:ℕ⟶ℕ)
75	61	adantr 481	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑧 ∈ ℕ)
76	74, 75	ffvelcdmd 7026	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℕ)
77	76	3adant2 1137	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℕ)
78	77	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℕ)
79	78	nncnd 12181	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℂ)
80	54, 55, 56, 63, 64, 72, 73, 79	fprodsplitsn 15945	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))
81	80	oveq1d 7371	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = ((∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) gcd 𝑁))
82	56, 71	fprodnncl 15911	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ)
83	82	nnzd 12541	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℤ)
84	78	nnzd 12541	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝐹‘𝑧) ∈ ℤ)
85	83, 84	zmulcld 12630	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) ∈ ℤ)
86	48	3ad2ant2 1140	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → 𝑁 ∈ ℤ)
87	86	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑁 ∈ ℤ)
88	85, 87	gcdcomd 16474	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → ((∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
89	81, 88	eqtrd 2774	. . . . . . . . . . . . 13 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
90	89	ex 413	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
91	90	3ad2ant1 1139	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
92	91	com12 32	. . . . . . . . . 10 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
93	92	adantr 481	. . . . . . . . 9 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧)))))
94	93	imp 407	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))))
95		simpl2 1199	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → 𝑁 ∈ ℕ)
96	95, 82, 78	3jca 1134	. . . . . . . . . . . . . 14 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ))
97	96	ex 413	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
98	97	3ad2ant1 1139	. . . . . . . . . . . 12 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
99	98	com12 32	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
100	99	adantr 481	. . . . . . . . . 10 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ)))
101	100	imp 407	. . . . . . . . 9 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ))
102	87, 83	gcdcomd 16474	. . . . . . . . . . . . . . 15 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦)) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁))
103	102	ex 413	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
104	103	3ad2ant1 1139	. . . . . . . . . . . . 13 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
105	104	com12 32	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
106	105	adantr 481	. . . . . . . . . . 11 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁)))
107	106	imp 407	. . . . . . . . . 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 1451	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ)))
112		ssun1 4107	. . . . . . . . . . . . . 14 ⊢ 𝑦 ⊆ (𝑦 ∪ {𝑧})
113		ssralv 3983	. . . . . . . . . . . . . 14 ⊢ (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
114	112, 113	mp1i 13	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1))
115		ssralv 3983	. . . . . . . . . . . . . . 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 4075	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑚 ∈ 𝑦) → (𝑦 ∖ {𝑚}) ⊆ ((𝑦 ∪ {𝑧}) ∖ {𝑚}))
119		ssralv 3983	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∖ {𝑚}) ⊆ ((𝑦 ∪ {𝑧}) ∖ {𝑚}) → (∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
120	118, 119	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ 𝑚 ∈ 𝑦) → (∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
121	120	ralimdva 3151	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ 𝑦 ∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
122	116, 121	syld 47	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1))
123	111, 114, 122	3anim123d 1451	. . . . . . . . . . . 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 418	. . . . . . . . . 10 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)
126	107, 125	eqtrd 2774	. . . . . . . . 9 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = 1)
127		rpmulgcd 16517	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ ∏𝑚 ∈ 𝑦 (𝐹‘𝑚) ∈ ℕ ∧ (𝐹‘𝑧) ∈ ℕ) ∧ (𝑁 gcd ∏𝑚 ∈ 𝑦 (𝐹‘𝑚)) = 1) → (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))) = (𝑁 gcd (𝐹‘𝑧)))
128	101, 126, 127	syl2anc 590	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) · (𝐹‘𝑧))) = (𝑁 gcd (𝐹‘𝑧)))
129		vsnid 4595	. . . . . . . . . . . . . . 15 ⊢ 𝑧 ∈ {𝑧}
130	129	olci 872	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ 𝑦 ∨ 𝑧 ∈ {𝑧})
131		elun 4083	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ (𝑦 ∪ {𝑧}) ↔ (𝑧 ∈ 𝑦 ∨ 𝑧 ∈ {𝑧}))
132	130, 131	mpbir 232	. . . . . . . . . . . . 13 ⊢ 𝑧 ∈ (𝑦 ∪ {𝑧})
133	73	oveq1d 7371	. . . . . . . . . . . . . . 15 ⊢ (𝑚 = 𝑧 → ((𝐹‘𝑚) gcd 𝑁) = ((𝐹‘𝑧) gcd 𝑁))
134	133	eqeq1d 2741	. . . . . . . . . . . . . 14 ⊢ (𝑚 = 𝑧 → (((𝐹‘𝑚) gcd 𝑁) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
135	134	rspcv 3556	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (𝑦 ∪ {𝑧}) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ((𝐹‘𝑧) gcd 𝑁) = 1))
136	132, 135	mp1i 13	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 → ((𝐹‘𝑧) gcd 𝑁) = 1))
137	136	imp 407	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → ((𝐹‘𝑧) gcd 𝑁) = 1)
138	77	nnzd 12541	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝐹‘𝑧) ∈ ℤ)
139	86, 138	gcdcomd 16474	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (𝑁 gcd (𝐹‘𝑧)) = ((𝐹‘𝑧) gcd 𝑁))
140	139	eqeq1d 2741	. . . . . . . . . . . 12 ⊢ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → ((𝑁 gcd (𝐹‘𝑧)) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
141	140	adantr 481	. . . . . . . . . . 11 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → ((𝑁 gcd (𝐹‘𝑧)) = 1 ↔ ((𝐹‘𝑧) gcd 𝑁) = 1))
142	137, 141	mpbird 258	. . . . . . . . . 10 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1) → (𝑁 gcd (𝐹‘𝑧)) = 1)
143	142	3adant3 1138	. . . . . . . . 9 ⊢ ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (𝑁 gcd (𝐹‘𝑧)) = 1)
144	143	adantl 482	. . . . . . . 8 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (𝑁 gcd (𝐹‘𝑧)) = 1)
145	94, 128, 144	3eqtrd 2778	. . . . . . 7 ⊢ ((((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) ∧ (((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1)) ∧ (((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1)) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)
146	145	exp31 420	. . . . . 6 ⊢ ((𝑦 ∈ Fin ∧ ¬ 𝑧 ∈ 𝑦) → ((((𝑦 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑦 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑦 ∀𝑛 ∈ (𝑦 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑦 (𝐹‘𝑚) gcd 𝑁) = 1) → ((((𝑦 ∪ {𝑧}) ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ (𝑦 ∪ {𝑧})∀𝑛 ∈ ((𝑦 ∪ {𝑧}) ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ (𝑦 ∪ {𝑧})(𝐹‘𝑚) gcd 𝑁) = 1)))
147	11, 22, 33, 44, 53, 146	findcard2s 9090	. . . . 5 ⊢ (𝑀 ∈ Fin → (((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 ∧ ∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1) → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))
148	147	3expd 1360	. . . 4 ⊢ (𝑀 ∈ Fin → ((𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝐹:ℕ⟶ℕ) → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))
149	148	3expd 1360	. . 3 ⊢ (𝑀 ∈ Fin → (𝑀 ⊆ ℕ → (𝑁 ∈ ℕ → (𝐹:ℕ⟶ℕ → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))))
150	149	3imp 1116	. 2 ⊢ ((𝑀 ∈ Fin ∧ 𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ) → (𝐹:ℕ⟶ℕ → (∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1 → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))))
151	150	3imp 1116	1 ⊢ (((𝑀 ∈ Fin ∧ 𝑀 ⊆ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝐹:ℕ⟶ℕ ∧ ∀𝑚 ∈ 𝑀 ((𝐹‘𝑚) gcd 𝑁) = 1) → (∀𝑚 ∈ 𝑀 ∀𝑛 ∈ (𝑀 ∖ {𝑚})((𝐹‘𝑚) gcd (𝐹‘𝑛)) = 1 → (∏𝑚 ∈ 𝑀 (𝐹‘𝑚) gcd 𝑁) = 1))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 207 ∧ wa 396 ∨ wo 853 ∧ w3a 1092 = wceq 1547 ∈ wcel 2119 ∀wral 3053 ∖ cdif 3880 ∪ cun 3881 ⊆ wss 3883 ∅c0 4261 {csn 4555 ⟶wf 6481 ‘cfv 6485 (class class class)co 7356 Fincfn 8883 1c1 11030 · cmul 11034 ℕcn 12165 ℤcz 12515 ∏cprod 15859 gcd cgcd 16454

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-10 2152 ax-11 2168 ax-12 2189 ax-ext 2711 ax-rep 5199 ax-sep 5218 ax-nul 5228 ax-pow 5294 ax-pr 5362 ax-un 7678 ax-inf2 9553 ax-cnex 11085 ax-resscn 11086 ax-1cn 11087 ax-icn 11088 ax-addcl 11089 ax-addrcl 11090 ax-mulcl 11091 ax-mulrcl 11092 ax-mulcom 11093 ax-addass 11094 ax-mulass 11095 ax-distr 11096 ax-i2m1 11097 ax-1ne0 11098 ax-1rid 11099 ax-rnegex 11100 ax-rrecex 11101 ax-cnre 11102 ax-pre-lttri 11103 ax-pre-lttrn 11104 ax-pre-ltadd 11105 ax-pre-mulgt0 11106 ax-pre-sup 11107

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3or 1093 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-nf 1791 df-sb 2074 df-mo 2543 df-eu 2573 df-clab 2718 df-cleq 2731 df-clel 2814 df-nfc 2888 df-ne 2935 df-nel 3039 df-ral 3054 df-rex 3064 df-rmo 3344 df-reu 3345 df-rab 3392 df-v 3433 df-sbc 3724 df-csb 3832 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3903 df-nul 4262 df-if 4455 df-pw 4531 df-sn 4556 df-pr 4558 df-op 4562 df-uni 4839 df-int 4878 df-iun 4923 df-br 5073 df-opab 5135 df-mpt 5154 df-tr 5180 df-id 5513 df-eprel 5518 df-po 5526 df-so 5527 df-fr 5571 df-se 5572 df-we 5573 df-xp 5624 df-rel 5625 df-cnv 5626 df-co 5627 df-dm 5628 df-rn 5629 df-res 5630 df-ima 5631 df-pred 6252 df-ord 6313 df-on 6314 df-lim 6315 df-suc 6316 df-iota 6441 df-fun 6487 df-fn 6488 df-f 6489 df-f1 6490 df-fo 6491 df-f1o 6492 df-fv 6493 df-isom 6494 df-riota 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-om 7807 df-1st 7931 df-2nd 7932 df-frecs 8221 df-wrecs 8252 df-recs 8301 df-rdg 8339 df-1o 8395 df-er 8633 df-en 8884 df-dom 8885 df-sdom 8886 df-fin 8887 df-sup 9345 df-inf 9346 df-oi 9415 df-card 9854 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-div 11799 df-nn 12166 df-2 12235 df-3 12236 df-n0 12429 df-z 12516 df-uz 12780 df-rp 12934 df-fz 13453 df-fzo 13600 df-fl 13742 df-mod 13820 df-seq 13955 df-exp 14015 df-hash 14284 df-cj 15052 df-re 15053 df-im 15054 df-sqrt 15188 df-abs 15189 df-clim 15441 df-prod 15860 df-dvds 16213 df-gcd 16455

This theorem is referenced by: coprmproddvdslem 16622

W3C validator