Autocad lisp greater or equal then