- Category:
- AI-NN-PR
- Tags:
-
- File Size:
- 1kb
- Update:
- 2013-02-06
- Downloads:
- 0 Times
- Uploaded by:
- lmy
Description: 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
To Search:
File list (Check if you may need any files):
一组扩充的表处理函数.lsp