(defun helper-2 (list)
(if (null (first (rest list)))
0)
(+ (distance ((car list) (first (rest list))))
(helper-2 (rest list))))
I
Your helper-2
function is wrong in two places:
if
, so that it functions as an if/else.(car list)
.Here's the fixed version:
(defun helper-2 (list)
(if (null (first (rest list)))
0
(+ (distance (car list) (first (rest list)))
(helper-2 (rest list)))))
Section 3.1.2.1.2.3 Function Forms of the HyperSpec describes how a form that is a cons, such as ((car list) (first (rest list))), is evaluated:
How a compound form is processed depends on whether it is classified as a special form, a macro form, a function form, or a lambda form.
You can read the subsections linked to from that page for more details, but the essence is that since the first element of this list is not a symbol, the form as a whole must be a lambda form. According to 3.1.2.1.2.4 Lambda Forms a lambda form is a list where the first element is a lambda expression. `However, (car list) is not a lambda expression, so you get the corresponding error message.
You claimed that (distance '(2 0) '(4 0)) will output two, but that shows distance being called with two arguments. Even if ((car list) (first (rest list))) could be evaluated, it would produce just one value, and so (distance ((car list) (first (rest list)))) would call distance with just one argument. You should be doing this instead:
(distance (car list) (first (rest list)))
Also see: