(defpackage "bit-d-generate" (:nicknames :bdg) (:use :cl))