cad生成最小包围盒lisp