This is the code I have so far, I am trying to implement code from a previous question.
This is the error I am getting, procedure application: expected procedure, given: 1 (no arguments)
I don't think my counter is correct.
(define (countrepeat lst)
(define (count s lst)
((null? list) '())
((null? (cdr lst)) '())
((equal? (car lst)(car(cdr lst))) (count(+1 cdr lst)))
(else (list s(list(car lst))))