diff options
| author | David Kastrup <[email protected]> | 2002-10-09 16:00:16 +0000 |
|---|---|---|
| committer | David Kastrup <[email protected]> | 2002-10-09 16:00:16 +0000 |
| commit | 2c6dfebbbb7c32458e1a8901d0a9b54f4c4aeaaa (patch) | |
| tree | c44e9696ed98d6457684048c65fa387b648d6a37 /lisp/calc/calc-alg.el | |
| parent | 9ceab7df5d7a73add3924aa48e845ae5da8fae14 (diff) | |
(calcFunc-ln): In symbolic manipulations,
ln(-1) should be i*pi, not pi.
Diffstat (limited to 'lisp/calc/calc-alg.el')
| -rw-r--r-- | lisp/calc/calc-alg.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-alg.el b/lisp/calc/calc-alg.el index f1a08c7e23..0a3634b1db 100644 --- a/lisp/calc/calc-alg.el +++ b/lisp/calc/calc-alg.el @@ -1085,7 +1085,7 @@ (and calc-symbolic-mode (math-known-negp (nth 1 expr)) (math-add (list 'calcFunc-ln (math-neg (nth 1 expr))) - '(var pi var-pi))) + '(* (var pi var-pi) (var i var-i)))) (and calc-symbolic-mode (math-known-imagp (nth 1 expr)) (let* ((ip (calcFunc-im (nth 1 expr))) |