changeset 47813:eeaba883e50a

(calcFunc-ln): In symbolic manipulations, ln(-1) should be i*pi, not pi.
author David Kastrup <dak@gnu.org>
date Wed, 09 Oct 2002 16:00:16 +0000
parents 5558ace701bf
children dbef3275bcc5
files lisp/calc/calc-alg.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc-alg.el	Wed Oct 09 15:59:57 2002 +0000
+++ b/lisp/calc/calc-alg.el	Wed Oct 09 16:00:16 2002 +0000
@@ -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)))