diff options
| author | Paul Eggert <eggert@twinsun.com> | 1993-08-10 04:14:17 +0000 |
|---|---|---|
| committer | Paul Eggert <eggert@twinsun.com> | 1993-08-10 04:14:17 +0000 |
| commit | e7bb3aebcc1189826115069e938130cf2aa96a97 (patch) | |
| tree | 9207e21af0ccdb4dfe2aa5e73b4172c2bed029f8 /lisp/calendar/lunar.el | |
| parent | 12e070d17a0907c7f7ee88cb386d2c08fdf63b01 (diff) | |
| download | emacs-e7bb3aebcc1189826115069e938130cf2aa96a97.tar.gz | |
solar-mod -> mod
Diffstat (limited to 'lisp/calendar/lunar.el')
| -rw-r--r-- | lisp/calendar/lunar.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/calendar/lunar.el b/lisp/calendar/lunar.el index 7929efeb3d1..4f9b5a35eaf 100644 --- a/lisp/calendar/lunar.el +++ b/lisp/calendar/lunar.el @@ -96,19 +96,19 @@ remainder mod 4 gives the phase: 0 new moon, 1 first quarter, 2 full moon, (solar-sin-degrees (+ 166.56 (* 132.87 time) (* -0.009173 time time)))))) - (sun-anomaly (solar-mod + (sun-anomaly (mod (+ 359.2242 (* 29.105356 index) (* -0.0000333 time time) (* -0.00000347 time time time)) 360.0)) - (moon-anomaly (solar-mod + (moon-anomaly (mod (+ 306.0253 (* 385.81691806 index) (* 0.0107306 time time) (* 0.00001236 time time time)) 360.0)) - (moon-lat (solar-mod + (moon-lat (mod (+ 21.2964 (* 390.67050646 index) (* -0.0016528 time time) |