In Lisp programming language.

Make a function pref which tells the number of times the first item in a list repeats.

Note: Do not have to use COUNT function.

I have provided the code with using the function count but you have to make function without using COUNT function.

this is some output of the function.

--------------------------------------------------

code using COUNT.

--------------------------------------------------

(defun pref(list) (count (nth 0 list) list) )

1sp>(pref '(a a a b b ccccc)). isp> (pref '(a b c d)) lsp>(pref '()) 1sp>(pref '(a a a b b ccccc)). isp> (pref '(a b c d)) lsp>(pref '())