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 48027

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 12832	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℕ)
2		nnm1nn0 12472	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ₀)
3	1, 2	syl 17	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 1) ∈ ℕ₀)
4		fmtno 48007	. . . . . 6 ⊢ ((𝑁 − 1) ∈ ℕ₀ → (FermatNo‘(𝑁 − 1)) = ((2↑(2↑(𝑁 − 1))) + 1))
5	3, 4	syl 17	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘(𝑁 − 1)) = ((2↑(2↑(𝑁 − 1))) + 1))
6	5	oveq1d 7376	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 1))↑2) = (((2↑(2↑(𝑁 − 1))) + 1)↑2))
7		2nn 12248	. . . . . . . 8 ⊢ 2 ∈ ℕ
8	7	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℕ)
9		2nn0 12448	. . . . . . . . 9 ⊢ 2 ∈ ℕ₀
10	9	a1i 11	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℕ₀)
11	10, 3	nn0expcld 14202	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − 1)) ∈ ℕ₀)
12	8, 11	nnexpcld 14201	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 1))) ∈ ℕ)
13	12	nncnd 12184	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 1))) ∈ ℂ)
14		binom21 14175	. . . . 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 12250	. . . . . . . . 9 ⊢ 2 ∈ ℂ
17	16	a1i 11	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℂ)
18	17, 10, 11	expmuld 14105	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 1)) · 2)) = ((2↑(2↑(𝑁 − 1)))↑2))
19	17, 3	expp1d 14103	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 1) + 1)) = ((2↑(𝑁 − 1)) · 2))
20	1	nncnd 12184	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℂ)
21		npcan1 11569	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
22	20, 21	syl 17	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((𝑁 − 1) + 1) = 𝑁)
23	22	oveq2d 7377	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 1) + 1)) = (2↑𝑁))
24	19, 23	eqtr3d 2774	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(𝑁 − 1)) · 2) = (2↑𝑁))
25	24	oveq2d 7377	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 1)) · 2)) = (2↑(2↑𝑁)))
26	18, 25	eqtr3d 2774	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 1)))↑2) = (2↑(2↑𝑁)))
27	26	oveq1d 7376	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑(𝑁 − 1)))↑2) + (2 · (2↑(2↑(𝑁 − 1))))) = ((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))))
28	27	oveq1d 7376	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 1)))↑2) + (2 · (2↑(2↑(𝑁 − 1))))) + 1) = (((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1))
29	6, 15, 28	3eqtrd 2776	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 1))↑2) = (((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1))
30		uznn0sub 12817	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 2) ∈ ℕ₀)
31		fmtno 48007	. . . . . . . 8 ⊢ ((𝑁 − 2) ∈ ℕ₀ → (FermatNo‘(𝑁 − 2)) = ((2↑(2↑(𝑁 − 2))) + 1))
32	30, 31	syl 17	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘(𝑁 − 2)) = ((2↑(2↑(𝑁 − 2))) + 1))
33	32	oveq1d 7376	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 2)) − 1) = (((2↑(2↑(𝑁 − 2))) + 1) − 1))
34	33	oveq1d 7376	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((FermatNo‘(𝑁 − 2)) − 1)↑2) = ((((2↑(2↑(𝑁 − 2))) + 1) − 1)↑2))
35	10, 30	nn0expcld 14202	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − 2)) ∈ ℕ₀)
36	8, 35	nnexpcld 14201	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 2))) ∈ ℕ)
37	36	nncnd 12184	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 2))) ∈ ℂ)
38		peano2cn 11312	. . . . . . 7 ⊢ ((2↑(2↑(𝑁 − 2))) ∈ ℂ → ((2↑(2↑(𝑁 − 2))) + 1) ∈ ℂ)
39	37, 38	syl 17	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2))) + 1) ∈ ℂ)
40		binom2sub1 14177	. . . . . 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 14175	. . . . . . . 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 7376	. . . . . 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 7376	. . . . 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 2776	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((FermatNo‘(𝑁 − 2)) − 1)↑2) = ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1))
47	46	oveq2d 7377	. . 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 7379	. 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 14201	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) ∈ ℕ)
50	49	nncnd 12184	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) ∈ ℂ)
51	17, 37	mulcld 11159	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − 2)))) ∈ ℂ)
52	50, 51	addcld 11158	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) ∈ ℂ)
53		peano2cn 11312	. . . . . . 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 11159	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) ∈ ℂ)
56	54, 55	subcld 11499	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) ∈ ℂ)
57		1cnd 11133	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 1 ∈ ℂ)
58	17, 56, 57	adddid 11163	. . . 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 11158	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) ∈ ℂ)
60	17, 59, 55	subdid 11600	. . . . . 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 11163	. . . . . . . 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 11163	. . . . . . . . . 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 14105	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 2)) · 2)) = ((2↑(2↑(𝑁 − 2)))↑2))
64	17, 30	expp1d 14103	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 2) + 1)) = ((2↑(𝑁 − 2)) · 2))
65	20, 17, 57	subsubd 11527	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − (2 − 1)) = ((𝑁 − 2) + 1))
66	65	eqcomd 2743	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((𝑁 − 2) + 1) = (𝑁 − (2 − 1)))
67	66	oveq2d 7377	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 2) + 1)) = (2↑(𝑁 − (2 − 1))))
68	64, 67	eqtr3d 2774	. . . . . . . . . . . . . . 15 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(𝑁 − 2)) · 2) = (2↑(𝑁 − (2 − 1))))
69	68	oveq2d 7377	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 2)) · 2)) = (2↑(2↑(𝑁 − (2 − 1)))))
70	63, 69	eqtr3d 2774	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) = (2↑(2↑(𝑁 − (2 − 1)))))
71	70	oveq2d 7377	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2)))↑2)) = (2 · (2↑(2↑(𝑁 − (2 − 1))))))
72		2m1e1 12296	. . . . . . . . . . . . . . . . 17 ⊢ (2 − 1) = 1
73	72	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 − 1) = 1)
74	73	oveq2d 7377	. . . . . . . . . . . . . . 15 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − (2 − 1)) = (𝑁 − 1))
75	74	oveq2d 7377	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − (2 − 1))) = (2↑(𝑁 − 1)))
76	75	oveq2d 7377	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − (2 − 1)))) = (2↑(2↑(𝑁 − 1))))
77	76	oveq2d 7377	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − (2 − 1))))) = (2 · (2↑(2↑(𝑁 − 1)))))
78	71, 77	eqtrd 2772	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2)))↑2)) = (2 · (2↑(2↑(𝑁 − 1)))))
79	17, 17, 37	mulassd 11162	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · 2) · (2↑(2↑(𝑁 − 2)))) = (2 · (2 · (2↑(2↑(𝑁 − 2))))))
80	79	eqcomd 2743	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · (2↑(2↑(𝑁 − 2))))) = ((2 · 2) · (2↑(2↑(𝑁 − 2)))))
81	78, 80	oveq12d 7379	. . . . . . . . . 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 2772	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2)))))) = ((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))))
83		2t1e2 12333	. . . . . . . . . 10 ⊢ (2 · 1) = 2
84	83	a1i 11	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 1) = 2)
85	82, 84	oveq12d 7379	. . . . . . . 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 2772	. . . . . . 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 11163	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + (2 · 1)))
88	84	oveq2d 7377	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2↑(2↑(𝑁 − 2)))) + (2 · 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + 2))
89	87, 88	eqtrd 2772	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + 2))
90	89	oveq2d 7377	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · ((2↑(2↑(𝑁 − 2))) + 1))) = (2 · ((2 · (2↑(2↑(𝑁 − 2)))) + 2)))
91	17, 51, 17	adddid 11163	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2 · (2↑(2↑(𝑁 − 2)))) + 2)) = ((2 · (2 · (2↑(2↑(𝑁 − 2))))) + (2 · 2)))
92		2t2e4 12334	. . . . . . . . . 10 ⊢ (2 · 2) = 4
93	92	a1i 11	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 2) = 4)
94	80, 93	oveq12d 7379	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2 · (2↑(2↑(𝑁 − 2))))) + (2 · 2)) = (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4))
95	90, 91, 94	3eqtrd 2776	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · ((2↑(2↑(𝑁 − 2))) + 1))) = (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4))
96	86, 95	oveq12d 7379	. . . . . 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 2772	. . . . 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 7379	. . . 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 2772	. . 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 7377	. 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 11159	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − 1)))) ∈ ℂ)
102	16, 16	mulcli 11146	. . . . . . . . . . . . 13 ⊢ (2 · 2) ∈ ℂ
103	102	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 2) ∈ ℂ)
104	103, 37	mulcld 11159	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · 2) · (2↑(2↑(𝑁 − 2)))) ∈ ℂ)
105	101, 104	addcld 11158	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) ∈ ℂ)
106	105, 17	addcld 11158	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) ∈ ℂ)
107		4cn 12260	. . . . . . . . . . 11 ⊢ 4 ∈ ℂ
108	107	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 4 ∈ ℂ)
109	104, 108	addcld 11158	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4) ∈ ℂ)
110	105, 17, 17	addassd 11161	. . . . . . . . . 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 12305	. . . . . . . . . . . 12 ⊢ (2 + 2) = 4
112	111	a1i 11	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 + 2) = 4)
113	112	oveq2d 7377	. . . . . . . . . 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 11161	. . . . . . . . . 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 2776	. . . . . . . . 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 11559	. . . . . . . 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 2743	. . . . . . 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 11499	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) ∈ ℂ)
119	101, 17, 118	subadd2d 11518	. . . . . . 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 232	. . . . . 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 7377	. . . . 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 12836	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℕ₀)
123	10, 122	nn0expcld 14202	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑𝑁) ∈ ℕ₀)
124	8, 123	nnexpcld 14201	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑𝑁)) ∈ ℕ)
125	124	nncnd 12184	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑𝑁)) ∈ ℂ)
126	125, 101	addcld 11158	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) ∈ ℂ)
127	118, 17	addcld 11158	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2) ∈ ℂ)
128	126, 127, 125	subadd2d 11518	. . . . 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 7376	. . 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 11520	. . 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 48007	. . . 4 ⊢ (𝑁 ∈ ℕ₀ → (FermatNo‘𝑁) = ((2↑(2↑𝑁)) + 1))
133	122, 132	syl 17	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘𝑁) = ((2↑(2↑𝑁)) + 1))
134	130, 131, 133	3eqtr4d 2782	. 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 2777	1 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘𝑁) = (((FermatNo‘(𝑁 − 1))↑2) − (2 · (((FermatNo‘(𝑁 − 2)) − 1)↑2))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 = wceq 1542 ∈ wcel 2114 ‘cfv 6493 (class class class)co 7361 ℂcc 11030 1c1 11033 + caddc 11035 · cmul 11037 − cmin 11371 ℕcn 12168 2c2 12230 4c4 12232 ℕ₀cn0 12431 ℤ_≥cuz 12782 ↑cexp 14017 FermatNocfmtno 48005

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-sep 5232 ax-nul 5242 ax-pow 5303 ax-pr 5371 ax-un 7683 ax-cnex 11088 ax-resscn 11089 ax-1cn 11090 ax-icn 11091 ax-addcl 11092 ax-addrcl 11093 ax-mulcl 11094 ax-mulrcl 11095 ax-mulcom 11096 ax-addass 11097 ax-mulass 11098 ax-distr 11099 ax-i2m1 11100 ax-1ne0 11101 ax-1rid 11102 ax-rnegex 11103 ax-rrecex 11104 ax-cnre 11105 ax-pre-lttri 11106 ax-pre-lttrn 11107 ax-pre-ltadd 11108 ax-pre-mulgt0 11109

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3343 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-op 4575 df-uni 4852 df-iun 4936 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 df-id 5520 df-eprel 5525 df-po 5533 df-so 5534 df-fr 5578 df-we 5580 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-pred 6260 df-ord 6321 df-on 6322 df-lim 6323 df-suc 6324 df-iota 6449 df-fun 6495 df-fn 6496 df-f 6497 df-f1 6498 df-fo 6499 df-f1o 6500 df-fv 6501 df-riota 7318 df-ov 7364 df-oprab 7365 df-mpo 7366 df-om 7812 df-2nd 7937 df-frecs 8225 df-wrecs 8256 df-recs 8305 df-rdg 8343 df-er 8637 df-en 8888 df-dom 8889 df-sdom 8890 df-pnf 11175 df-mnf 11176 df-xr 11177 df-ltxr 11178 df-le 11179 df-sub 11373 df-neg 11374 df-div 11802 df-nn 12169 df-2 12238 df-3 12239 df-4 12240 df-n0 12432 df-z 12519 df-uz 12783 df-seq 13958 df-exp 14018 df-fmtno 48006

This theorem is referenced by: (None)

W3C validator