(math-approx-ln-10, math-approx-ln-2): Remove `eval-when-compile's.
This commit is contained in:
parent
c6254f53a5
commit
82472f457c
1 changed files with 2 additions and 4 deletions
|
@ -1794,16 +1794,14 @@ If this can't be done, return NIL."
|
|||
(math-lnp1-series nextsum (1+ n) nextx x))))
|
||||
|
||||
(defconst math-approx-ln-10
|
||||
(eval-when-compile
|
||||
(math-read-number-simple "2.302585092994045684018"))
|
||||
(math-read-number-simple "2.302585092994045684018")
|
||||
"An approximation for ln(10).")
|
||||
|
||||
(math-defcache math-ln-10 math-approx-ln-10
|
||||
(math-ln-raw-2 '(float 1 1)))
|
||||
|
||||
(defconst math-approx-ln-2
|
||||
(eval-when-compile
|
||||
(math-read-number-simple "0.693147180559945309417"))
|
||||
(math-read-number-simple "0.693147180559945309417")
|
||||
"An approximation for ln(2).")
|
||||
|
||||
(math-defcache math-ln-2 math-approx-ln-2
|
||||
|
|
Loading…
Add table
Reference in a new issue