From dc209c5a38b1742fae585ff120f0019b50001162 Mon Sep 17 00:00:00 2001 From: Mark Wooding Date: Sat, 25 Jun 2022 12:23:17 +0100 Subject: [PATCH] dot/emacs-calc: Sink `var-AlgSimpRules' to be with the other rulesets. --- dot/emacs-calc | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/dot/emacs-calc b/dot/emacs-calc index 75c8036..85c2748 100644 --- a/dot/emacs-calc +++ b/dot/emacs-calc @@ -78,9 +78,6 @@ constant bounds." (setq calc-angle-mode 'rad) ;;; End of mode settings -;;; Variable "var-AlgSimpRules" stored by Calc on Thu Jan 6 21:04:23 2000 -(setq var-AlgSimpRules '(vec (calcFunc-assign (+ (^ (calcFunc-sin (var x var-x)) 2) (^ (calcFunc-cos (var x var-x)) 2)) 1) (calcFunc-assign (calcFunc-exp (var x var-x)) (^ (var e var-e) (var x var-x))))) - ;;; Custom units stored by Calc on Thu Mar 18 19:02:50 1999 (setq math-additional-units '( (EB "1024 * PB" "Exabyte") @@ -105,6 +102,9 @@ constant bounds." )) ;;; End of custom units +;;; Variable "var-AlgSimpRules" stored by Calc on Thu Jan 6 21:04:23 2000 +(setq var-AlgSimpRules '(vec (calcFunc-assign (+ (^ (calcFunc-sin (var x var-x)) 2) (^ (calcFunc-cos (var x var-x)) 2)) 1) (calcFunc-assign (calcFunc-exp (var x var-x)) (^ (var e var-e) (var x var-x))))) + ;;; Variable "var-DeMoivre" stored by Calc on Fri Mar 19 16:06:10 1999 (setq var-DeMoivre '(vec (calcFunc-assign (^ (var e var-e) (var x var-x)) (calcFunc-exp (var x var-x))) (calcFunc-assign (calcFunc-exp (* (var i var-i) (var t var-t))) (calcFunc-evalsimp (+ (calcFunc-cos (var t var-t)) (* (var i var-i) (calcFunc-sin (var t var-t)))))))) -- 2.11.0