Autocad lisp least square method formula