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 43702

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 12276	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℕ)
2		nnm1nn0 11930	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ₀)
3	1, 2	syl 17	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 1) ∈ ℕ₀)
4		fmtno 43682	. . . . . 6 ⊢ ((𝑁 − 1) ∈ ℕ₀ → (FermatNo‘(𝑁 − 1)) = ((2↑(2↑(𝑁 − 1))) + 1))
5	3, 4	syl 17	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘(𝑁 − 1)) = ((2↑(2↑(𝑁 − 1))) + 1))
6	5	oveq1d 7163	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 1))↑2) = (((2↑(2↑(𝑁 − 1))) + 1)↑2))
7		2nn 11702	. . . . . . . 8 ⊢ 2 ∈ ℕ
8	7	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℕ)
9		2nn0 11906	. . . . . . . . 9 ⊢ 2 ∈ ℕ₀
10	9	a1i 11	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℕ₀)
11	10, 3	nn0expcld 13599	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − 1)) ∈ ℕ₀)
12	8, 11	nnexpcld 13598	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 1))) ∈ ℕ)
13	12	nncnd 11646	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 1))) ∈ ℂ)
14		binom21 13572	. . . . 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 11704	. . . . . . . . 9 ⊢ 2 ∈ ℂ
17	16	a1i 11	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 2 ∈ ℂ)
18	17, 10, 11	expmuld 13505	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 1)) · 2)) = ((2↑(2↑(𝑁 − 1)))↑2))
19	17, 3	expp1d 13503	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 1) + 1)) = ((2↑(𝑁 − 1)) · 2))
20	1	nncnd 11646	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℂ)
21		npcan1 11057	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
22	20, 21	syl 17	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((𝑁 − 1) + 1) = 𝑁)
23	22	oveq2d 7164	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 1) + 1)) = (2↑𝑁))
24	19, 23	eqtr3d 2856	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(𝑁 − 1)) · 2) = (2↑𝑁))
25	24	oveq2d 7164	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 1)) · 2)) = (2↑(2↑𝑁)))
26	18, 25	eqtr3d 2856	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 1)))↑2) = (2↑(2↑𝑁)))
27	26	oveq1d 7163	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑(𝑁 − 1)))↑2) + (2 · (2↑(2↑(𝑁 − 1))))) = ((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))))
28	27	oveq1d 7163	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 1)))↑2) + (2 · (2↑(2↑(𝑁 − 1))))) + 1) = (((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1))
29	6, 15, 28	3eqtrd 2858	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 1))↑2) = (((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) + 1))
30		uznn0sub 12269	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 2) ∈ ℕ₀)
31		fmtno 43682	. . . . . . . 8 ⊢ ((𝑁 − 2) ∈ ℕ₀ → (FermatNo‘(𝑁 − 2)) = ((2↑(2↑(𝑁 − 2))) + 1))
32	30, 31	syl 17	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘(𝑁 − 2)) = ((2↑(2↑(𝑁 − 2))) + 1))
33	32	oveq1d 7163	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((FermatNo‘(𝑁 − 2)) − 1) = (((2↑(2↑(𝑁 − 2))) + 1) − 1))
34	33	oveq1d 7163	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((FermatNo‘(𝑁 − 2)) − 1)↑2) = ((((2↑(2↑(𝑁 − 2))) + 1) − 1)↑2))
35	10, 30	nn0expcld 13599	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − 2)) ∈ ℕ₀)
36	8, 35	nnexpcld 13598	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 2))) ∈ ℕ)
37	36	nncnd 11646	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − 2))) ∈ ℂ)
38		peano2cn 10804	. . . . . . 7 ⊢ ((2↑(2↑(𝑁 − 2))) ∈ ℂ → ((2↑(2↑(𝑁 − 2))) + 1) ∈ ℂ)
39	37, 38	syl 17	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2))) + 1) ∈ ℂ)
40		binom2sub1 13574	. . . . . 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 13572	. . . . . . . 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 7163	. . . . . 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 7163	. . . . 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 2858	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((FermatNo‘(𝑁 − 2)) − 1)↑2) = ((((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) + 1))
47	46	oveq2d 7164	. . 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 7166	. 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 13598	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) ∈ ℕ)
50	49	nncnd 11646	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) ∈ ℂ)
51	17, 37	mulcld 10653	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − 2)))) ∈ ℂ)
52	50, 51	addcld 10652	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) ∈ ℂ)
53		peano2cn 10804	. . . . . . 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 10653	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) ∈ ℂ)
56	54, 55	subcld 10989	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) − (2 · ((2↑(2↑(𝑁 − 2))) + 1))) ∈ ℂ)
57		1cnd 10628	. . . . 5 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 1 ∈ ℂ)
58	17, 56, 57	adddid 10657	. . . 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 10652	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2))))) + 1) ∈ ℂ)
60	17, 59, 55	subdid 11088	. . . . . 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 10657	. . . . . . . 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 10657	. . . . . . . . . 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 13505	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 2)) · 2)) = ((2↑(2↑(𝑁 − 2)))↑2))
64	17, 30	expp1d 13503	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 2) + 1)) = ((2↑(𝑁 − 2)) · 2))
65	20, 17, 57	subsubd 11017	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − (2 − 1)) = ((𝑁 − 2) + 1))
66	65	eqcomd 2825	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((𝑁 − 2) + 1) = (𝑁 − (2 − 1)))
67	66	oveq2d 7164	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((𝑁 − 2) + 1)) = (2↑(𝑁 − (2 − 1))))
68	64, 67	eqtr3d 2856	. . . . . . . . . . . . . . 15 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(𝑁 − 2)) · 2) = (2↑(𝑁 − (2 − 1))))
69	68	oveq2d 7164	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑((2↑(𝑁 − 2)) · 2)) = (2↑(2↑(𝑁 − (2 − 1)))))
70	63, 69	eqtr3d 2856	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑(𝑁 − 2)))↑2) = (2↑(2↑(𝑁 − (2 − 1)))))
71	70	oveq2d 7164	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2)))↑2)) = (2 · (2↑(2↑(𝑁 − (2 − 1))))))
72		2m1e1 11755	. . . . . . . . . . . . . . . . 17 ⊢ (2 − 1) = 1
73	72	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 − 1) = 1)
74	73	oveq2d 7164	. . . . . . . . . . . . . . 15 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − (2 − 1)) = (𝑁 − 1))
75	74	oveq2d 7164	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(𝑁 − (2 − 1))) = (2↑(𝑁 − 1)))
76	75	oveq2d 7164	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑(𝑁 − (2 − 1)))) = (2↑(2↑(𝑁 − 1))))
77	76	oveq2d 7164	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − (2 − 1))))) = (2 · (2↑(2↑(𝑁 − 1)))))
78	71, 77	eqtrd 2854	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2)))↑2)) = (2 · (2↑(2↑(𝑁 − 1)))))
79	17, 17, 37	mulassd 10656	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · 2) · (2↑(2↑(𝑁 − 2)))) = (2 · (2 · (2↑(2↑(𝑁 − 2))))))
80	79	eqcomd 2825	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · (2↑(2↑(𝑁 − 2))))) = ((2 · 2) · (2↑(2↑(𝑁 − 2)))))
81	78, 80	oveq12d 7166	. . . . . . . . . 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 2854	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (((2↑(2↑(𝑁 − 2)))↑2) + (2 · (2↑(2↑(𝑁 − 2)))))) = ((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))))
83		2t1e2 11792	. . . . . . . . . 10 ⊢ (2 · 1) = 2
84	83	a1i 11	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 1) = 2)
85	82, 84	oveq12d 7166	. . . . . . . 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 2854	. . . . . . 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 10657	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + (2 · 1)))
88	84	oveq2d 7164	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2↑(2↑(𝑁 − 2)))) + (2 · 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + 2))
89	87, 88	eqtrd 2854	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2↑(2↑(𝑁 − 2))) + 1)) = ((2 · (2↑(2↑(𝑁 − 2)))) + 2))
90	89	oveq2d 7164	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · ((2↑(2↑(𝑁 − 2))) + 1))) = (2 · ((2 · (2↑(2↑(𝑁 − 2)))) + 2)))
91	17, 51, 17	adddid 10657	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · ((2 · (2↑(2↑(𝑁 − 2)))) + 2)) = ((2 · (2 · (2↑(2↑(𝑁 − 2))))) + (2 · 2)))
92		2t2e4 11793	. . . . . . . . . 10 ⊢ (2 · 2) = 4
93	92	a1i 11	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 2) = 4)
94	80, 93	oveq12d 7166	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2 · (2↑(2↑(𝑁 − 2))))) + (2 · 2)) = (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4))
95	90, 91, 94	3eqtrd 2858	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2 · ((2↑(2↑(𝑁 − 2))) + 1))) = (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4))
96	86, 95	oveq12d 7166	. . . . . 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 2854	. . . . 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 7166	. . . 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 2854	. . 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 7164	. 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 10653	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · (2↑(2↑(𝑁 − 1)))) ∈ ℂ)
102	16, 16	mulcli 10640	. . . . . . . . . . . . 13 ⊢ (2 · 2) ∈ ℂ
103	102	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 · 2) ∈ ℂ)
104	103, 37	mulcld 10653	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · 2) · (2↑(2↑(𝑁 − 2)))) ∈ ℂ)
105	101, 104	addcld 10652	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) ∈ ℂ)
106	105, 17	addcld 10652	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) ∈ ℂ)
107		4cn 11714	. . . . . . . . . . 11 ⊢ 4 ∈ ℂ
108	107	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 4 ∈ ℂ)
109	104, 108	addcld 10652	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4) ∈ ℂ)
110	105, 17, 17	addassd 10655	. . . . . . . . . 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 11764	. . . . . . . . . . . 12 ⊢ (2 + 2) = 4
112	111	a1i 11	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2 + 2) = 4)
113	112	oveq2d 7164	. . . . . . . . . 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 10655	. . . . . . . . . 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 2858	. . . . . . . . 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 11047	. . . . . . . 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 2825	. . . . . . 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 10989	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) ∈ ℂ)
119	101, 17, 118	subadd2d 11008	. . . . . . 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 234	. . . . . 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 7164	. . . . 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 12279	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℕ₀)
123	10, 122	nn0expcld 13599	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑𝑁) ∈ ℕ₀)
124	8, 123	nnexpcld 13598	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑𝑁)) ∈ ℕ)
125	124	nncnd 11646	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (2↑(2↑𝑁)) ∈ ℂ)
126	125, 101	addcld 10652	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → ((2↑(2↑𝑁)) + (2 · (2↑(2↑(𝑁 − 1))))) ∈ ℂ)
127	118, 17	addcld 10652	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (((((2 · (2↑(2↑(𝑁 − 1)))) + ((2 · 2) · (2↑(2↑(𝑁 − 2))))) + 2) − (((2 · 2) · (2↑(2↑(𝑁 − 2)))) + 4)) + 2) ∈ ℂ)
128	126, 127, 125	subadd2d 11008	. . . . 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 259	. . . 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 7163	. . 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 11010	. . 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 43682	. . . 4 ⊢ (𝑁 ∈ ℕ₀ → (FermatNo‘𝑁) = ((2↑(2↑𝑁)) + 1))
133	122, 132	syl 17	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘𝑁) = ((2↑(2↑𝑁)) + 1))
134	130, 131, 133	3eqtr4d 2864	. 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 2859	1 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (FermatNo‘𝑁) = (((FermatNo‘(𝑁 − 1))↑2) − (2 · (((FermatNo‘(𝑁 − 2)) − 1)↑2))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 = wceq 1531 ∈ wcel 2108 ‘cfv 6348 (class class class)co 7148 ℂcc 10527 1c1 10530 + caddc 10532 · cmul 10534 − cmin 10862 ℕcn 11630 2c2 11684 4c4 11686 ℕ₀cn0 11889 ℤ_≥cuz 12235 ↑cexp 13421 FermatNocfmtno 43680

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1790 ax-4 1804 ax-5 1905 ax-6 1964 ax-7 2009 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2154 ax-12 2170 ax-ext 2791 ax-sep 5194 ax-nul 5201 ax-pow 5257 ax-pr 5320 ax-un 7453 ax-cnex 10585 ax-resscn 10586 ax-1cn 10587 ax-icn 10588 ax-addcl 10589 ax-addrcl 10590 ax-mulcl 10591 ax-mulrcl 10592 ax-mulcom 10593 ax-addass 10594 ax-mulass 10595 ax-distr 10596 ax-i2m1 10597 ax-1ne0 10598 ax-1rid 10599 ax-rnegex 10600 ax-rrecex 10601 ax-cnre 10602 ax-pre-lttri 10603 ax-pre-lttrn 10604 ax-pre-ltadd 10605 ax-pre-mulgt0 10606

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1083 df-3an 1084 df-tru 1534 df-ex 1775 df-nf 1779 df-sb 2064 df-mo 2616 df-eu 2648 df-clab 2798 df-cleq 2812 df-clel 2891 df-nfc 2961 df-ne 3015 df-nel 3122 df-ral 3141 df-rex 3142 df-reu 3143 df-rmo 3144 df-rab 3145 df-v 3495 df-sbc 3771 df-csb 3882 df-dif 3937 df-un 3939 df-in 3941 df-ss 3950 df-pss 3952 df-nul 4290 df-if 4466 df-pw 4539 df-sn 4560 df-pr 4562 df-tp 4564 df-op 4566 df-uni 4831 df-iun 4912 df-br 5058 df-opab 5120 df-mpt 5138 df-tr 5164 df-id 5453 df-eprel 5458 df-po 5467 df-so 5468 df-fr 5507 df-we 5509 df-xp 5554 df-rel 5555 df-cnv 5556 df-co 5557 df-dm 5558 df-rn 5559 df-res 5560 df-ima 5561 df-pred 6141 df-ord 6187 df-on 6188 df-lim 6189 df-suc 6190 df-iota 6307 df-fun 6350 df-fn 6351 df-f 6352 df-f1 6353 df-fo 6354 df-f1o 6355 df-fv 6356 df-riota 7106 df-ov 7151 df-oprab 7152 df-mpo 7153 df-om 7573 df-2nd 7682 df-wrecs 7939 df-recs 8000 df-rdg 8038 df-er 8281 df-en 8502 df-dom 8503 df-sdom 8504 df-pnf 10669 df-mnf 10670 df-xr 10671 df-ltxr 10672 df-le 10673 df-sub 10864 df-neg 10865 df-div 11290 df-nn 11631 df-2 11692 df-3 11693 df-4 11694 df-n0 11890 df-z 11974 df-uz 12236 df-seq 13362 df-exp 13422 df-fmtno 43681

This theorem is referenced by: (None)

W3C validator