(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")
))
;;; 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))))))))