small lisp updates
This commit is contained in:
@@ -38,6 +38,9 @@
|
||||
; return fourth element of list
|
||||
(defun fourth (l) (index l 3))
|
||||
|
||||
; return fifth element of list
|
||||
(defun fifth (l) (index l 4))
|
||||
|
||||
|
||||
|
||||
; from list of lists creates csv string
|
||||
@@ -61,3 +64,6 @@
|
||||
|
||||
rows_str
|
||||
))
|
||||
|
||||
|
||||
(defun setq (var val) (define var val))
|
||||
Reference in New Issue
Block a user