Autocad lisp ade_od functions