Flatten (AutoLISP function)

From AutoCAD

;|
WIKI-FLATTEN
Returns flattened coordinates of a 3d point

  Flatten (AutoLISP function)

   External function references:
   WIKI-ASIN
   WIKI-TAN
|;
(DEFUN
   WIKI-FLATTEN (PNT)
  (LIST (CAR PNT) (CADR PNT) 0.0)
)