summaryrefslogtreecommitdiff
path: root/lisp/calc
diff options
context:
space:
mode:
authorJay Belanger <jay.p.belanger@gmail.com>2005-02-15 19:49:51 +0000
committerJay Belanger <jay.p.belanger@gmail.com>2005-02-15 19:49:51 +0000
commit6ec3030266816be78f613880d663896c2efba797 (patch)
tree8044e712283a1f62b4b0e61e825fb7d47a4a317d /lisp/calc
parent3ce6180e8405a3c669b35991f60a9a3c95669dbf (diff)
downloademacs-6ec3030266816be78f613880d663896c2efba797.tar.gz
(math-csc-raw): Fix typo.
Diffstat (limited to 'lisp/calc')
-rw-r--r--lisp/calc/calc-math.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-math.el b/lisp/calc/calc-math.el
index 2cfe81fdd65..d2c66c34d49 100644
--- a/lisp/calc/calc-math.el
+++ b/lisp/calc/calc-math.el
@@ -1070,7 +1070,7 @@
(math-div-float (math-mul-float (car sc) ch) d)
(math-div-float (math-mul-float (cdr sc) sh) d)))))
((eq (car x) 'polar)
- (math-polar (math-sec-raw (math-complex x))))
+ (math-polar (math-csc-raw (math-complex x))))
(t
(let ((sn (math-sin-raw x)))
(if (eq sn 0)