;;variables used in reports ;; these variables are used as placeholders as the actual objects are generated, pushed into these variables, then pushed from these variables ;; into other streams and files (defvar report-number nil) (defvar report-year nil) (defvar report-month nil) (defvar report-day nil) (defvar report-class nil) (defvar report-type nil) (defvar report-evidence nil) (defvar report-response-a nil) (defvar report-agreement-a nil) (defvar report-counselor-a nil) (defvar report-response-b nil) (defvar report-agreement-b nil) (defvar report-counselor-b nil) (defvar report-response-c nil) (defvar report-agreement-c nil) (defvar report-counselor-c nil) (defvar report-response-d nil) (defvar report-agreement-d nil) (defvar report-counselor-d nil) (defvar report-response-e nil) (defvar report-agreement-e nil) (defvar report-counselor-e nil) (defun alien-group-generator (personality technology biology location ships goals relations) (list :personality a :technology b :biology c :location d :ships e :goals f :relations h)) (defun alien-personality-generator ()) (defun alien-technology-generator (level techs)) (defun alien-biology-generator (type-main)) (defun alien-locations-generator (surface orbit systems)) (defun alien-ships-generator ()) (defun alien-goals-generator ()) (defun alien-relations-generator ())