(load "~mc27/labs/quilting/quilting.scm")
(load "~mc27/2005S/iod.ss")

(define make-combine-a-bunch
  .....)

(define stack-copies-of (make-combine-a-bunch stack))

(define side-by-side-copies-of (make-combine-a-bunch side-by-side)))