dot/emacs-calc: Sink `var-AlgSimpRules' to be with the other rulesets.
authorMark Wooding <mdw@distorted.org.uk>
Sat, 25 Jun 2022 11:23:17 +0000 (12:23 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Sat, 25 Jun 2022 11:23:17 +0000 (12:23 +0100)
dot/emacs-calc

index 75c8036..85c2748 100644 (file)
@@ -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))))))))