;; number of (numof -> nof) (define-macro (nof num body) `(make-list-with-proc ,num (lambda (idx) ,body)))