Lines Matching defs:from
54 (defconst french-calendar-epoch (calendar-absolute-from-gregorian '(9 22 1792))
115 (defun calendar-absolute-from-french (date)
116 "Compute absolute date from French Revolutionary date DATE.
135 (defun calendar-french-from-absolute (date)
142 (let* ((approx ;; Approximation from below.
144 (year ;; Search forward from the approximation.
147 (>= date (calendar-absolute-from-french (list 1 1 (1+ y))))
149 (month ;; Search forward from Vendemiaire.
152 (calendar-absolute-from-french
159 (1- (calendar-absolute-from-french (list month 1 year))))))
166 (let* ((french-date (calendar-french-from-absolute
167 (calendar-absolute-from-gregorian
211 (calendar-french-from-absolute
212 (calendar-absolute-from-gregorian
242 (calendar-goto-date (calendar-gregorian-from-absolute
243 (calendar-absolute-from-french date)))