;; | ---------------------------------------------------------------------------- ;; | MI_AddDMS ;; | ---------------------------------------------------------------------------- ;; | Function : Adds the degrees, minutes and seconds to form a single decimal ;; | degrees number ;; | Arguments: 'd' - Degrees value ;; | 'm' - Minutes value ;; | 's' - Seconds value ;; | Returns : Decimal degrees value ;; | All returned values are in real numbers. ;; | Updated : May 18, 2002 ;; | e-mail : rakesh.rao@4d-technologies.com ;; | Web : www.4d-technologies.com ;; | ---------------------------------------------------------------------------- (defun MI_AddDMS( d m s / dd ) (+ d (/ m 60.0) (/ s 3600.0)) )