#!/usr/bin/ecl -shell

; your code goes here

(Setf ribbit '(rat cat fat tat))

(Defun mylast (listed)
  (If (null listed) nil)
  (If (null (rest listed)) listed)
  (mylast (rest listed)))

(Print (Mylast ribbit))