(calcFunc-ln): In symbolic manipulations,

ln(-1) should be i*pi, not pi.
This commit is contained in:
David Kastrup 2002-10-09 16:00:16 +00:00
parent 9ceab7df5d
commit 2c6dfebbbb

View file

@ -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)))