определение расширителей setf -в Common Lisp

Вот в чем дело :Я не "получаю" расширители setf -и хотел бы узнать, как они работают.

Мне нужно узнать, как они работают, потому что у меня есть проблема, которая кажется типичным примером того, почему вы должны изучать расширители setf -, проблема заключается в следующем:

(defparameter some-array (make-array 10))

(defun arr-index (index-string)
  (aref some-array (parse-integer index-string))

(setf (arr-index "2") 7) ;; Error: undefined function (setf arr-index)

Как написать правильный расширитель setf -для ARR -INDEX?