Lines Matching defs:from
45 (defun calendar-julian-from-absolute (date)
49 (let* ((approx (/ (+ date 2) 366));; Approximation from below.
50 (year ;; Search forward from the approximation.
53 (>= date (calendar-absolute-from-julian (list 1 1 (1+ y))))
55 (month ;; Search forward from January.
58 (calendar-absolute-from-julian
67 (- date (1- (calendar-absolute-from-julian (list month 1 year))))))
70 (defun calendar-absolute-from-julian (date)
90 (calendar-julian-from-absolute
91 (calendar-absolute-from-gregorian
110 (calendar-julian-from-absolute
111 (calendar-absolute-from-gregorian
132 (calendar-goto-date (calendar-gregorian-from-absolute
133 (calendar-absolute-from-julian date)))
148 (let* ((start-date (calendar-absolute-from-gregorian
150 (end-date (calendar-absolute-from-gregorian
152 (julian-start (calendar-julian-from-absolute start-date))
153 (julian-end (calendar-julian-from-absolute end-date))
157 (let ((date (calendar-gregorian-from-absolute
158 (calendar-absolute-from-julian
167 (defun calendar-absolute-from-astro (d)
171 (defun calendar-astro-from-absolute (d)
180 (calendar-astro-from-absolute
181 (calendar-absolute-from-gregorian
198 (calendar-gregorian-from-absolute
200 (calendar-absolute-from-astro daynumber))))