Expanded list processing functions the (defun chgnth (ivl) statement for elements with elements V substitution table L I (defun carnth (il) take the head table reserved table L front I-1 elements (defun cdrnth (il) table take the tail, remove the the Table L behind I elements (the defun delnth (il) delete table L I-elements trigonometric functions (defun tan (v/u) (setq u (cos v)) (if (/ = u 0) (/ (sin v) u))) (defun ctan (v/u) (setq u (sin v)) (if (/ = u 0) (/ (cos v) u) )) (defun sec (v/u) (setq u (sin v)) (if (/ = u 0) (/ 1 u))) (defun csc (v/u) (setq u (cos v)) ( if (/ = u 0) (/ 1 u))) (defun asin (v) (atan v (sqrt (- 1 (* vv))))) (defun acos (v) (- (/ pi 2) ( asin v

一组扩充的表处理函数.lsp

• We are an exchange download platform that only provides communication channels. The downloaded content comes from the internet. Except for download issues, please Google on your own.
• The downloaded content is provided for members to upload. If it unintentionally infringes on your copyright, please contact us.
• Please use Winrar for decompression tools
• If download fail, Try it againg or Feedback to us.
• If downloaded content did not match the introduction, Feedback to us，Confirm and will be refund.
• Before downloading, you can inquire through the uploaded person information

Nothing．