(set draft (make-paper :title 'draft : body (make-paper-body)
:program (make-bad-paper-program)))
(defun make-bad-paper-program ()
(let ((argument nil))
#' (lambda (premise)
(push premise argument)
'no-op)))
but seriously — you can click on one of the links above depending on the level of bakedness you want to see in a paper