summaryrefslogtreecommitdiff
path: root/lisp/calc/calc-math.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/calc/calc-math.el')
-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)