diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-09-19 11:49:21 +0200 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-09-19 11:49:21 +0200 |
| commit | 9e0d4f9ef1cd4d7149c84475df5cef4d408743b6 (patch) | |
| tree | 2723dc7513591123264d50be0b48c19cc6bcc405 /lisp/calendar/solar.el | |
| parent | a2930e438b2a70726e6d5b09de8b2a9658505c4e (diff) | |
| download | emacs-9e0d4f9ef1cd4d7149c84475df5cef4d408743b6.tar.gz | |
* lisp/emacs-lisp/float-sup.el (float-pi): New name for `pi'.
(float-e): New name for `e'.
(degrees-to-radians, radians-to-degrees):
* lisp/calendar/solar.el (solar-longitude):
* lisp/calculator.el (calculator-registers, calculator-funcall):
* lisp/textmodes/artist.el (artist-spray-random-points):
* lisp/play/bubbles.el (bubbles--initialize-images): Use new names.
Diffstat (limited to 'lisp/calendar/solar.el')
| -rw-r--r-- | lisp/calendar/solar.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/calendar/solar.el b/lisp/calendar/solar.el index 3d6ab73e778..8116597ad02 100644 --- a/lisp/calendar/solar.el +++ b/lisp/calendar/solar.el @@ -752,12 +752,12 @@ The values of `calendar-daylight-savings-starts', (sin (mod (+ (cadr x) (* (nth 2 x) U)) - (* 2 pi))))) + (* 2 float-pi))))) solar-data-list))))) (aberration (* 0.0000001 (- (* 17 (cos (+ 3.10 (* 62830.14 U)))) 973))) - (A1 (mod (+ 2.18 (* U (+ -3375.70 (* 0.36 U)))) (* 2 pi))) - (A2 (mod (+ 3.51 (* U (+ 125666.39 (* 0.10 U)))) (* 2 pi))) + (A1 (mod (+ 2.18 (* U (+ -3375.70 (* 0.36 U)))) (* 2 float-pi))) + (A2 (mod (+ 3.51 (* U (+ 125666.39 (* 0.10 U)))) (* 2 float-pi))) (nutation (* -0.0000001 (+ (* 834 (sin A1)) (* 64 (sin A2)))))) (mod (radians-to-degrees (+ longitude aberration nutation)) 360.0))) |