dchrisum0flblem2 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > dchrisum0flblem2		Structured version Visualization version GIF version

Theorem dchrisum0flblem2 24998

Description: Lemma for dchrisum0flb 24999. Induction over relatively prime factors, with the prime power case handled in dchrisum0flblem1 . (Contributed by Mario Carneiro, 5-May-2016.) Replace reference to OLD theorem. (Revised by Wolf Lammen, 8-Sep-2020.)

**Hypotheses**
Ref	Expression
rpvmasum.z	⊢ 𝑍 = (ℤ/nℤ‘𝑁)
rpvmasum.l	⊢ 𝐿 = (ℤRHom‘𝑍)
rpvmasum.a	⊢ (𝜑 → 𝑁 ∈ ℕ)
rpvmasum2.g	⊢ 𝐺 = (DChr‘𝑁)
rpvmasum2.d	⊢ 𝐷 = (Base‘𝐺)
rpvmasum2.1	⊢ 1 = (0_g‘𝐺)
dchrisum0f.f	⊢ 𝐹 = (𝑏 ∈ ℕ ↦ Σ𝑣 ∈ {𝑞 ∈ ℕ ∣ 𝑞 ∥ 𝑏} (𝑋‘(𝐿‘𝑣)))
dchrisum0f.x	⊢ (𝜑 → 𝑋 ∈ 𝐷)
dchrisum0flb.r	⊢ (𝜑 → 𝑋:(Base‘𝑍)⟶ℝ)
dchrisum0flb.1	⊢ (𝜑 → 𝐴 ∈ (ℤ_≥‘2))
dchrisum0flb.2	⊢ (𝜑 → 𝑃 ∈ ℙ)
dchrisum0flb.3	⊢ (𝜑 → 𝑃 ∥ 𝐴)
dchrisum0flb.4	⊢ (𝜑 → ∀𝑦 ∈ (1..^𝐴)if((√‘𝑦) ∈ ℕ, 1, 0) ≤ (𝐹‘𝑦))

**Assertion**
Ref	Expression
dchrisum0flblem2	⊢ (𝜑 → if((√‘𝐴) ∈ ℕ, 1, 0) ≤ (𝐹‘𝐴))

Distinct variable groups: 𝑦, 1 𝑦,𝐹 𝑞,𝑏,𝑣,𝑦,𝐴 𝑁,𝑞,𝑦 𝑃,𝑏,𝑞,𝑣,𝑦 𝑦,𝑍 𝑦,𝐷 𝐿,𝑏,𝑣,𝑦 𝑋,𝑏,𝑣,𝑦 Allowed substitution hints: 𝜑(𝑦,𝑣,𝑞,𝑏) 𝐷(𝑣,𝑞,𝑏) 1 (𝑣,𝑞,𝑏) 𝐹(𝑣,𝑞,𝑏) 𝐺(𝑦,𝑣,𝑞,𝑏) 𝐿(𝑞) 𝑁(𝑣,𝑏) 𝑋(𝑞) 𝑍(𝑣,𝑞,𝑏)

**Proof of Theorem dchrisum0flblem2**
Step	Hyp	Ref	Expression
1		breq1 4586	. . 3 ⊢ (1 = if((√‘𝐴) ∈ ℕ, 1, 0) → (1 ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))) ↔ if((√‘𝐴) ∈ ℕ, 1, 0) ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))))
2		breq1 4586	. . 3 ⊢ (0 = if((√‘𝐴) ∈ ℕ, 1, 0) → (0 ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))) ↔ if((√‘𝐴) ∈ ℕ, 1, 0) ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))))
3		1t1e1 11052	. . . 4 ⊢ (1 · 1) = 1
4		dchrisum0flb.2	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑃 ∈ ℙ)
5	4	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 𝑃 ∈ ℙ)
6		nnq 11677	. . . . . . . . . . . . . . 15 ⊢ ((√‘𝐴) ∈ ℕ → (√‘𝐴) ∈ ℚ)
7	6	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘𝐴) ∈ ℚ)
8		nnne0 10930	. . . . . . . . . . . . . . 15 ⊢ ((√‘𝐴) ∈ ℕ → (√‘𝐴) ≠ 0)
9	8	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘𝐴) ≠ 0)
10		2z 11286	. . . . . . . . . . . . . . 15 ⊢ 2 ∈ ℤ
11	10	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 2 ∈ ℤ)
12		pcexp 15402	. . . . . . . . . . . . . 14 ⊢ ((𝑃 ∈ ℙ ∧ ((√‘𝐴) ∈ ℚ ∧ (√‘𝐴) ≠ 0) ∧ 2 ∈ ℤ) → (𝑃 pCnt ((√‘𝐴)↑2)) = (2 · (𝑃 pCnt (√‘𝐴))))
13	5, 7, 9, 11, 12	syl121anc 1323	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃 pCnt ((√‘𝐴)↑2)) = (2 · (𝑃 pCnt (√‘𝐴))))
14		dchrisum0flb.1	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐴 ∈ (ℤ_≥‘2))
15		eluz2nn 11602	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ (ℤ_≥‘2) → 𝐴 ∈ ℕ)
16	14, 15	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐴 ∈ ℕ)
17	16	nncnd 10913	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐴 ∈ ℂ)
18	17	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 𝐴 ∈ ℂ)
19	18	sqsqrtd 14026	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → ((√‘𝐴)↑2) = 𝐴)
20	19	oveq2d 6565	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃 pCnt ((√‘𝐴)↑2)) = (𝑃 pCnt 𝐴))
21		2cnd 10970	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 2 ∈ ℂ)
22		simpr 476	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘𝐴) ∈ ℕ)
23	5, 22	pccld 15393	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃 pCnt (√‘𝐴)) ∈ ℕ₀)
24	23	nn0cnd 11230	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃 pCnt (√‘𝐴)) ∈ ℂ)
25	21, 24	mulcomd 9940	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (2 · (𝑃 pCnt (√‘𝐴))) = ((𝑃 pCnt (√‘𝐴)) · 2))
26	13, 20, 25	3eqtr3rd 2653	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → ((𝑃 pCnt (√‘𝐴)) · 2) = (𝑃 pCnt 𝐴))
27	26	oveq2d 6565	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃↑((𝑃 pCnt (√‘𝐴)) · 2)) = (𝑃↑(𝑃 pCnt 𝐴)))
28		prmnn 15226	. . . . . . . . . . . . . 14 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
29	5, 28	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 𝑃 ∈ ℕ)
30	29	nncnd 10913	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 𝑃 ∈ ℂ)
31		2nn0 11186	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℕ₀
32	31	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 2 ∈ ℕ₀)
33	30, 32, 23	expmuld 12873	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃↑((𝑃 pCnt (√‘𝐴)) · 2)) = ((𝑃↑(𝑃 pCnt (√‘𝐴)))↑2))
34	27, 33	eqtr3d 2646	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃↑(𝑃 pCnt 𝐴)) = ((𝑃↑(𝑃 pCnt (√‘𝐴)))↑2))
35	34	fveq2d 6107	. . . . . . . . 9 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘(𝑃↑(𝑃 pCnt 𝐴))) = (√‘((𝑃↑(𝑃 pCnt (√‘𝐴)))↑2)))
36	29, 23	nnexpcld 12892	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃↑(𝑃 pCnt (√‘𝐴))) ∈ ℕ)
37	36	nnrpd 11746	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃↑(𝑃 pCnt (√‘𝐴))) ∈ ℝ⁺)
38	37	rprege0d 11755	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → ((𝑃↑(𝑃 pCnt (√‘𝐴))) ∈ ℝ ∧ 0 ≤ (𝑃↑(𝑃 pCnt (√‘𝐴)))))
39		sqrtsq 13858	. . . . . . . . . 10 ⊢ (((𝑃↑(𝑃 pCnt (√‘𝐴))) ∈ ℝ ∧ 0 ≤ (𝑃↑(𝑃 pCnt (√‘𝐴)))) → (√‘((𝑃↑(𝑃 pCnt (√‘𝐴)))↑2)) = (𝑃↑(𝑃 pCnt (√‘𝐴))))
40	38, 39	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘((𝑃↑(𝑃 pCnt (√‘𝐴)))↑2)) = (𝑃↑(𝑃 pCnt (√‘𝐴))))
41	35, 40	eqtrd 2644	. . . . . . . 8 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘(𝑃↑(𝑃 pCnt 𝐴))) = (𝑃↑(𝑃 pCnt (√‘𝐴))))
42	41, 36	eqeltrd 2688	. . . . . . 7 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ)
43	42	iftrued 4044	. . . . . 6 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0) = 1)
44		rpvmasum.z	. . . . . . . 8 ⊢ 𝑍 = (ℤ/nℤ‘𝑁)
45		rpvmasum.l	. . . . . . . 8 ⊢ 𝐿 = (ℤRHom‘𝑍)
46		rpvmasum.a	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
47		rpvmasum2.g	. . . . . . . 8 ⊢ 𝐺 = (DChr‘𝑁)
48		rpvmasum2.d	. . . . . . . 8 ⊢ 𝐷 = (Base‘𝐺)
49		rpvmasum2.1	. . . . . . . 8 ⊢ 1 = (0_g‘𝐺)
50		dchrisum0f.f	. . . . . . . 8 ⊢ 𝐹 = (𝑏 ∈ ℕ ↦ Σ𝑣 ∈ {𝑞 ∈ ℕ ∣ 𝑞 ∥ 𝑏} (𝑋‘(𝐿‘𝑣)))
51		dchrisum0f.x	. . . . . . . 8 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
52		dchrisum0flb.r	. . . . . . . 8 ⊢ (𝜑 → 𝑋:(Base‘𝑍)⟶ℝ)
53	4, 16	pccld 15393	. . . . . . . 8 ⊢ (𝜑 → (𝑃 pCnt 𝐴) ∈ ℕ₀)
54	44, 45, 46, 47, 48, 49, 50, 51, 52, 4, 53	dchrisum0flblem1 24997	. . . . . . 7 ⊢ (𝜑 → if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0) ≤ (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))))
55	54	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0) ≤ (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))))
56	43, 55	eqbrtrrd 4607	. . . . 5 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 1 ≤ (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))))
57		pcdvds 15406	. . . . . . . . . . . . 13 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℕ) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
58	4, 16, 57	syl2anc 691	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
59	4, 28	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑃 ∈ ℕ)
60	59, 53	nnexpcld 12892	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℕ)
61		nndivdvds 14827	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℕ ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℕ) → ((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ↔ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ))
62	16, 60, 61	syl2anc 691	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ↔ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ))
63	58, 62	mpbid 221	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ)
64	63	nnzd 11357	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℤ)
65	64	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℤ)
66	16	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 𝐴 ∈ ℕ)
67	66	nnrpd 11746	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 𝐴 ∈ ℝ⁺)
68	67	rprege0d 11755	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝐴 ∈ ℝ ∧ 0 ≤ 𝐴))
69	60	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℕ)
70	69	nnrpd 11746	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℝ⁺)
71		sqrtdiv 13854	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ ∧ 0 ≤ 𝐴) ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℝ⁺) → (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = ((√‘𝐴) / (√‘(𝑃↑(𝑃 pCnt 𝐴)))))
72	68, 70, 71	syl2anc 691	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = ((√‘𝐴) / (√‘(𝑃↑(𝑃 pCnt 𝐴)))))
73		nnz 11276	. . . . . . . . . . . 12 ⊢ ((√‘𝐴) ∈ ℕ → (√‘𝐴) ∈ ℤ)
74	73	adantl 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘𝐴) ∈ ℤ)
75		znq 11668	. . . . . . . . . . 11 ⊢ (((√‘𝐴) ∈ ℤ ∧ (√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ) → ((√‘𝐴) / (√‘(𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℚ)
76	74, 42, 75	syl2anc 691	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → ((√‘𝐴) / (√‘(𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℚ)
77	72, 76	eqeltrd 2688	. . . . . . . . 9 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℚ)
78		zsqrtelqelz 15304	. . . . . . . . 9 ⊢ (((𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℤ ∧ (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℚ) → (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℤ)
79	65, 77, 78	syl2anc 691	. . . . . . . 8 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℤ)
80	63	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ)
81	80	nnrpd 11746	. . . . . . . . 9 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℝ⁺)
82	81	sqrtgt0d 13999	. . . . . . . 8 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 0 < (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))
83		elnnz 11264	. . . . . . . 8 ⊢ ((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ ↔ ((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℤ ∧ 0 < (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
84	79, 82, 83	sylanbrc 695	. . . . . . 7 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ)
85	84	iftrued 4044	. . . . . 6 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) = 1)
86		nnuz 11599	. . . . . . . . . 10 ⊢ ℕ = (ℤ_≥‘1)
87	63, 86	syl6eleq 2698	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ (ℤ_≥‘1))
88	16	nnzd 11357	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℤ)
89	59	nnred 10912	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑃 ∈ ℝ)
90		dchrisum0flb.3	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑃 ∥ 𝐴)
91		pcelnn 15412	. . . . . . . . . . . . . 14 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℕ) → ((𝑃 pCnt 𝐴) ∈ ℕ ↔ 𝑃 ∥ 𝐴))
92	4, 16, 91	syl2anc 691	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑃 pCnt 𝐴) ∈ ℕ ↔ 𝑃 ∥ 𝐴))
93	90, 92	mpbird 246	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑃 pCnt 𝐴) ∈ ℕ)
94		prmuz2 15246	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ (ℤ_≥‘2))
95		eluz2b2 11637	. . . . . . . . . . . . . 14 ⊢ (𝑃 ∈ (ℤ_≥‘2) ↔ (𝑃 ∈ ℕ ∧ 1 < 𝑃))
96	95	simprbi 479	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ (ℤ_≥‘2) → 1 < 𝑃)
97	4, 94, 96	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 < 𝑃)
98		expgt1 12760	. . . . . . . . . . . 12 ⊢ ((𝑃 ∈ ℝ ∧ (𝑃 pCnt 𝐴) ∈ ℕ ∧ 1 < 𝑃) → 1 < (𝑃↑(𝑃 pCnt 𝐴)))
99	89, 93, 97, 98	syl3anc 1318	. . . . . . . . . . 11 ⊢ (𝜑 → 1 < (𝑃↑(𝑃 pCnt 𝐴)))
100		1red 9934	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℝ)
101		0lt1 10429	. . . . . . . . . . . . 13 ⊢ 0 < 1
102	101	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 < 1)
103	60	nnred 10912	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℝ)
104	60	nngt0d 10941	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 < (𝑃↑(𝑃 pCnt 𝐴)))
105	16	nnred 10912	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ ℝ)
106	16	nngt0d 10941	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 < 𝐴)
107		ltdiv2 10788	. . . . . . . . . . . 12 ⊢ (((1 ∈ ℝ ∧ 0 < 1) ∧ ((𝑃↑(𝑃 pCnt 𝐴)) ∈ ℝ ∧ 0 < (𝑃↑(𝑃 pCnt 𝐴))) ∧ (𝐴 ∈ ℝ ∧ 0 < 𝐴)) → (1 < (𝑃↑(𝑃 pCnt 𝐴)) ↔ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) < (𝐴 / 1)))
108	100, 102, 103, 104, 105, 106, 107	syl222anc 1334	. . . . . . . . . . 11 ⊢ (𝜑 → (1 < (𝑃↑(𝑃 pCnt 𝐴)) ↔ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) < (𝐴 / 1)))
109	99, 108	mpbid 221	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) < (𝐴 / 1))
110	17	div1d 10672	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 / 1) = 𝐴)
111	109, 110	breqtrd 4609	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) < 𝐴)
112		elfzo2 12342	. . . . . . . . 9 ⊢ ((𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ (1..^𝐴) ↔ ((𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ (ℤ_≥‘1) ∧ 𝐴 ∈ ℤ ∧ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) < 𝐴))
113	87, 88, 111, 112	syl3anbrc 1239	. . . . . . . 8 ⊢ (𝜑 → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ (1..^𝐴))
114		dchrisum0flb.4	. . . . . . . 8 ⊢ (𝜑 → ∀𝑦 ∈ (1..^𝐴)if((√‘𝑦) ∈ ℕ, 1, 0) ≤ (𝐹‘𝑦))
115		fveq2 6103	. . . . . . . . . . . 12 ⊢ (𝑦 = (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) → (√‘𝑦) = (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))
116	115	eleq1d 2672	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) → ((√‘𝑦) ∈ ℕ ↔ (√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ))
117	116	ifbid 4058	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) → if((√‘𝑦) ∈ ℕ, 1, 0) = if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0))
118		fveq2 6103	. . . . . . . . . 10 ⊢ (𝑦 = (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) → (𝐹‘𝑦) = (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))
119	117, 118	breq12d 4596	. . . . . . . . 9 ⊢ (𝑦 = (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) → (if((√‘𝑦) ∈ ℕ, 1, 0) ≤ (𝐹‘𝑦) ↔ if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) ≤ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
120	119	rspcv 3278	. . . . . . . 8 ⊢ ((𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ (1..^𝐴) → (∀𝑦 ∈ (1..^𝐴)if((√‘𝑦) ∈ ℕ, 1, 0) ≤ (𝐹‘𝑦) → if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) ≤ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
121	113, 114, 120	sylc 63	. . . . . . 7 ⊢ (𝜑 → if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) ≤ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))
122	121	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) ≤ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))
123	85, 122	eqbrtrrd 4607	. . . . 5 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 1 ≤ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))
124		1re 9918	. . . . . . . 8 ⊢ 1 ∈ ℝ
125		0le1 10430	. . . . . . . 8 ⊢ 0 ≤ 1
126	124, 125	pm3.2i 470	. . . . . . 7 ⊢ (1 ∈ ℝ ∧ 0 ≤ 1)
127	126	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (1 ∈ ℝ ∧ 0 ≤ 1))
128	44, 45, 46, 47, 48, 49, 50, 51, 52	dchrisum0ff 24996	. . . . . . . 8 ⊢ (𝜑 → 𝐹:ℕ⟶ℝ)
129	128, 60	ffvelrnd 6268	. . . . . . 7 ⊢ (𝜑 → (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℝ)
130	129	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℝ)
131	128, 63	ffvelrnd 6268	. . . . . . 7 ⊢ (𝜑 → (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℝ)
132	131	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℝ)
133		lemul12a 10760	. . . . . 6 ⊢ ((((1 ∈ ℝ ∧ 0 ≤ 1) ∧ (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℝ) ∧ ((1 ∈ ℝ ∧ 0 ≤ 1) ∧ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℝ)) → ((1 ≤ (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) ∧ 1 ≤ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))) → (1 · 1) ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))))
134	127, 130, 127, 132, 133	syl22anc 1319	. . . . 5 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → ((1 ≤ (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) ∧ 1 ≤ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))) → (1 · 1) ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))))
135	56, 123, 134	mp2and 711	. . . 4 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → (1 · 1) ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
136	3, 135	syl5eqbrr 4619	. . 3 ⊢ ((𝜑 ∧ (√‘𝐴) ∈ ℕ) → 1 ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
137		0red 9920	. . . . . 6 ⊢ (𝜑 → 0 ∈ ℝ)
138		0re 9919	. . . . . . . 8 ⊢ 0 ∈ ℝ
139	124, 138	keepel 4105	. . . . . . 7 ⊢ if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0) ∈ ℝ
140	139	a1i 11	. . . . . 6 ⊢ (𝜑 → if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0) ∈ ℝ)
141		breq2 4587	. . . . . . . 8 ⊢ (1 = if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0) → (0 ≤ 1 ↔ 0 ≤ if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0)))
142		breq2 4587	. . . . . . . 8 ⊢ (0 = if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0) → (0 ≤ 0 ↔ 0 ≤ if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0)))
143		0le0 10987	. . . . . . . 8 ⊢ 0 ≤ 0
144	141, 142, 125, 143	keephyp 4102	. . . . . . 7 ⊢ 0 ≤ if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0)
145	144	a1i 11	. . . . . 6 ⊢ (𝜑 → 0 ≤ if((√‘(𝑃↑(𝑃 pCnt 𝐴))) ∈ ℕ, 1, 0))
146	137, 140, 129, 145, 54	letrd 10073	. . . . 5 ⊢ (𝜑 → 0 ≤ (𝐹‘(𝑃↑(𝑃 pCnt 𝐴))))
147	124, 138	keepel 4105	. . . . . . 7 ⊢ if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) ∈ ℝ
148	147	a1i 11	. . . . . 6 ⊢ (𝜑 → if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) ∈ ℝ)
149		breq2 4587	. . . . . . . 8 ⊢ (1 = if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) → (0 ≤ 1 ↔ 0 ≤ if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0)))
150		breq2 4587	. . . . . . . 8 ⊢ (0 = if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0) → (0 ≤ 0 ↔ 0 ≤ if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0)))
151	149, 150, 125, 143	keephyp 4102	. . . . . . 7 ⊢ 0 ≤ if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0)
152	151	a1i 11	. . . . . 6 ⊢ (𝜑 → 0 ≤ if((√‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) ∈ ℕ, 1, 0))
153	137, 148, 131, 152, 121	letrd 10073	. . . . 5 ⊢ (𝜑 → 0 ≤ (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))
154	129, 131, 146, 153	mulge0d 10483	. . . 4 ⊢ (𝜑 → 0 ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
155	154	adantr 480	. . 3 ⊢ ((𝜑 ∧ ¬ (√‘𝐴) ∈ ℕ) → 0 ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
156	1, 2, 136, 155	ifbothda 4073	. 2 ⊢ (𝜑 → if((√‘𝐴) ∈ ℕ, 1, 0) ≤ ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
157	60	nncnd 10913	. . . . 5 ⊢ (𝜑 → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℂ)
158	60	nnne0d 10942	. . . . 5 ⊢ (𝜑 → (𝑃↑(𝑃 pCnt 𝐴)) ≠ 0)
159	17, 157, 158	divcan2d 10682	. . . 4 ⊢ (𝜑 → ((𝑃↑(𝑃 pCnt 𝐴)) · (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 𝐴)
160	159	fveq2d 6107	. . 3 ⊢ (𝜑 → (𝐹‘((𝑃↑(𝑃 pCnt 𝐴)) · (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))) = (𝐹‘𝐴))
161		pcndvds2 15410	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℕ) → ¬ 𝑃 ∥ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))
162	4, 16, 161	syl2anc 691	. . . . . 6 ⊢ (𝜑 → ¬ 𝑃 ∥ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))
163		coprm 15261	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℤ) → (¬ 𝑃 ∥ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ↔ (𝑃 gcd (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 1))
164	4, 64, 163	syl2anc 691	. . . . . 6 ⊢ (𝜑 → (¬ 𝑃 ∥ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ↔ (𝑃 gcd (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 1))
165	162, 164	mpbid 221	. . . . 5 ⊢ (𝜑 → (𝑃 gcd (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 1)
166		prmz 15227	. . . . . . 7 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℤ)
167	4, 166	syl 17	. . . . . 6 ⊢ (𝜑 → 𝑃 ∈ ℤ)
168		rpexp1i 15271	. . . . . 6 ⊢ ((𝑃 ∈ ℤ ∧ (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 gcd (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 1 → ((𝑃↑(𝑃 pCnt 𝐴)) gcd (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 1))
169	167, 64, 53, 168	syl3anc 1318	. . . . 5 ⊢ (𝜑 → ((𝑃 gcd (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 1 → ((𝑃↑(𝑃 pCnt 𝐴)) gcd (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 1))
170	165, 169	mpd 15	. . . 4 ⊢ (𝜑 → ((𝑃↑(𝑃 pCnt 𝐴)) gcd (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 1)
171	44, 45, 46, 47, 48, 49, 50, 51, 60, 63, 170	dchrisum0fmul 24995	. . 3 ⊢ (𝜑 → (𝐹‘((𝑃↑(𝑃 pCnt 𝐴)) · (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))) = ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
172	160, 171	eqtr3d 2646	. 2 ⊢ (𝜑 → (𝐹‘𝐴) = ((𝐹‘(𝑃↑(𝑃 pCnt 𝐴))) · (𝐹‘(𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))))
173	156, 172	breqtrrd 4611	1 ⊢ (𝜑 → if((√‘𝐴) ∈ ℕ, 1, 0) ≤ (𝐹‘𝐴))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 195 ∧ wa 383 = wceq 1475 ∈ wcel 1977 ≠ wne 2780 ∀wral 2896 {crab 2900 ifcif 4036 class class class wbr 4583 ↦ cmpt 4643 ⟶wf 5800 ‘cfv 5804 (class class class)co 6549 ℂcc 9813 ℝcr 9814 0cc0 9815 1c1 9816 · cmul 9820 < clt 9953 ≤ cle 9954 / cdiv 10563 ℕcn 10897 2c2 10947 ℕ₀cn0 11169 ℤcz 11254 ℤ_≥cuz 11563 ℚcq 11664 ℝ⁺crp 11708 ..^cfzo 12334 ↑cexp 12722 √csqrt 13821 Σcsu 14264 ∥ cdvds 14821 gcd cgcd 15054 ℙcprime 15223 pCnt cpc 15379 Basecbs 15695 0_gc0g 15923 ℤRHomczrh 19667 ℤ/nℤczn 19670 DChrcdchr 24757

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1713 ax-4 1728 ax-5 1827 ax-6 1875 ax-7 1922 ax-8 1979 ax-9 1986 ax-10 2006 ax-11 2021 ax-12 2034 ax-13 2234 ax-ext 2590 ax-rep 4699 ax-sep 4709 ax-nul 4717 ax-pow 4769 ax-pr 4833 ax-un 6847 ax-inf2 8421 ax-cnex 9871 ax-resscn 9872 ax-1cn 9873 ax-icn 9874 ax-addcl 9875 ax-addrcl 9876 ax-mulcl 9877 ax-mulrcl 9878 ax-mulcom 9879 ax-addass 9880 ax-mulass 9881 ax-distr 9882 ax-i2m1 9883 ax-1ne0 9884 ax-1rid 9885 ax-rnegex 9886 ax-rrecex 9887 ax-cnre 9888 ax-pre-lttri 9889 ax-pre-lttrn 9890 ax-pre-ltadd 9891 ax-pre-mulgt0 9892 ax-pre-sup 9893 ax-addf 9894 ax-mulf 9895

This theorem depends on definitions: df-bi 196 df-or 384 df-an 385 df-3or 1032 df-3an 1033 df-tru 1478 df-fal 1481 df-ex 1696 df-nf 1701 df-sb 1868 df-eu 2462 df-mo 2463 df-clab 2597 df-cleq 2603 df-clel 2606 df-nfc 2740 df-ne 2782 df-nel 2783 df-ral 2901 df-rex 2902 df-reu 2903 df-rmo 2904 df-rab 2905 df-v 3175 df-sbc 3403 df-csb 3500 df-dif 3543 df-un 3545 df-in 3547 df-ss 3554 df-pss 3556 df-nul 3875 df-if 4037 df-pw 4110 df-sn 4126 df-pr 4128 df-tp 4130 df-op 4132 df-uni 4373 df-int 4411 df-iun 4457 df-iin 4458 df-disj 4554 df-br 4584 df-opab 4644 df-mpt 4645 df-tr 4681 df-eprel 4949 df-id 4953 df-po 4959 df-so 4960 df-fr 4997 df-se 4998 df-we 4999 df-xp 5044 df-rel 5045 df-cnv 5046 df-co 5047 df-dm 5048 df-rn 5049 df-res 5050 df-ima 5051 df-pred 5597 df-ord 5643 df-on 5644 df-lim 5645 df-suc 5646 df-iota 5768 df-fun 5806 df-fn 5807 df-f 5808 df-f1 5809 df-fo 5810 df-f1o 5811 df-fv 5812 df-isom 5813 df-riota 6511 df-ov 6552 df-oprab 6553 df-mpt2 6554 df-of 6795 df-om 6958 df-1st 7059 df-2nd 7060 df-supp 7183 df-tpos 7239 df-wrecs 7294 df-recs 7355 df-rdg 7393 df-1o 7447 df-2o 7448 df-oadd 7451 df-omul 7452 df-er 7629 df-ec 7631 df-qs 7635 df-map 7746 df-pm 7747 df-ixp 7795 df-en 7842 df-dom 7843 df-sdom 7844 df-fin 7845 df-fsupp 8159 df-fi 8200 df-sup 8231 df-inf 8232 df-oi 8298 df-card 8648 df-acn 8651 df-cda 8873 df-pnf 9955 df-mnf 9956 df-xr 9957 df-ltxr 9958 df-le 9959 df-sub 10147 df-neg 10148 df-div 10564 df-nn 10898 df-2 10956 df-3 10957 df-4 10958 df-5 10959 df-6 10960 df-7 10961 df-8 10962 df-9 10963 df-n0 11170 df-z 11255 df-dec 11370 df-uz 11564 df-q 11665 df-rp 11709 df-xneg 11822 df-xadd 11823 df-xmul 11824 df-ioo 12050 df-ioc 12051 df-ico 12052 df-icc 12053 df-fz 12198 df-fzo 12335 df-fl 12455 df-mod 12531 df-seq 12664 df-exp 12723 df-fac 12923 df-bc 12952 df-hash 12980 df-shft 13655 df-cj 13687 df-re 13688 df-im 13689 df-sqrt 13823 df-abs 13824 df-limsup 14050 df-clim 14067 df-rlim 14068 df-sum 14265 df-ef 14637 df-sin 14639 df-cos 14640 df-pi 14642 df-dvds 14822 df-gcd 15055 df-prm 15224 df-numer 15281 df-denom 15282 df-pc 15380 df-struct 15697 df-ndx 15698 df-slot 15699 df-base 15700 df-sets 15701 df-ress 15702 df-plusg 15781 df-mulr 15782 df-starv 15783 df-sca 15784 df-vsca 15785 df-ip 15786 df-tset 15787 df-ple 15788 df-ds 15791 df-unif 15792 df-hom 15793 df-cco 15794 df-rest 15906 df-topn 15907 df-0g 15925 df-gsum 15926 df-topgen 15927 df-pt 15928 df-prds 15931 df-xrs 15985 df-qtop 15990 df-imas 15991 df-qus 15992 df-xps 15993 df-mre 16069 df-mrc 16070 df-acs 16072 df-mgm 17065 df-sgrp 17107 df-mnd 17118 df-mhm 17158 df-submnd 17159 df-grp 17248 df-minusg 17249 df-sbg 17250 df-mulg 17364 df-subg 17414 df-nsg 17415 df-eqg 17416 df-ghm 17481 df-cntz 17573 df-od 17771 df-cmn 18018 df-abl 18019 df-mgp 18313 df-ur 18325 df-ring 18372 df-cring 18373 df-oppr 18446 df-dvdsr 18464 df-unit 18465 df-invr 18495 df-dvr 18506 df-rnghom 18538 df-drng 18572 df-subrg 18601 df-lmod 18688 df-lss 18754 df-lsp 18793 df-sra 18993 df-rgmod 18994 df-lidl 18995 df-rsp 18996 df-2idl 19053 df-psmet 19559 df-xmet 19560 df-met 19561 df-bl 19562 df-mopn 19563 df-fbas 19564 df-fg 19565 df-cnfld 19568 df-zring 19638 df-zrh 19671 df-zn 19674 df-top 20521 df-bases 20522 df-topon 20523 df-topsp 20524 df-cld 20633 df-ntr 20634 df-cls 20635 df-nei 20712 df-lp 20750 df-perf 20751 df-cn 20841 df-cnp 20842 df-haus 20929 df-tx 21175 df-hmeo 21368 df-fil 21460 df-fm 21552 df-flim 21553 df-flf 21554 df-xms 21935 df-ms 21936 df-tms 21937 df-cncf 22489 df-limc 23436 df-dv 23437 df-log 24107 df-cxp 24108 df-dchr 24758

This theorem is referenced by: dchrisum0flb 24999

W3C validator