From 2c6dfebbbb7c32458e1a8901d0a9b54f4c4aeaaa Mon Sep 17 00:00:00 2001 From: David Kastrup Date: Wed, 9 Oct 2002 16:00:16 +0000 Subject: [PATCH] (calcFunc-ln): In symbolic manipulations, ln(-1) should be i*pi, not pi. --- lisp/calc/calc-alg.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/calc/calc-alg.el b/lisp/calc/calc-alg.el index f1a08c7e235..0a3634b1db5 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))) -- 2.39.2