(defun map-range (lambda min max &optional (step 1)) (loop for i from min upto max by step collect (funcall lambda i)))