add date.lisp