anchor.diff:  ;;                                    :a-transform (spiro-animation:make-fixed-type2 '(1 10) 0.001)
   ;;                                    :b-transform (spiro-animation:make-fixed-type2 '(11 20) 0.001)
   ;;                                    :h-transform (spiro-animation:make-fixed-type2 '(21 30) 0.001)
  -                                   :dt-transform (spiro-animation:make-fixed-type2 '(22 23) 0.001)))
  +;;                                    :dt-transform (spiro-animation:make-fixed-type2 '(22 23) 0.001)))
   (defun from-mp3 (&key
                      mp3-file-name output-directory
                      (movie-file-name "spirograph_with_sound.mpg")
  
positive.code:            (funcall
              color-function
              0.0
              (+ 0.2 (/ (* i 0.6) (spirograph-steps sp)))
              0.0
              0.95)
             (funcall
  
negative.code:                    (keep-soundless nil)
  
                     (width 800) (height 800)
                     (bit-rate (* 4 1024))
                     (num-steps 240) (a-base 51.0) (b-base 7.0) (h-base 29.0)
                     (dt-base 70.0)
                     (fps 30)
  