+++ /dev/null
-;;; Definition stored by Calc on Mon Jan 8 11:30:38 2024
-(put 'calc-define 'calc-User-scale-analog '(progn
- (defun calc-User-scale-analog (arg) (interactive "P")
- (calc-execute-kbd-macro ["s s e m i n <return> - M-' 3 <tab> s s p m i
- n <return> - <tab> / <return> s r e m i n <return> s r p m i n
- <return> <escape> <tab> / -" nil] arg "zs"))
- (put 'calc-User-scale-analog 'calc-user-defn 't)
- (define-key calc-mode-map "zs" 'calc-User-scale-analog)
-))
-
-;;; Mode settings stored by Calc on Wed May 15 16:26:58 2024
-(setq calc-invocation-macro [C-kp-right 24 42 42 C-kp-up 24 98 42 67 97 108 99 32 84 114 97 105 108 42 return C-kp-down C-kp-right 24 48 90 73 109 109])
-(setq calc-window-height 36)
-;;; End of mode settings