  zoom.lisp:
init-picture`  static-arrays-of  drag-picture
resize-zoom  refill-zoom  move-zoom 
present`  zoom  unzoom

  viewable.lisp
set-viewable-name  
viewable-p  condensed-history  print-object
(*auto-display-viewables*)
history-of  set-history  set-not-current
display  make-picture find-picture
destroy  destroy-viewable  setv  getv

  synth.lisp
side-by-side  make-impulse  make-sin-grating
make-sin-zone-plate  make-cos-zone-plate
make-uniform-random-image  make-top
make-left  make-disc  make-pinwheel

  surface.lisp
surface-plot  draw-surface  draw-surface-x
draw-surface-y  hidden-line-draw( ,-x,-y)

  *fileio.lisp
load-image  extract-filename  image-from-file
save-image  save-unsigned-byte-32-image
