;; | ----------------------------------------------------------------------------
;; | MI_InBetween
;; | ----------------------------------------------------------------------------
;; | Function : Checks if a give value is in between two values
;; | Auguments: 'X'  - Value to be checked
;; |            'X1' - Lower bound of check
;; |            'X2' - Upper bound of check
;; | Return   : T if the value 'X' lies between 'X1' and 'X2' else returns nil
;; | Comments : The values to be checked can be either integer or real.
;; | e-mail   : rakesh.rao@4d-technologies.com 
;; | Web      : www.4d-technologies.com
;; | ----------------------------------------------------------------------------

(defun MI_InBetween(X X1 X2)
(if (and (>= X (min X1 X2)) (<= X (max X1 X2)))
	T
	nil
)
)