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

Theorem logcnlem4 26768
Description: Lemma for logcn 26770. (Contributed by Mario Carneiro, 25-Feb-2015.)
Hypotheses
Ref Expression
logcn.d 𝐷 = (ℂ ∖ (-∞(,]0))
logcnlem.s 𝑆 = if(𝐴 ∈ ℝ+, 𝐴, (abs‘(ℑ‘𝐴)))
logcnlem.t 𝑇 = ((abs‘𝐴) · (𝑅 / (1 + 𝑅)))
logcnlem.a (𝜑𝐴𝐷)
logcnlem.r (𝜑𝑅 ∈ ℝ+)
logcnlem.b (𝜑𝐵𝐷)
logcnlem.l (𝜑 → (abs‘(𝐴𝐵)) < if(𝑆𝑇, 𝑆, 𝑇))
Assertion
Ref Expression
logcnlem4 (𝜑 → (abs‘((ℑ‘(log‘𝐴)) − (ℑ‘(log‘𝐵)))) < 𝑅)

Proof of Theorem logcnlem4
StepHypRef Expression
1 logcnlem.a . . . . . . . 8 (𝜑𝐴𝐷)
2 logcn.d . . . . . . . . . 10 𝐷 = (ℂ ∖ (-∞(,]0))
32ellogdm 26762 . . . . . . . . 9 (𝐴𝐷 ↔ (𝐴 ∈ ℂ ∧ (𝐴 ∈ ℝ → 𝐴 ∈ ℝ+)))
43simplbi 501 . . . . . . . 8 (𝐴𝐷𝐴 ∈ ℂ)
51, 4syl 18 . . . . . . 7 (𝜑𝐴 ∈ ℂ)
62logdmn0 26763 . . . . . . . 8 (𝐴𝐷𝐴 ≠ 0)
71, 6syl 18 . . . . . . 7 (𝜑𝐴 ≠ 0)
85, 7logcld 26693 . . . . . 6 (𝜑 → (log‘𝐴) ∈ ℂ)
98imcld 15236 . . . . 5 (𝜑 → (ℑ‘(log‘𝐴)) ∈ ℝ)
109recnd 11225 . . . 4 (𝜑 → (ℑ‘(log‘𝐴)) ∈ ℂ)
11 logcnlem.b . . . . . . . 8 (𝜑𝐵𝐷)
122ellogdm 26762 . . . . . . . . 9 (𝐵𝐷 ↔ (𝐵 ∈ ℂ ∧ (𝐵 ∈ ℝ → 𝐵 ∈ ℝ+)))
1312simplbi 501 . . . . . . . 8 (𝐵𝐷𝐵 ∈ ℂ)
1411, 13syl 18 . . . . . . 7 (𝜑𝐵 ∈ ℂ)
152logdmn0 26763 . . . . . . . 8 (𝐵𝐷𝐵 ≠ 0)
1611, 15syl 18 . . . . . . 7 (𝜑𝐵 ≠ 0)
1714, 16logcld 26693 . . . . . 6 (𝜑 → (log‘𝐵) ∈ ℂ)
1817imcld 15236 . . . . 5 (𝜑 → (ℑ‘(log‘𝐵)) ∈ ℝ)
1918recnd 11225 . . . 4 (𝜑 → (ℑ‘(log‘𝐵)) ∈ ℂ)
2010, 19abssubd 15497 . . 3 (𝜑 → (abs‘((ℑ‘(log‘𝐴)) − (ℑ‘(log‘𝐵)))) = (abs‘((ℑ‘(log‘𝐵)) − (ℑ‘(log‘𝐴)))))
2117, 8imsubd 15258 . . . . 5 (𝜑 → (ℑ‘((log‘𝐵) − (log‘𝐴))) = ((ℑ‘(log‘𝐵)) − (ℑ‘(log‘𝐴))))
22 efsub 16146 . . . . . . . . . 10 (((log‘𝐵) ∈ ℂ ∧ (log‘𝐴) ∈ ℂ) → (exp‘((log‘𝐵) − (log‘𝐴))) = ((exp‘(log‘𝐵)) / (exp‘(log‘𝐴))))
2317, 8, 22syl2anc 595 . . . . . . . . 9 (𝜑 → (exp‘((log‘𝐵) − (log‘𝐴))) = ((exp‘(log‘𝐵)) / (exp‘(log‘𝐴))))
24 eflog 26699 . . . . . . . . . . 11 ((𝐵 ∈ ℂ ∧ 𝐵 ≠ 0) → (exp‘(log‘𝐵)) = 𝐵)
2514, 16, 24syl2anc 595 . . . . . . . . . 10 (𝜑 → (exp‘(log‘𝐵)) = 𝐵)
26 eflog 26699 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (exp‘(log‘𝐴)) = 𝐴)
275, 7, 26syl2anc 595 . . . . . . . . . 10 (𝜑 → (exp‘(log‘𝐴)) = 𝐴)
2825, 27oveq12d 7418 . . . . . . . . 9 (𝜑 → ((exp‘(log‘𝐵)) / (exp‘(log‘𝐴))) = (𝐵 / 𝐴))
2923, 28eqtrd 2800 . . . . . . . 8 (𝜑 → (exp‘((log‘𝐵) − (log‘𝐴))) = (𝐵 / 𝐴))
3014, 5, 7divcld 11982 . . . . . . . . 9 (𝜑 → (𝐵 / 𝐴) ∈ ℂ)
3114, 5, 16, 7divne0d 11998 . . . . . . . . 9 (𝜑 → (𝐵 / 𝐴) ≠ 0)
3217, 8subcld 11557 . . . . . . . . . 10 (𝜑 → ((log‘𝐵) − (log‘𝐴)) ∈ ℂ)
33 logcnlem.s . . . . . . . . . . . . 13 𝑆 = if(𝐴 ∈ ℝ+, 𝐴, (abs‘(ℑ‘𝐴)))
34 logcnlem.t . . . . . . . . . . . . 13 𝑇 = ((abs‘𝐴) · (𝑅 / (1 + 𝑅)))
35 logcnlem.r . . . . . . . . . . . . 13 (𝜑𝑅 ∈ ℝ+)
36 logcnlem.l . . . . . . . . . . . . 13 (𝜑 → (abs‘(𝐴𝐵)) < if(𝑆𝑇, 𝑆, 𝑇))
372, 33, 34, 1, 35, 11, 36logcnlem3 26767 . . . . . . . . . . . 12 (𝜑 → (-π < ((ℑ‘(log‘𝐵)) − (ℑ‘(log‘𝐴))) ∧ ((ℑ‘(log‘𝐵)) − (ℑ‘(log‘𝐴))) ≤ π))
3837simpld 499 . . . . . . . . . . 11 (𝜑 → -π < ((ℑ‘(log‘𝐵)) − (ℑ‘(log‘𝐴))))
3938, 21breqtrrd 5133 . . . . . . . . . 10 (𝜑 → -π < (ℑ‘((log‘𝐵) − (log‘𝐴))))
4037simprd 500 . . . . . . . . . . 11 (𝜑 → ((ℑ‘(log‘𝐵)) − (ℑ‘(log‘𝐴))) ≤ π)
4121, 40eqbrtrd 5127 . . . . . . . . . 10 (𝜑 → (ℑ‘((log‘𝐵) − (log‘𝐴))) ≤ π)
42 ellogrn 26682 . . . . . . . . . 10 (((log‘𝐵) − (log‘𝐴)) ∈ ran log ↔ (((log‘𝐵) − (log‘𝐴)) ∈ ℂ ∧ -π < (ℑ‘((log‘𝐵) − (log‘𝐴))) ∧ (ℑ‘((log‘𝐵) − (log‘𝐴))) ≤ π))
4332, 39, 41, 42syl3anbrc 1360 . . . . . . . . 9 (𝜑 → ((log‘𝐵) − (log‘𝐴)) ∈ ran log)
44 logeftb 26706 . . . . . . . . 9 (((𝐵 / 𝐴) ∈ ℂ ∧ (𝐵 / 𝐴) ≠ 0 ∧ ((log‘𝐵) − (log‘𝐴)) ∈ ran log) → ((log‘(𝐵 / 𝐴)) = ((log‘𝐵) − (log‘𝐴)) ↔ (exp‘((log‘𝐵) − (log‘𝐴))) = (𝐵 / 𝐴)))
4530, 31, 43, 44syl3anc 1394 . . . . . . . 8 (𝜑 → ((log‘(𝐵 / 𝐴)) = ((log‘𝐵) − (log‘𝐴)) ↔ (exp‘((log‘𝐵) − (log‘𝐴))) = (𝐵 / 𝐴)))
4629, 45mpbird 260 . . . . . . 7 (𝜑 → (log‘(𝐵 / 𝐴)) = ((log‘𝐵) − (log‘𝐴)))
4746eqcomd 2771 . . . . . 6 (𝜑 → ((log‘𝐵) − (log‘𝐴)) = (log‘(𝐵 / 𝐴)))
4847fveq2d 6875 . . . . 5 (𝜑 → (ℑ‘((log‘𝐵) − (log‘𝐴))) = (ℑ‘(log‘(𝐵 / 𝐴))))
4921, 48eqtr3d 2802 . . . 4 (𝜑 → ((ℑ‘(log‘𝐵)) − (ℑ‘(log‘𝐴))) = (ℑ‘(log‘(𝐵 / 𝐴))))
5049fveq2d 6875 . . 3 (𝜑 → (abs‘((ℑ‘(log‘𝐵)) − (ℑ‘(log‘𝐴)))) = (abs‘(ℑ‘(log‘(𝐵 / 𝐴)))))
5120, 50eqtrd 2800 . 2 (𝜑 → (abs‘((ℑ‘(log‘𝐴)) − (ℑ‘(log‘𝐵)))) = (abs‘(ℑ‘(log‘(𝐵 / 𝐴)))))
5230, 31logcld 26693 . . . . . 6 (𝜑 → (log‘(𝐵 / 𝐴)) ∈ ℂ)
5352imcld 15236 . . . . 5 (𝜑 → (ℑ‘(log‘(𝐵 / 𝐴))) ∈ ℝ)
5453recnd 11225 . . . 4 (𝜑 → (ℑ‘(log‘(𝐵 / 𝐴))) ∈ ℂ)
5554abscld 15480 . . 3 (𝜑 → (abs‘(ℑ‘(log‘(𝐵 / 𝐴)))) ∈ ℝ)
56 0red 11199 . . . . . . . . . 10 (𝜑 → 0 ∈ ℝ)
57 1re 11196 . . . . . . . . . . 11 1 ∈ ℝ
585, 14subcld 11557 . . . . . . . . . . . . 13 (𝜑 → (𝐴𝐵) ∈ ℂ)
5958abscld 15480 . . . . . . . . . . . 12 (𝜑 → (abs‘(𝐴𝐵)) ∈ ℝ)
605, 7absrpcld 15492 . . . . . . . . . . . 12 (𝜑 → (abs‘𝐴) ∈ ℝ+)
6159, 60rerpdivcld 13082 . . . . . . . . . . 11 (𝜑 → ((abs‘(𝐴𝐵)) / (abs‘𝐴)) ∈ ℝ)
62 resubcl 11510 . . . . . . . . . . 11 ((1 ∈ ℝ ∧ ((abs‘(𝐴𝐵)) / (abs‘𝐴)) ∈ ℝ) → (1 − ((abs‘(𝐴𝐵)) / (abs‘𝐴))) ∈ ℝ)
6357, 61, 62sylancr 598 . . . . . . . . . 10 (𝜑 → (1 − ((abs‘(𝐴𝐵)) / (abs‘𝐴))) ∈ ℝ)
6430recld 15235 . . . . . . . . . 10 (𝜑 → (ℜ‘(𝐵 / 𝐴)) ∈ ℝ)
655abscld 15480 . . . . . . . . . . . . . . . 16 (𝜑 → (abs‘𝐴) ∈ ℝ)
6635rpred 13051 . . . . . . . . . . . . . . . . 17 (𝜑𝑅 ∈ ℝ)
67 1rp 13011 . . . . . . . . . . . . . . . . . 18 1 ∈ ℝ+
68 rpaddcl 13031 . . . . . . . . . . . . . . . . . 18 ((1 ∈ ℝ+𝑅 ∈ ℝ+) → (1 + 𝑅) ∈ ℝ+)
6967, 35, 68sylancr 598 . . . . . . . . . . . . . . . . 17 (𝜑 → (1 + 𝑅) ∈ ℝ+)
7066, 69rerpdivcld 13082 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑅 / (1 + 𝑅)) ∈ ℝ)
7165, 70remulcld 11227 . . . . . . . . . . . . . . 15 (𝜑 → ((abs‘𝐴) · (𝑅 / (1 + 𝑅))) ∈ ℝ)
7234, 71eqeltrid 2869 . . . . . . . . . . . . . 14 (𝜑𝑇 ∈ ℝ)
73 rpre 13016 . . . . . . . . . . . . . . . . . . . 20 (𝐴 ∈ ℝ+𝐴 ∈ ℝ)
7473adantl 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝐴 ∈ ℝ+) → 𝐴 ∈ ℝ)
755imcld 15236 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (ℑ‘𝐴) ∈ ℝ)
7675recnd 11225 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (ℑ‘𝐴) ∈ ℂ)
7776abscld 15480 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (abs‘(ℑ‘𝐴)) ∈ ℝ)
7877adantr 485 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ ¬ 𝐴 ∈ ℝ+) → (abs‘(ℑ‘𝐴)) ∈ ℝ)
7974, 78ifclda 4519 . . . . . . . . . . . . . . . . . 18 (𝜑 → if(𝐴 ∈ ℝ+, 𝐴, (abs‘(ℑ‘𝐴))) ∈ ℝ)
8033, 79eqeltrid 2869 . . . . . . . . . . . . . . . . 17 (𝜑𝑆 ∈ ℝ)
81 ltmin 13211 . . . . . . . . . . . . . . . . 17 (((abs‘(𝐴𝐵)) ∈ ℝ ∧ 𝑆 ∈ ℝ ∧ 𝑇 ∈ ℝ) → ((abs‘(𝐴𝐵)) < if(𝑆𝑇, 𝑆, 𝑇) ↔ ((abs‘(𝐴𝐵)) < 𝑆 ∧ (abs‘(𝐴𝐵)) < 𝑇)))
8259, 80, 72, 81syl3anc 1394 . . . . . . . . . . . . . . . 16 (𝜑 → ((abs‘(𝐴𝐵)) < if(𝑆𝑇, 𝑆, 𝑇) ↔ ((abs‘(𝐴𝐵)) < 𝑆 ∧ (abs‘(𝐴𝐵)) < 𝑇)))
8336, 82mpbid 235 . . . . . . . . . . . . . . 15 (𝜑 → ((abs‘(𝐴𝐵)) < 𝑆 ∧ (abs‘(𝐴𝐵)) < 𝑇))
8483simprd 500 . . . . . . . . . . . . . 14 (𝜑 → (abs‘(𝐴𝐵)) < 𝑇)
8569rpred 13051 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1 + 𝑅) ∈ ℝ)
8666ltp1d 12136 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑅 < (𝑅 + 1))
8766recnd 11225 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝑅 ∈ ℂ)
88 ax-1cn 11146 . . . . . . . . . . . . . . . . . . . . . 22 1 ∈ ℂ
89 addcom 11384 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑅 ∈ ℂ ∧ 1 ∈ ℂ) → (𝑅 + 1) = (1 + 𝑅))
9087, 88, 89sylancl 597 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑅 + 1) = (1 + 𝑅))
9186, 90breqtrd 5131 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑅 < (1 + 𝑅))
9266, 85, 91ltled 11346 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑅 ≤ (1 + 𝑅))
9385recnd 11225 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1 + 𝑅) ∈ ℂ)
9493mulridd 11214 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((1 + 𝑅) · 1) = (1 + 𝑅))
9592, 94breqtrrd 5133 . . . . . . . . . . . . . . . . . 18 (𝜑𝑅 ≤ ((1 + 𝑅) · 1))
9657a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 1 ∈ ℝ)
9766, 96, 69ledivmuld 13104 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑅 / (1 + 𝑅)) ≤ 1 ↔ 𝑅 ≤ ((1 + 𝑅) · 1)))
9895, 97mpbird 260 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑅 / (1 + 𝑅)) ≤ 1)
9970, 96, 60lemul2d 13095 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑅 / (1 + 𝑅)) ≤ 1 ↔ ((abs‘𝐴) · (𝑅 / (1 + 𝑅))) ≤ ((abs‘𝐴) · 1)))
10098, 99mpbid 235 . . . . . . . . . . . . . . . 16 (𝜑 → ((abs‘𝐴) · (𝑅 / (1 + 𝑅))) ≤ ((abs‘𝐴) · 1))
10165recnd 11225 . . . . . . . . . . . . . . . . 17 (𝜑 → (abs‘𝐴) ∈ ℂ)
102101mulridd 11214 . . . . . . . . . . . . . . . 16 (𝜑 → ((abs‘𝐴) · 1) = (abs‘𝐴))
103100, 102breqtrd 5131 . . . . . . . . . . . . . . 15 (𝜑 → ((abs‘𝐴) · (𝑅 / (1 + 𝑅))) ≤ (abs‘𝐴))
10434, 103eqbrtrid 5140 . . . . . . . . . . . . . 14 (𝜑𝑇 ≤ (abs‘𝐴))
10559, 72, 65, 84, 104ltletrd 11358 . . . . . . . . . . . . 13 (𝜑 → (abs‘(𝐴𝐵)) < (abs‘𝐴))
106105, 102breqtrrd 5133 . . . . . . . . . . . 12 (𝜑 → (abs‘(𝐴𝐵)) < ((abs‘𝐴) · 1))
10759, 96, 60ltdivmuld 13102 . . . . . . . . . . . 12 (𝜑 → (((abs‘(𝐴𝐵)) / (abs‘𝐴)) < 1 ↔ (abs‘(𝐴𝐵)) < ((abs‘𝐴) · 1)))
108106, 107mpbird 260 . . . . . . . . . . 11 (𝜑 → ((abs‘(𝐴𝐵)) / (abs‘𝐴)) < 1)
109 posdif 11695 . . . . . . . . . . . 12 ((((abs‘(𝐴𝐵)) / (abs‘𝐴)) ∈ ℝ ∧ 1 ∈ ℝ) → (((abs‘(𝐴𝐵)) / (abs‘𝐴)) < 1 ↔ 0 < (1 − ((abs‘(𝐴𝐵)) / (abs‘𝐴)))))
11061, 57, 109sylancl 597 . . . . . . . . . . 11 (𝜑 → (((abs‘(𝐴𝐵)) / (abs‘𝐴)) < 1 ↔ 0 < (1 − ((abs‘(𝐴𝐵)) / (abs‘𝐴)))))
111108, 110mpbid 235 . . . . . . . . . 10 (𝜑 → 0 < (1 − ((abs‘(𝐴𝐵)) / (abs‘𝐴))))
11258, 5, 7divcld 11982 . . . . . . . . . . . . 13 (𝜑 → ((𝐴𝐵) / 𝐴) ∈ ℂ)
113112releabsd 15495 . . . . . . . . . . . 12 (𝜑 → (ℜ‘((𝐴𝐵) / 𝐴)) ≤ (abs‘((𝐴𝐵) / 𝐴)))
1145, 14, 5, 7divsubdird 12021 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐴𝐵) / 𝐴) = ((𝐴 / 𝐴) − (𝐵 / 𝐴)))
1155, 7dividd 11980 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐴 / 𝐴) = 1)
116115oveq1d 7415 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐴 / 𝐴) − (𝐵 / 𝐴)) = (1 − (𝐵 / 𝐴)))
117114, 116eqtrd 2800 . . . . . . . . . . . . . . 15 (𝜑 → ((𝐴𝐵) / 𝐴) = (1 − (𝐵 / 𝐴)))
118117fveq2d 6875 . . . . . . . . . . . . . 14 (𝜑 → (ℜ‘((𝐴𝐵) / 𝐴)) = (ℜ‘(1 − (𝐵 / 𝐴))))
119 resub 15168 . . . . . . . . . . . . . . 15 ((1 ∈ ℂ ∧ (𝐵 / 𝐴) ∈ ℂ) → (ℜ‘(1 − (𝐵 / 𝐴))) = ((ℜ‘1) − (ℜ‘(𝐵 / 𝐴))))
12088, 30, 119sylancr 598 . . . . . . . . . . . . . 14 (𝜑 → (ℜ‘(1 − (𝐵 / 𝐴))) = ((ℜ‘1) − (ℜ‘(𝐵 / 𝐴))))
121118, 120eqtrd 2800 . . . . . . . . . . . . 13 (𝜑 → (ℜ‘((𝐴𝐵) / 𝐴)) = ((ℜ‘1) − (ℜ‘(𝐵 / 𝐴))))
122 re1 15195 . . . . . . . . . . . . . 14 (ℜ‘1) = 1
123122oveq1i 7410 . . . . . . . . . . . . 13 ((ℜ‘1) − (ℜ‘(𝐵 / 𝐴))) = (1 − (ℜ‘(𝐵 / 𝐴)))
124121, 123eqtrdi 2816 . . . . . . . . . . . 12 (𝜑 → (ℜ‘((𝐴𝐵) / 𝐴)) = (1 − (ℜ‘(𝐵 / 𝐴))))
12558, 5, 7absdivd 15499 . . . . . . . . . . . 12 (𝜑 → (abs‘((𝐴𝐵) / 𝐴)) = ((abs‘(𝐴𝐵)) / (abs‘𝐴)))
126113, 124, 1253brtr3d 5136 . . . . . . . . . . 11 (𝜑 → (1 − (ℜ‘(𝐵 / 𝐴))) ≤ ((abs‘(𝐴𝐵)) / (abs‘𝐴)))
12796, 64, 61, 126subled 11805 . . . . . . . . . 10 (𝜑 → (1 − ((abs‘(𝐴𝐵)) / (abs‘𝐴))) ≤ (ℜ‘(𝐵 / 𝐴)))
12856, 63, 64, 111, 127ltletrd 11358 . . . . . . . . 9 (𝜑 → 0 < (ℜ‘(𝐵 / 𝐴)))
129 argregt0 26733 . . . . . . . . 9 (((𝐵 / 𝐴) ∈ ℂ ∧ 0 < (ℜ‘(𝐵 / 𝐴))) → (ℑ‘(log‘(𝐵 / 𝐴))) ∈ (-(π / 2)(,)(π / 2)))
13030, 128, 129syl2anc 595 . . . . . . . 8 (𝜑 → (ℑ‘(log‘(𝐵 / 𝐴))) ∈ (-(π / 2)(,)(π / 2)))
131 cosq14gt0 26633 . . . . . . . 8 ((ℑ‘(log‘(𝐵 / 𝐴))) ∈ (-(π / 2)(,)(π / 2)) → 0 < (cos‘(ℑ‘(log‘(𝐵 / 𝐴)))))
132130, 131syl 18 . . . . . . 7 (𝜑 → 0 < (cos‘(ℑ‘(log‘(𝐵 / 𝐴)))))
133132gt0ne0d 11766 . . . . . 6 (𝜑 → (cos‘(ℑ‘(log‘(𝐵 / 𝐴)))) ≠ 0)
13453, 133retancld 16191 . . . . 5 (𝜑 → (tan‘(ℑ‘(log‘(𝐵 / 𝐴)))) ∈ ℝ)
135134recnd 11225 . . . 4 (𝜑 → (tan‘(ℑ‘(log‘(𝐵 / 𝐴)))) ∈ ℂ)
136135abscld 15480 . . 3 (𝜑 → (abs‘(tan‘(ℑ‘(log‘(𝐵 / 𝐴))))) ∈ ℝ)
137 tanabsge 26629 . . . 4 ((ℑ‘(log‘(𝐵 / 𝐴))) ∈ (-(π / 2)(,)(π / 2)) → (abs‘(ℑ‘(log‘(𝐵 / 𝐴)))) ≤ (abs‘(tan‘(ℑ‘(log‘(𝐵 / 𝐴))))))
138130, 137syl 18 . . 3 (𝜑 → (abs‘(ℑ‘(log‘(𝐵 / 𝐴)))) ≤ (abs‘(tan‘(ℑ‘(log‘(𝐵 / 𝐴))))))
139128gt0ne0d 11766 . . . . . . 7 (𝜑 → (ℜ‘(𝐵 / 𝐴)) ≠ 0)
140 tanarg 26742 . . . . . . 7 (((𝐵 / 𝐴) ∈ ℂ ∧ (ℜ‘(𝐵 / 𝐴)) ≠ 0) → (tan‘(ℑ‘(log‘(𝐵 / 𝐴)))) = ((ℑ‘(𝐵 / 𝐴)) / (ℜ‘(𝐵 / 𝐴))))
14130, 139, 140syl2anc 595 . . . . . 6 (𝜑 → (tan‘(ℑ‘(log‘(𝐵 / 𝐴)))) = ((ℑ‘(𝐵 / 𝐴)) / (ℜ‘(𝐵 / 𝐴))))
142141fveq2d 6875 . . . . 5 (𝜑 → (abs‘(tan‘(ℑ‘(log‘(𝐵 / 𝐴))))) = (abs‘((ℑ‘(𝐵 / 𝐴)) / (ℜ‘(𝐵 / 𝐴)))))
14330imcld 15236 . . . . . . 7 (𝜑 → (ℑ‘(𝐵 / 𝐴)) ∈ ℝ)
144143recnd 11225 . . . . . 6 (𝜑 → (ℑ‘(𝐵 / 𝐴)) ∈ ℂ)
14564recnd 11225 . . . . . 6 (𝜑 → (ℜ‘(𝐵 / 𝐴)) ∈ ℂ)
146144, 145, 139absdivd 15499 . . . . 5 (𝜑 → (abs‘((ℑ‘(𝐵 / 𝐴)) / (ℜ‘(𝐵 / 𝐴)))) = ((abs‘(ℑ‘(𝐵 / 𝐴))) / (abs‘(ℜ‘(𝐵 / 𝐴)))))
14756, 64, 128ltled 11346 . . . . . . 7 (𝜑 → 0 ≤ (ℜ‘(𝐵 / 𝐴)))
14864, 147absidd 15464 . . . . . 6 (𝜑 → (abs‘(ℜ‘(𝐵 / 𝐴))) = (ℜ‘(𝐵 / 𝐴)))
149148oveq2d 7416 . . . . 5 (𝜑 → ((abs‘(ℑ‘(𝐵 / 𝐴))) / (abs‘(ℜ‘(𝐵 / 𝐴)))) = ((abs‘(ℑ‘(𝐵 / 𝐴))) / (ℜ‘(𝐵 / 𝐴))))
150142, 146, 1493eqtrd 2804 . . . 4 (𝜑 → (abs‘(tan‘(ℑ‘(log‘(𝐵 / 𝐴))))) = ((abs‘(ℑ‘(𝐵 / 𝐴))) / (ℜ‘(𝐵 / 𝐴))))
151144abscld 15480 . . . . . 6 (𝜑 → (abs‘(ℑ‘(𝐵 / 𝐴))) ∈ ℝ)
15264, 66remulcld 11227 . . . . . 6 (𝜑 → ((ℜ‘(𝐵 / 𝐴)) · 𝑅) ∈ ℝ)
15314, 5subcld 11557 . . . . . . . . 9 (𝜑 → (𝐵𝐴) ∈ ℂ)
154153, 5, 7divcld 11982 . . . . . . . 8 (𝜑 → ((𝐵𝐴) / 𝐴) ∈ ℂ)
155 absimle 15350 . . . . . . . 8 (((𝐵𝐴) / 𝐴) ∈ ℂ → (abs‘(ℑ‘((𝐵𝐴) / 𝐴))) ≤ (abs‘((𝐵𝐴) / 𝐴)))
156154, 155syl 18 . . . . . . 7 (𝜑 → (abs‘(ℑ‘((𝐵𝐴) / 𝐴))) ≤ (abs‘((𝐵𝐴) / 𝐴)))
15714, 5, 5, 7divsubdird 12021 . . . . . . . . . . 11 (𝜑 → ((𝐵𝐴) / 𝐴) = ((𝐵 / 𝐴) − (𝐴 / 𝐴)))
158115oveq2d 7416 . . . . . . . . . . 11 (𝜑 → ((𝐵 / 𝐴) − (𝐴 / 𝐴)) = ((𝐵 / 𝐴) − 1))
159157, 158eqtrd 2800 . . . . . . . . . 10 (𝜑 → ((𝐵𝐴) / 𝐴) = ((𝐵 / 𝐴) − 1))
160159fveq2d 6875 . . . . . . . . 9 (𝜑 → (ℑ‘((𝐵𝐴) / 𝐴)) = (ℑ‘((𝐵 / 𝐴) − 1)))
161 imsub 15176 . . . . . . . . . . 11 (((𝐵 / 𝐴) ∈ ℂ ∧ 1 ∈ ℂ) → (ℑ‘((𝐵 / 𝐴) − 1)) = ((ℑ‘(𝐵 / 𝐴)) − (ℑ‘1)))
16230, 88, 161sylancl 597 . . . . . . . . . 10 (𝜑 → (ℑ‘((𝐵 / 𝐴) − 1)) = ((ℑ‘(𝐵 / 𝐴)) − (ℑ‘1)))
163 im1 15196 . . . . . . . . . . 11 (ℑ‘1) = 0
164163oveq2i 7411 . . . . . . . . . 10 ((ℑ‘(𝐵 / 𝐴)) − (ℑ‘1)) = ((ℑ‘(𝐵 / 𝐴)) − 0)
165162, 164eqtrdi 2816 . . . . . . . . 9 (𝜑 → (ℑ‘((𝐵 / 𝐴) − 1)) = ((ℑ‘(𝐵 / 𝐴)) − 0))
166144subid1d 11546 . . . . . . . . 9 (𝜑 → ((ℑ‘(𝐵 / 𝐴)) − 0) = (ℑ‘(𝐵 / 𝐴)))
167160, 165, 1663eqtrrd 2805 . . . . . . . 8 (𝜑 → (ℑ‘(𝐵 / 𝐴)) = (ℑ‘((𝐵𝐴) / 𝐴)))
168167fveq2d 6875 . . . . . . 7 (𝜑 → (abs‘(ℑ‘(𝐵 / 𝐴))) = (abs‘(ℑ‘((𝐵𝐴) / 𝐴))))
1695, 14abssubd 15497 . . . . . . . . 9 (𝜑 → (abs‘(𝐴𝐵)) = (abs‘(𝐵𝐴)))
170169oveq1d 7415 . . . . . . . 8 (𝜑 → ((abs‘(𝐴𝐵)) / (abs‘𝐴)) = ((abs‘(𝐵𝐴)) / (abs‘𝐴)))
171153, 5, 7absdivd 15499 . . . . . . . 8 (𝜑 → (abs‘((𝐵𝐴) / 𝐴)) = ((abs‘(𝐵𝐴)) / (abs‘𝐴)))
172170, 171eqtr4d 2803 . . . . . . 7 (𝜑 → ((abs‘(𝐴𝐵)) / (abs‘𝐴)) = (abs‘((𝐵𝐴) / 𝐴)))
173156, 168, 1723brtr4d 5137 . . . . . 6 (𝜑 → (abs‘(ℑ‘(𝐵 / 𝐴))) ≤ ((abs‘(𝐴𝐵)) / (abs‘𝐴)))
17465, 59resubcld 11630 . . . . . . . . 9 (𝜑 → ((abs‘𝐴) − (abs‘(𝐴𝐵))) ∈ ℝ)
175174, 66remulcld 11227 . . . . . . . 8 (𝜑 → (((abs‘𝐴) − (abs‘(𝐴𝐵))) · 𝑅) ∈ ℝ)
17665, 152remulcld 11227 . . . . . . . 8 (𝜑 → ((abs‘𝐴) · ((ℜ‘(𝐵 / 𝐴)) · 𝑅)) ∈ ℝ)
17759recnd 11225 . . . . . . . . . . . . 13 (𝜑 → (abs‘(𝐴𝐵)) ∈ ℂ)
17888a1i 11 . . . . . . . . . . . . 13 (𝜑 → 1 ∈ ℂ)
179177, 178, 87adddid 11221 . . . . . . . . . . . 12 (𝜑 → ((abs‘(𝐴𝐵)) · (1 + 𝑅)) = (((abs‘(𝐴𝐵)) · 1) + ((abs‘(𝐴𝐵)) · 𝑅)))
180177mulridd 11214 . . . . . . . . . . . . 13 (𝜑 → ((abs‘(𝐴𝐵)) · 1) = (abs‘(𝐴𝐵)))
181180oveq1d 7415 . . . . . . . . . . . 12 (𝜑 → (((abs‘(𝐴𝐵)) · 1) + ((abs‘(𝐴𝐵)) · 𝑅)) = ((abs‘(𝐴𝐵)) + ((abs‘(𝐴𝐵)) · 𝑅)))
182179, 181eqtrd 2800 . . . . . . . . . . 11 (𝜑 → ((abs‘(𝐴𝐵)) · (1 + 𝑅)) = ((abs‘(𝐴𝐵)) + ((abs‘(𝐴𝐵)) · 𝑅)))
18369rpne0d 13056 . . . . . . . . . . . . . . 15 (𝜑 → (1 + 𝑅) ≠ 0)
184101, 87, 93, 183divassd 12017 . . . . . . . . . . . . . 14 (𝜑 → (((abs‘𝐴) · 𝑅) / (1 + 𝑅)) = ((abs‘𝐴) · (𝑅 / (1 + 𝑅))))
185184, 34eqtr4di 2818 . . . . . . . . . . . . 13 (𝜑 → (((abs‘𝐴) · 𝑅) / (1 + 𝑅)) = 𝑇)
18684, 185breqtrrd 5133 . . . . . . . . . . . 12 (𝜑 → (abs‘(𝐴𝐵)) < (((abs‘𝐴) · 𝑅) / (1 + 𝑅)))
18765, 66remulcld 11227 . . . . . . . . . . . . 13 (𝜑 → ((abs‘𝐴) · 𝑅) ∈ ℝ)
18859, 187, 69ltmuldivd 13098 . . . . . . . . . . . 12 (𝜑 → (((abs‘(𝐴𝐵)) · (1 + 𝑅)) < ((abs‘𝐴) · 𝑅) ↔ (abs‘(𝐴𝐵)) < (((abs‘𝐴) · 𝑅) / (1 + 𝑅))))
189186, 188mpbird 260 . . . . . . . . . . 11 (𝜑 → ((abs‘(𝐴𝐵)) · (1 + 𝑅)) < ((abs‘𝐴) · 𝑅))
190182, 189eqbrtrrd 5129 . . . . . . . . . 10 (𝜑 → ((abs‘(𝐴𝐵)) + ((abs‘(𝐴𝐵)) · 𝑅)) < ((abs‘𝐴) · 𝑅))
19159, 66remulcld 11227 . . . . . . . . . . 11 (𝜑 → ((abs‘(𝐴𝐵)) · 𝑅) ∈ ℝ)
19259, 191, 187ltaddsubd 11802 . . . . . . . . . 10 (𝜑 → (((abs‘(𝐴𝐵)) + ((abs‘(𝐴𝐵)) · 𝑅)) < ((abs‘𝐴) · 𝑅) ↔ (abs‘(𝐴𝐵)) < (((abs‘𝐴) · 𝑅) − ((abs‘(𝐴𝐵)) · 𝑅))))
193190, 192mpbid 235 . . . . . . . . 9 (𝜑 → (abs‘(𝐴𝐵)) < (((abs‘𝐴) · 𝑅) − ((abs‘(𝐴𝐵)) · 𝑅)))
194101, 177, 87subdird 11659 . . . . . . . . 9 (𝜑 → (((abs‘𝐴) − (abs‘(𝐴𝐵))) · 𝑅) = (((abs‘𝐴) · 𝑅) − ((abs‘(𝐴𝐵)) · 𝑅)))
195193, 194breqtrrd 5133 . . . . . . . 8 (𝜑 → (abs‘(𝐴𝐵)) < (((abs‘𝐴) − (abs‘(𝐴𝐵))) · 𝑅))
19660rpne0d 13056 . . . . . . . . . . . . . 14 (𝜑 → (abs‘𝐴) ≠ 0)
197101, 177, 101, 196divsubdird 12021 . . . . . . . . . . . . 13 (𝜑 → (((abs‘𝐴) − (abs‘(𝐴𝐵))) / (abs‘𝐴)) = (((abs‘𝐴) / (abs‘𝐴)) − ((abs‘(𝐴𝐵)) / (abs‘𝐴))))
198101, 196dividd 11980 . . . . . . . . . . . . . 14 (𝜑 → ((abs‘𝐴) / (abs‘𝐴)) = 1)
199198oveq1d 7415 . . . . . . . . . . . . 13 (𝜑 → (((abs‘𝐴) / (abs‘𝐴)) − ((abs‘(𝐴𝐵)) / (abs‘𝐴))) = (1 − ((abs‘(𝐴𝐵)) / (abs‘𝐴))))
200197, 199eqtrd 2800 . . . . . . . . . . . 12 (𝜑 → (((abs‘𝐴) − (abs‘(𝐴𝐵))) / (abs‘𝐴)) = (1 − ((abs‘(𝐴𝐵)) / (abs‘𝐴))))
201200, 127eqbrtrd 5127 . . . . . . . . . . 11 (𝜑 → (((abs‘𝐴) − (abs‘(𝐴𝐵))) / (abs‘𝐴)) ≤ (ℜ‘(𝐵 / 𝐴)))
202174, 64, 60ledivmuld 13104 . . . . . . . . . . 11 (𝜑 → ((((abs‘𝐴) − (abs‘(𝐴𝐵))) / (abs‘𝐴)) ≤ (ℜ‘(𝐵 / 𝐴)) ↔ ((abs‘𝐴) − (abs‘(𝐴𝐵))) ≤ ((abs‘𝐴) · (ℜ‘(𝐵 / 𝐴)))))
203201, 202mpbid 235 . . . . . . . . . 10 (𝜑 → ((abs‘𝐴) − (abs‘(𝐴𝐵))) ≤ ((abs‘𝐴) · (ℜ‘(𝐵 / 𝐴))))
20465, 64remulcld 11227 . . . . . . . . . . 11 (𝜑 → ((abs‘𝐴) · (ℜ‘(𝐵 / 𝐴))) ∈ ℝ)
205174, 204, 35lemul1d 13094 . . . . . . . . . 10 (𝜑 → (((abs‘𝐴) − (abs‘(𝐴𝐵))) ≤ ((abs‘𝐴) · (ℜ‘(𝐵 / 𝐴))) ↔ (((abs‘𝐴) − (abs‘(𝐴𝐵))) · 𝑅) ≤ (((abs‘𝐴) · (ℜ‘(𝐵 / 𝐴))) · 𝑅)))
206203, 205mpbid 235 . . . . . . . . 9 (𝜑 → (((abs‘𝐴) − (abs‘(𝐴𝐵))) · 𝑅) ≤ (((abs‘𝐴) · (ℜ‘(𝐵 / 𝐴))) · 𝑅))
207101, 145, 87mulassd 11220 . . . . . . . . 9 (𝜑 → (((abs‘𝐴) · (ℜ‘(𝐵 / 𝐴))) · 𝑅) = ((abs‘𝐴) · ((ℜ‘(𝐵 / 𝐴)) · 𝑅)))
208206, 207breqtrd 5131 . . . . . . . 8 (𝜑 → (((abs‘𝐴) − (abs‘(𝐴𝐵))) · 𝑅) ≤ ((abs‘𝐴) · ((ℜ‘(𝐵 / 𝐴)) · 𝑅)))
20959, 175, 176, 195, 208ltletrd 11358 . . . . . . 7 (𝜑 → (abs‘(𝐴𝐵)) < ((abs‘𝐴) · ((ℜ‘(𝐵 / 𝐴)) · 𝑅)))
21059, 152, 60ltdivmuld 13102 . . . . . . 7 (𝜑 → (((abs‘(𝐴𝐵)) / (abs‘𝐴)) < ((ℜ‘(𝐵 / 𝐴)) · 𝑅) ↔ (abs‘(𝐴𝐵)) < ((abs‘𝐴) · ((ℜ‘(𝐵 / 𝐴)) · 𝑅))))
211209, 210mpbird 260 . . . . . 6 (𝜑 → ((abs‘(𝐴𝐵)) / (abs‘𝐴)) < ((ℜ‘(𝐵 / 𝐴)) · 𝑅))
212151, 61, 152, 173, 211lelttrd 11356 . . . . 5 (𝜑 → (abs‘(ℑ‘(𝐵 / 𝐴))) < ((ℜ‘(𝐵 / 𝐴)) · 𝑅))
213 ltdivmul 12081 . . . . . 6 (((abs‘(ℑ‘(𝐵 / 𝐴))) ∈ ℝ ∧ 𝑅 ∈ ℝ ∧ ((ℜ‘(𝐵 / 𝐴)) ∈ ℝ ∧ 0 < (ℜ‘(𝐵 / 𝐴)))) → (((abs‘(ℑ‘(𝐵 / 𝐴))) / (ℜ‘(𝐵 / 𝐴))) < 𝑅 ↔ (abs‘(ℑ‘(𝐵 / 𝐴))) < ((ℜ‘(𝐵 / 𝐴)) · 𝑅)))
214151, 66, 64, 128, 213syl112anc 1397 . . . . 5 (𝜑 → (((abs‘(ℑ‘(𝐵 / 𝐴))) / (ℜ‘(𝐵 / 𝐴))) < 𝑅 ↔ (abs‘(ℑ‘(𝐵 / 𝐴))) < ((ℜ‘(𝐵 / 𝐴)) · 𝑅)))
215212, 214mpbird 260 . . . 4 (𝜑 → ((abs‘(ℑ‘(𝐵 / 𝐴))) / (ℜ‘(𝐵 / 𝐴))) < 𝑅)
216150, 215eqbrtrd 5127 . . 3 (𝜑 → (abs‘(tan‘(ℑ‘(log‘(𝐵 / 𝐴))))) < 𝑅)
21755, 136, 66, 138, 216lelttrd 11356 . 2 (𝜑 → (abs‘(ℑ‘(log‘(𝐵 / 𝐴)))) < 𝑅)
21851, 217eqbrtrd 5127 1 (𝜑 → (abs‘((ℑ‘(log‘𝐴)) − (ℑ‘(log‘𝐵)))) < 𝑅)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400   = wceq 1563  wcel 2145  wne 2960  cdif 3904  ifcif 4483   class class class wbr 5105  ran crn 5653  cfv 6525  (class class class)co 7400  cc 11086  cr 11087  0cc0 11088  1c1 11089   + caddc 11091   · cmul 11093  -∞cmnf 11229   < clt 11231  cle 11232  cmin 11429  -cneg 11430   / cdiv 11859  2c2 12286  +crp 13007  (,)cioo 13363  (,]cioc 13364  cre 15138  cim 15139  abscabs 15275  expce 16105  cosccos 16108  tanctan 16109  πcpi 16110  logclog 26677
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5232  ax-sep 5251  ax-nul 5261  ax-pow 5327  ax-pr 5395  ax-un 7722  ax-inf2 9598  ax-cnex 11144  ax-resscn 11145  ax-1cn 11146  ax-icn 11147  ax-addcl 11148  ax-addrcl 11149  ax-mulcl 11150  ax-mulrcl 11151  ax-mulcom 11152  ax-addass 11153  ax-mulass 11154  ax-distr 11155  ax-i2m1 11156  ax-1ne0 11157  ax-1rid 11158  ax-rnegex 11159  ax-rrecex 11160  ax-cnre 11161  ax-pre-lttri 11162  ax-pre-lttrn 11163  ax-pre-ltadd 11164  ax-pre-mulgt0 11165  ax-pre-sup 11166  ax-addf 11167
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3370  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4869  df-int 4909  df-iun 4954  df-iin 4955  df-br 5106  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5547  df-eprel 5552  df-po 5560  df-so 5561  df-fr 5605  df-se 5606  df-we 5607  df-xp 5658  df-rel 5659  df-cnv 5660  df-co 5661  df-dm 5662  df-rn 5663  df-res 5664  df-ima 5665  df-pred 6292  df-ord 6353  df-on 6354  df-lim 6355  df-suc 6356  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-isom 6534  df-riota 7357  df-ov 7403  df-oprab 7404  df-mpo 7405  df-of 7664  df-om 7851  df-1st 7974  df-2nd 7975  df-supp 8145  df-frecs 8266  df-wrecs 8297  df-recs 8346  df-rdg 8385  df-1o 8441  df-2o 8442  df-er 8682  df-map 8814  df-pm 8815  df-ixp 8884  df-en 8932  df-dom 8933  df-sdom 8934  df-fin 8935  df-fsupp 9310  df-fi 9359  df-sup 9390  df-inf 9391  df-oi 9460  df-card 9913  df-pnf 11233  df-mnf 11234  df-xr 11235  df-ltxr 11236  df-le 11237  df-sub 11431  df-neg 11432  df-div 11860  df-nn 12225  df-2 12294  df-3 12295  df-4 12296  df-5 12297  df-6 12298  df-7 12299  df-8 12300  df-9 12301  df-n0 12496  df-z 12583  df-dec 12703  df-uz 12854  df-q 12964  df-rp 13008  df-xneg 13128  df-xadd 13129  df-xmul 13130  df-ioo 13367  df-ioc 13368  df-ico 13369  df-icc 13370  df-fz 13527  df-fzo 13674  df-fl 13816  df-mod 13894  df-seq 14029  df-exp 14089  df-fac 14301  df-bc 14330  df-hash 14358  df-shft 15094  df-cj 15140  df-re 15141  df-im 15142  df-sqrt 15276  df-abs 15277  df-limsup 15512  df-clim 15529  df-rlim 15530  df-sum 15728  df-ef 16111  df-sin 16113  df-cos 16114  df-tan 16115  df-pi 16116  df-struct 17197  df-sets 17214  df-slot 17232  df-ndx 17244  df-base 17260  df-ress 17281  df-plusg 17313  df-mulr 17314  df-starv 17315  df-sca 17316  df-vsca 17317  df-ip 17318  df-tset 17319  df-ple 17320  df-ds 17322  df-unif 17323  df-hom 17324  df-cco 17325  df-rest 17465  df-topn 17466  df-0g 17484  df-gsum 17485  df-topgen 17486  df-pt 17487  df-prds 17490  df-xrs 17546  df-qtop 17551  df-imas 17552  df-xps 17554  df-mre 17628  df-mrc 17629  df-acs 17631  df-mgm 18688  df-sgrp 18767  df-mnd 18783  df-submnd 18832  df-mulg 19125  df-cntz 19378  df-cmn 19843  df-psmet 21474  df-xmet 21475  df-met 21476  df-bl 21477  df-mopn 21478  df-fbas 21479  df-fg 21480  df-cnfld 21483  df-top 23012  df-topon 23029  df-topsp 23051  df-bases 23064  df-cld 23137  df-ntr 23138  df-cls 23139  df-nei 23216  df-lp 23254  df-perf 23255  df-cn 23345  df-cnp 23346  df-haus 23433  df-tx 23680  df-hmeo 23873  df-fil 23964  df-fm 24056  df-flim 24057  df-flf 24058  df-xms 24438  df-ms 24439  df-tms 24440  df-cncf 24998  df-limc 25986  df-dv 25987  df-log 26679
This theorem is referenced by:  logcnlem5  26769
  Copyright terms: Public domain W3C validator