Arnot · August 16, 2017 15:19
diff --git a/*scratch*.el b/*scratch*.el
 (defun filter (&rest args) ; args = list of all arguments
  (let ((factors (list -1 -1 -1
                      -1  8 -1
                      -1 -1 -1)))
    (reduce '+ (map '* factors args))))
	(defun filter (&rest args) ; args = list of all arguments
	(let ((factors (list -1 -1 -1
	-1 8 -1
	-1 -1 -1)))
	(reduce '+ (map '* factors args))))
No results found