summaryrefslogtreecommitdiff
path: root/lisp
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
parent3ce6180e8405a3c669b35991f60a9a3c95669dbf (diff)
downloademacs-6ec3030266816be78f613880d663896c2efba797.tar.gz
(math-csc-raw): Fix typo.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog33
-rw-r--r--lisp/calc/calc-math.el2
2 files changed, 34 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3eabad53563..465bf57612b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,36 @@
+2005-02-15 Jay Belanger <belanger@truman.edu>
+
+ * calc/calc-alg.el: Add simplification rules for calcFunc-sec,
+ calcFunc-csc, calcFunc-cot, calcFunc-sech, calcFunc-csch and
+ calcFunc-coth.
+ (math-simplify-sqrt): Add simplifications.
+
+ * calc/calc-arith.el (math-real-if-arg-functions): Add functions
+ to list.
+
+ * calc/calc-ext.el: Add functions to autoloads.
+
+ * calc/calc-math.el (calc-sec, calc-csc, calc-cot, calc-sech)
+ (calc-csch, calc-coth, calcFunc-sec, calcFunc-csc, calcFunc-cot)
+ (calcFunc-sech, calcFunc-csch, calcFunc-coth, math-sec-raw)
+ (math-csc-raw, math-cot-raw): New functions.
+
+ * calc/calc-rules.el (calc-DistribRules, calc-NegateRules): Add rules.
+
+ * calc/calc-undo.el (calc-handle-undo): Remove prefix from
+ the variable name in a message.
+
+ * calc/calc-units.el: Add simplification rules for calcFunc-sec,
+ calcFunc-csc, calcFunc-cot.
+
+ * calc/calcalg2.el: Add derivative and integration rules for
+ calcFunc-sec, calcFunc-csc, calcFunc-cot, calcFunc-sech,
+ calcFunc-csch, calcFunc-coth.
+ (math-do-integral-methods): Add to checks for when to use
+ substitutions.
+
+ * calc/calccomp.el (math-eqn-special-funcs): Add functions to list.
+
2005-02-15 Lute Kamstra <lute@gnu.org>
* emacs-lisp/lisp-mode.el (lisp-mode-variables): Add
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)