Function: math-iso-dt-to-date

math-iso-dt-to-date is a byte-compiled function defined in calc-forms.el.gz.

Signature

(math-iso-dt-to-date DT)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-forms.el.gz
(defun math-iso-dt-to-date (dt)
  (let ((date (math-absolute-from-iso-dt (car dt) (nth 1 dt) (nth 2 dt))))
    (if (nth 3 dt)
	(math-add (math-float date)
		  (math-div (math-add (+ (* (nth 3 dt) 3600)
					 (* (nth 4 dt) 60))
				      (nth 5 dt))
			    '(float 864 2)))
      date)))