fmtnorec4 - Mathbox for Alexander van der Vekens

	Mathbox for Alexander van der Vekens		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > fmtnorec4		Structured version Visualization version GIF version

Theorem fmtnorec4 46204

Description: The fourth recurrence relation for Fermat numbers, see Wikipedia "Fermat number", 31-Jul-2021, https://en.wikipedia.org/wiki/Fermat_number#Basic_properties. (Contributed by AV, 31-Jul-2021.)

**Assertion**
Ref	Expression
fmtnorec4	⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘𝑁) = (((FermatNo‘(𝑁 − 1))↑2) − (2 · (((FermatNo‘(𝑁 − 2)) − 1)↑2))))

**Proof of Theorem fmtnorec4**
Step	Hyp	Ref	Expression
1		eluz2nn 12865	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℕ)
2		nnm1nn0 12510	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ₀)
3	1, 2	syl 17	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 1) ∈ ℕ₀)
4		fmtno 46184	. . . . . 6 ⊢ ((𝑁 − 1) ∈ ℕ₀ → (FermatNo‘(𝑁 − 1)) = ((2↑(2↑(𝑁 − 1))) + 1))
5	3, 4	syl 17	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘(𝑁 − 1)) = ((2↑(2↑(𝑁 − 1))) + 1))
6	5	oveq1d 7421	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 1))↑2) = (((2↑(2↑(𝑁 − 1))) + 1)↑2))
7		2nn 12282	. . . . . . . 8 ⊢ 2 ∈ ℕ
8	7	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℕ)
9		2nn0 12486	. . . . . . . . 9 ⊢ 2 ∈ ℕ₀
10	9	a1i 11	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℕ₀)
11	10, 3	nn0expcld 14206	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − 1)) ∈ ℕ₀)
12	8, 11	nnexpcld 14205	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 1))) ∈ ℕ)
13	12	nncnd 12225	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 1))) ∈ ℂ)
14		binom21 14179	. . . . 5 ⊢ ((2↑(2↑(𝑁 − 1))) ∈ ℂ → (((2↑(2↑(𝑁 − 1))) + 1)↑2) = ((((2↑(2↑(𝑁 − 1)))↑2) + (2 · (2↑(2↑(𝑁 − 1))))) + 1))
15	13, 14	syl 17	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑(𝑁 − 1))) + 1)↑2) = ((((2↑(2↑(𝑁 − 1)))↑2) + (2 · (2↑(2↑(𝑁 − 1))))) + 1))
16		2cn 12284	. . . . . . . . 9 ⊢ 2 ∈ ℂ
17	16	a1i 11	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℂ)
18	17, 10, 11	expmuld 14111	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 1)) · 2)) = ((2↑(2↑(𝑁 − 1)))↑2))
19	17, 3	expp1d 14109	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 1) + 1)) = ((2↑(𝑁 − 1)) · 2))
20	1	nncnd 12225	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℂ)
21		npcan1 11636	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
22	20, 21	syl 17	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((𝑁 − 1) + 1) = 𝑁)
23	22	oveq2d 7422	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 1) + 1)) = (2↑𝑁))
24	19, 23	eqtr3d 2775	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(𝑁 − 1)) · 2) = (2↑𝑁))
25	24	oveq2d 7422	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 1)) · 2)) = (2↑(2↑𝑁)))
26	18, 25	eqtr3d 2775	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 1)))↑2) = (2↑(2↑𝑁)))
27	26	oveq1d 7421	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑(𝑁 − 1)))↑2) + (2 · (2↑(2↑(𝑁 − 1))))) = ((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))))
28	27	oveq1d 7421	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 1)))↑2) + (2 · (2↑(2↑(𝑁 − 1))))) + 1) = (((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1))
29	6, 15, 28	3eqtrd 2777	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 1))↑2) = (((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1))
30		uznn0sub 12858	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 2) ∈ ℕ₀)
31		fmtno 46184	. . . . . . . 8 ⊢ ((𝑁 − 2) ∈ ℕ₀ → (FermatNo‘(𝑁 − 2)) = ((2↑(2↑(𝑁 − 2))) + 1))
32	30, 31	syl 17	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘(𝑁 − 2)) = ((2↑(2↑(𝑁 − 2))) + 1))
33	32	oveq1d 7421	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 2)) − 1) = (((2↑(2↑(𝑁 − 2))) + 1) − 1))
34	33	oveq1d 7421	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((FermatNo‘(𝑁 − 2)) − 1)↑2) = ((((2↑(2↑(𝑁 − 2))) + 1) − 1)↑2))
35	10, 30	nn0expcld 14206	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − 2)) ∈ ℕ₀)
36	8, 35	nnexpcld 14205	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 2))) ∈ ℕ)
37	36	nncnd 12225	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 2))) ∈ ℂ)
38		peano2cn 11383	. . . . . . 7 ⊢ ((2↑(2↑(𝑁 − 2))) ∈ ℂ → ((2↑(2↑(𝑁 − 2))) + 1) ∈ ℂ)
39	37, 38	syl 17	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2))) + 1) ∈ ℂ)
40		binom2sub1 14181	. . . . . 6 ⊢ (((2↑(2↑(𝑁 − 2))) + 1) ∈ ℂ → ((((2↑(2↑(𝑁 − 2))) + 1) − 1)↑2) = (((((2↑(2↑(𝑁 − 2))) + 1)↑2) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1))
41	39, 40	syl 17	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 2))) + 1) − 1)↑2) = (((((2↑(2↑(𝑁 − 2))) + 1)↑2) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1))
42		binom21 14179	. . . . . . . 8 ⊢ ((2↑(2↑(𝑁 − 2))) ∈ ℂ → (((2↑(2↑(𝑁 − 2))) + 1)↑2) = ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1))
43	37, 42	syl 17	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑(𝑁 − 2))) + 1)↑2) = ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1))
44	43	oveq1d 7421	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 2))) + 1)↑2) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) = (((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))))
45	44	oveq1d 7421	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((((2↑(2↑(𝑁 − 2))) + 1)↑2) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1) = ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1))
46	34, 41, 45	3eqtrd 2777	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((FermatNo‘(𝑁 − 2)) − 1)↑2) = ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1))
47	46	oveq2d 7422	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (((FermatNo‘(𝑁 − 2)) − 1)↑2)) = (2 · ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1)))
48	29, 47	oveq12d 7424	. 2 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((FermatNo‘(𝑁 − 1))↑2) − (2 · (((FermatNo‘(𝑁 − 2)) − 1)↑2))) = ((((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1) − (2 · ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1))))
49	36, 10	nnexpcld 14205	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) ∈ ℕ)
50	49	nncnd 12225	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) ∈ ℂ)
51	17, 37	mulcld 11231	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − 2)))) ∈ ℂ)
52	50, 51	addcld 11230	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) ∈ ℂ)
53		peano2cn 11383	. . . . . . 7 ⊢ ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) ∈ ℂ → ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) ∈ ℂ)
54	52, 53	syl 17	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) ∈ ℂ)
55	17, 39	mulcld 11231	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) ∈ ℂ)
56	54, 55	subcld 11568	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) ∈ ℂ)
57		1cnd 11206	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 1 ∈ ℂ)
58	17, 56, 57	adddid 11235	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1)) = ((2 · (((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1)))) + (2 · 1)))
59	52, 57	addcld 11230	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) ∈ ℂ)
60	17, 59, 55	subdid 11667	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1)))) = ((2 · ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1)) − (2 · (2 · ((2↑(2↑(𝑁 − 2))) + 1)))))
61	17, 52, 57	adddid 11235	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1)) = ((2 · (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2)))))) + (2 · 1)))
62	17, 50, 51	adddid 11235	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2)))))) = ((2 · ((2↑(2↑(𝑁 − 2)))↑2)) + (2 · (2 · (2↑(2↑(𝑁 − 2)))))))
63	17, 10, 35	expmuld 14111	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 2)) · 2)) = ((2↑(2↑(𝑁 − 2)))↑2))
64	17, 30	expp1d 14109	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 2) + 1)) = ((2↑(𝑁 − 2)) · 2))
65	20, 17, 57	subsubd 11596	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − (2 − 1)) = ((𝑁 − 2) + 1))
66	65	eqcomd 2739	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((𝑁 − 2) + 1) = (𝑁 − (2 − 1)))
67	66	oveq2d 7422	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 2) + 1)) = (2↑(𝑁 − (2 − 1))))
68	64, 67	eqtr3d 2775	. . . . . . . . . . . . . . 15 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(𝑁 − 2)) · 2) = (2↑(𝑁 − (2 − 1))))
69	68	oveq2d 7422	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 2)) · 2)) = (2↑(2↑(𝑁 − (2 − 1)))))
70	63, 69	eqtr3d 2775	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) = (2↑(2↑(𝑁 − (2 − 1)))))
71	70	oveq2d 7422	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2)))↑2)) = (2 · (2↑(2↑(𝑁 − (2 − 1))))))
72		2m1e1 12335	. . . . . . . . . . . . . . . . 17 ⊢ (2 − 1) = 1
73	72	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 − 1) = 1)
74	73	oveq2d 7422	. . . . . . . . . . . . . . 15 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − (2 − 1)) = (𝑁 − 1))
75	74	oveq2d 7422	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − (2 − 1))) = (2↑(𝑁 − 1)))
76	75	oveq2d 7422	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − (2 − 1)))) = (2↑(2↑(𝑁 − 1))))
77	76	oveq2d 7422	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − (2 − 1))))) = (2 · (2↑(2↑(𝑁 − 1)))))
78	71, 77	eqtrd 2773	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2)))↑2)) = (2 · (2↑(2↑(𝑁 − 1)))))
79	17, 17, 37	mulassd 11234	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · 2) · (2↑(2↑(𝑁 − 2)))) = (2 · (2 · (2↑(2↑(𝑁 − 2))))))
80	79	eqcomd 2739	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · (2↑(2↑(𝑁 − 2))))) = ((2 · 2) · (2↑(2↑(𝑁 − 2)))))
81	78, 80	oveq12d 7424	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · ((2↑(2↑(𝑁 − 2)))↑2)) + (2 · (2 · (2↑(2↑(𝑁 − 2)))))) = ((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))))
82	62, 81	eqtrd 2773	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2)))))) = ((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))))
83		2t1e2 12372	. . . . . . . . . 10 ⊢ (2 · 1) = 2
84	83	a1i 11	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 1) = 2)
85	82, 84	oveq12d 7424	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2)))))) + (2 · 1)) = (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2))
86	61, 85	eqtrd 2773	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1)) = (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2))
87	17, 37, 57	adddid 11235	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + (2 · 1)))
88	84	oveq2d 7422	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2↑(2↑(𝑁 − 2)))) + (2 · 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + 2))
89	87, 88	eqtrd 2773	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + 2))
90	89	oveq2d 7422	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · ((2↑(2↑(𝑁 − 2))) + 1))) = (2 · ((2 · (2↑(2↑(𝑁 − 2)))) + 2)))
91	17, 51, 17	adddid 11235	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2 · (2↑(2↑(𝑁 − 2)))) + 2)) = ((2 · (2 · (2↑(2↑(𝑁 − 2))))) + (2 · 2)))
92		2t2e4 12373	. . . . . . . . . 10 ⊢ (2 · 2) = 4
93	92	a1i 11	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 2) = 4)
94	80, 93	oveq12d 7424	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2 · (2↑(2↑(𝑁 − 2))))) + (2 · 2)) = (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4))
95	90, 91, 94	3eqtrd 2777	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · ((2↑(2↑(𝑁 − 2))) + 1))) = (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4))
96	86, 95	oveq12d 7424	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1)) − (2 · (2 · ((2↑(2↑(𝑁 − 2))) + 1)))) = ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)))
97	60, 96	eqtrd 2773	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1)))) = ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)))
98	97, 84	oveq12d 7424	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1)))) + (2 · 1)) = (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2))
99	58, 98	eqtrd 2773	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1)) = (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2))
100	99	oveq2d 7422	. 2 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1) − (2 · ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1))) = ((((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1) − (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)))
101	17, 13	mulcld 11231	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − 1)))) ∈ ℂ)
102	16, 16	mulcli 11218	. . . . . . . . . . . . 13 ⊢ (2 · 2) ∈ ℂ
103	102	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 2) ∈ ℂ)
104	103, 37	mulcld 11231	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · 2) · (2↑(2↑(𝑁 − 2)))) ∈ ℂ)
105	101, 104	addcld 11230	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) ∈ ℂ)
106	105, 17	addcld 11230	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) ∈ ℂ)
107		4cn 12294	. . . . . . . . . . 11 ⊢ 4 ∈ ℂ
108	107	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 4 ∈ ℂ)
109	104, 108	addcld 11230	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4) ∈ ℂ)
110	105, 17, 17	addassd 11233	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) + 2) = (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + (2 + 2)))
111		2p2e4 12344	. . . . . . . . . . . 12 ⊢ (2 + 2) = 4
112	111	a1i 11	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 + 2) = 4)
113	112	oveq2d 7422	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + (2 + 2)) = (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 4))
114	101, 104, 108	addassd 11233	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 4) = ((2 · (2↑(2↑(𝑁 − 1)))) + (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)))
115	110, 113, 114	3eqtrd 2777	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) + 2) = ((2 · (2↑(2↑(𝑁 − 1)))) + (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)))
116	106, 17, 101, 109, 115	subaddeqd 11626	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) = ((2 · (2↑(2↑(𝑁 − 1)))) − 2))
117	116	eqcomd 2739	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2↑(2↑(𝑁 − 1)))) − 2) = ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)))
118	106, 109	subcld 11568	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) ∈ ℂ)
119	101, 17, 118	subadd2d 11587	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · (2↑(2↑(𝑁 − 1)))) − 2) = ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) ↔ (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2) = (2 · (2↑(2↑(𝑁 − 1))))))
120	117, 119	mpbid 231	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2) = (2 · (2↑(2↑(𝑁 − 1)))))
121	120	oveq2d 7422	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑𝑁)) + (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)) = ((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))))
122		eluzge2nn0 12868	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℕ₀)
123	10, 122	nn0expcld 14206	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑𝑁) ∈ ℕ₀)
124	8, 123	nnexpcld 14205	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑𝑁)) ∈ ℕ)
125	124	nncnd 12225	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑𝑁)) ∈ ℂ)
126	125, 101	addcld 11230	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) ∈ ℂ)
127	118, 17	addcld 11230	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2) ∈ ℂ)
128	126, 127, 125	subadd2d 11587	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) − (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)) = (2↑(2↑𝑁)) ↔ ((2↑(2↑𝑁)) + (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)) = ((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1)))))))
129	121, 128	mpbird 257	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) − (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)) = (2↑(2↑𝑁)))
130	129	oveq1d 7421	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) − (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)) + 1) = ((2↑(2↑𝑁)) + 1))
131	126, 57, 127	addsubd 11589	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1) − (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)) = ((((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) − (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)) + 1))
132		fmtno 46184	. . . 4 ⊢ (𝑁 ∈ ℕ₀ → (FermatNo‘𝑁) = ((2↑(2↑𝑁)) + 1))
133	122, 132	syl 17	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘𝑁) = ((2↑(2↑𝑁)) + 1))
134	130, 131, 133	3eqtr4d 2783	. 2 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1) − (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2)) = (FermatNo‘𝑁))
135	48, 100, 134	3eqtrrd 2778	1 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘𝑁) = (((FermatNo‘(𝑁 − 1))↑2) − (2 · (((FermatNo‘(𝑁 − 2)) − 1)↑2))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 = wceq 1542 ∈ wcel 2107 ‘cfv 6541 (class class class)co 7406 ℂcc 11105 1c1 11108 + caddc 11110 · cmul 11112 − cmin 11441 ℕcn 12209 2c2 12264 4c4 12266 ℕ₀cn0 12469 ℤ_≥cuz 12819 ↑cexp 14024 FermatNocfmtno 46182

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7722 ax-cnex 11163 ax-resscn 11164 ax-1cn 11165 ax-icn 11166 ax-addcl 11167 ax-addrcl 11168 ax-mulcl 11169 ax-mulrcl 11170 ax-mulcom 11171 ax-addass 11172 ax-mulass 11173 ax-distr 11174 ax-i2m1 11175 ax-1ne0 11176 ax-1rid 11177 ax-rnegex 11178 ax-rrecex 11179 ax-cnre 11180 ax-pre-lttri 11181 ax-pre-lttrn 11182 ax-pre-ltadd 11183 ax-pre-mulgt0 11184

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-pss 3967 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-op 4635 df-uni 4909 df-iun 4999 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5574 df-eprel 5580 df-po 5588 df-so 5589 df-fr 5631 df-we 5633 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-pred 6298 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6493 df-fun 6543 df-fn 6544 df-f 6545 df-f1 6546 df-fo 6547 df-f1o 6548 df-fv 6549 df-riota 7362 df-ov 7409 df-oprab 7410 df-mpo 7411 df-om 7853 df-2nd 7973 df-frecs 8263 df-wrecs 8294 df-recs 8368 df-rdg 8407 df-er 8700 df-en 8937 df-dom 8938 df-sdom 8939 df-pnf 11247 df-mnf 11248 df-xr 11249 df-ltxr 11250 df-le 11251 df-sub 11443 df-neg 11444 df-div 11869 df-nn 12210 df-2 12272 df-3 12273 df-4 12274 df-n0 12470 df-z 12556 df-uz 12820 df-seq 13964 df-exp 14025 df-fmtno 46183

This theorem is referenced by: (None)

W3C validator