;;; -*- Mode:LISP; Readtable:CL; Base:10 -*-

;;; Reason:
;;;  foo