[programming]

Я, конечно, не надеюсь, но все же... Есть ли здесь знатоки LISP'а?
Не могу написать функцию, чтобы та работала правильно =(

(defun inquiry (list month material out_list)
  ((null list) (return out_list)) 
  (if (eql month (second (get (car list) 'cur_date)))
    (if (eql material (get (car list) 'material_name))
      (nconc out_list (get (car list) 'client_name))
    )
  )
  (inquiry (cdr list) month material out_list)
)

Функция должна проходить по списку, сравнивать атрибуты элементов (месяц и материал) и формировать выходной список. Вот с последним-то у меня и проблемы... Посмотрите, а?