;; update file for MEMBER (SETF (DB-COMPILE-DATE MEMBER) (list->date '(2 18 1997)))