[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/calendar/solar.el
From: |
Pavel Janík |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/calendar/solar.el |
Date: |
Sun, 13 Jan 2002 05:01:42 -0500 |
Index: emacs/lisp/calendar/solar.el
diff -c emacs/lisp/calendar/solar.el:1.40 emacs/lisp/calendar/solar.el:1.41
*** emacs/lisp/calendar/solar.el:1.40 Sun Nov 11 15:14:47 2001
--- emacs/lisp/calendar/solar.el Sun Jan 13 05:01:42 2002
***************
*** 418,424 ****
Corresponding value is nil if there is no sunrise/sunset."
(let* (; first, get the exact moment of local noon.
(exact-local-noon (solar-exact-local-noon date))
! ; get the the time from the 2000 epoch.
(t0 (solar-julian-ut-centuries (car exact-local-noon)))
; store the sidereal time at Greenwich at midnight of UT time.
; find if summer or winter slightly above the equator
--- 418,424 ----
Corresponding value is nil if there is no sunrise/sunset."
(let* (; first, get the exact moment of local noon.
(exact-local-noon (solar-exact-local-noon date))
! ; get the time from the 2000 epoch.
(t0 (solar-julian-ut-centuries (car exact-local-noon)))
; store the sidereal time at Greenwich at midnight of UT time.
; find if summer or winter slightly above the equator
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/calendar/solar.el,
Pavel Janík <=