(let* ([current car(p)] [next car(cdr(p))]))

Here is the code in its entirety:

(define sortP (lambda (p sortedList);sortedList starts out empty (let* ([current car(p)] [next car(cdr(p))])) (cond ((= (length p) 0) sortedList);empty list ;find the smallest power and add it to sortedList ((equal? (findSmallest (current next)) current) sortP(combine(findSmallest (current cdr(next))) sortedList) ) (else sortP(combine(findSmallest (next cdr(next))) sortedList) ) ) ) )

I have tried including the entire cond statement within let*, but I still get the same error.