]> code.delx.au - gnu-emacs/commitdiff
solar-mod -> mod
authorPaul Eggert <eggert@twinsun.com>
Tue, 10 Aug 1993 04:14:17 +0000 (04:14 +0000)
committerPaul Eggert <eggert@twinsun.com>
Tue, 10 Aug 1993 04:14:17 +0000 (04:14 +0000)
lisp/calendar/lunar.el

index 7929efeb3d1de89091f802f4233c752f6109eabd..4f9b5a35eaf372bdd49fcb210703959c2ee185d1 100644 (file)
@@ -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)