14681
#hash(((def ((lib "images/icons/symbol.rkt") recycle-icon)) . ((13387 . 8))) ((def ((lib "images/flomap.rkt") flomap-whirl-transform)) . ((36336 . 3))) ((def ((lib "images/icons/tool.rkt") small-debugger-icon)) . ((24664 . 6))) ((def ((lib "images/flomap.rkt") flomap-lt-superimpose)) . ((34427 . 4))) ((def ((lib "images/flomap.rkt") flomap-resize)) . ((33685 . 5))) ((def ((lib "images/flomap.rkt") flomap-max-value)) . ((26755 . 3))) ((def ((lib "images/icons/style.rkt") bitmap-render-icon)) . ((1253 . 6))) ((def ((lib "images/icons/misc.rkt") bomb-icon)) . ((18323 . 12))) ((form ((lib "images/compile-time.rkt") compiled-bitmap-list)) . ((25874 . 5))) ((def ((lib "images/flomap.rkt") flomap-transform-bounds)) . ((37739 . 5))) ((def ((lib "images/icons/misc.rkt") regular-polygon-icon)) . ((15359 . 12))) ((def ((lib "images/flomap.rkt") flomap-ref*)) . ((26364 . 5))) ((def ((lib "images/flomap.rkt") flomap-gradient-y)) . ((30540 . 3))) ((def ((lib "images/flomap.rkt") flomap-gaussian-blur-x)) . ((30864 . 4))) ((def ((lib "images/flomap.rkt") projection-mapping-inv)) . ((38507 . 4))) ((def ((lib "images/flomap.rkt") fmsqr)) . ((29435 . 3))) ((def ((lib "images/flomap.rkt") flomap-lc-superimpose)) . ((34524 . 4))) ((def ((lib "images/flomap.rkt") flomap-bilinear-ref)) . ((26466 . 6))) ((def ((lib "images/flomap.rkt") flomap-rb-superimpose)) . ((35203 . 4))) ((def ((lib "images/icons/tool.rkt") small-macro-stepper-icon)) . ((24088 . 7))) ((def ((lib "images/flomap.rkt") flomap-gradient)) . ((30604 . 3))) ((def ((lib "images/icons/arrow.rkt") left-over-arrow-icon)) . ((3561 . 8))) ((def ((lib "images/flomap.rkt") flomap-lb-superimpose)) . ((34621 . 4))) ((def ((lib "images/flomap.rkt") flomap-bilinear-ref*)) . ((26588 . 5))) ((def ((lib "images/flomap.rkt") flomap-vl-append)) . ((35300 . 4))) ((def ((lib "images/icons/control.rkt") search-forward-icon)) . ((9285 . 8))) ((def ((lib "images/flomap.rkt") flomap-normalize)) . ((29568 . 3))) ((def ((lib "images/icons/style.rkt") run-icon-color)) . ((443 . 3))) ((def ((lib "images/flomap.rkt") fm+)) . ((29631 . 4))) ((def ((lib "images/icons/tool.rkt") check-syntax-icon)) . ((23217 . 6))) ((def ((lib "images/flomap.rkt") flomap-vc-append)) . ((35392 . 4))) ((def ((lib "images/icons/arrow.rkt") right-arrow-icon)) . ((1626 . 8))) ((def ((lib "images/flomap.rkt") flomap-ccw-rotate)) . ((36114 . 3))) ((def ((lib "images/flomap.rkt") flomap-divide-alpha)) . ((28550 . 3))) ((def ((lib "images/flomap.rkt") fm-)) . ((29729 . 4))) ((def ((lib "images/flomap.rkt") flomap-values)) . ((26003 . 6))) ((def ((lib "images/flomap.rkt") flomap-ct-superimpose)) . ((34718 . 4))) ((def ((lib "images/flomap.rkt") flomap-vr-append)) . ((35484 . 4))) ((def ((lib "images/flomap.rkt") flomap-rotate)) . ((36178 . 4))) ((def ((lib "images/flomap.rkt") projection-mapping-fun)) . ((38507 . 4))) ((def ((lib "images/icons/style.rkt") default-icon-height)) . ((518 . 5))) ((def ((lib "images/flomap.rkt") flomap-lift2)) . ((30223 . 3))) ((def ((lib "images/icons/tool.rkt") macro-stepper-hash-color)) . ((25058 . 3))) ((def ((lib "images/icons/control.rkt") stop-icon)) . ((6624 . 8))) ((def ((lib "images/icons/misc.rkt") left-bomb-icon)) . ((18883 . 12))) ((def ((lib "images/flomap.rkt") flomap-2d-mapping?)) . ((37148 . 5))) ((def ((lib "images/flomap.rkt") flomap-rb-crop)) . ((33449 . 5))) ((def ((lib "images/icons/style.rkt") toolbar-icon-height)) . ((677 . 5))) ((def ((lib "images/flomap.rkt") projection-mapping?)) . ((38507 . 4))) ((def ((lib "images/icons/style.rkt") rubber-icon-material)) . ((896 . 2))) ((def ((lib "images/icons/symbol.rkt") hash-quote-icon)) . ((14954 . 8))) ((def ((lib "images/icons/control.rkt") fast-forward-icon)) . ((5862 . 8))) ((def ((lib "images/icons/control.rkt") continue-forward-icon)) . ((8478 . 8))) ((def ((lib "images/flomap.rkt") flomap-2d-mapping-bounded-by)) . ((37148 . 5))) ((def ((lib "images/icons/style.rkt") dark-metal-icon-color)) . ((161 . 3))) ((def ((lib "images/flomap.rkt") flomap-transform)) . ((36670 . 16))) ((def ((lib "images/icons/style.rkt") syntax-icon-color)) . ((243 . 3))) ((def ((lib "images/flomap.rkt") struct:projection-mapping)) . ((38507 . 4))) ((def ((lib "images/icons/style.rkt") icon-color->outline-color)) . ((1509 . 3))) ((def ((lib "images/flomap.rkt") flomap-lt-crop)) . ((32625 . 5))) ((def ((lib "images/flomap.rkt") struct:flomap)) . ((26003 . 6))) ((def ((lib "images/logos.rkt") planet-logo)) . ((25398 . 3))) ((def ((lib "images/icons/control.rkt") record-icon)) . ((6990 . 8))) ((def ((lib "images/flomap.rkt") flomap-scale)) . ((33552 . 5))) ((def ((lib "images/icons/style.rkt") light-metal-icon-color)) . ((0 . 3))) ((def ((lib "images/flomap.rkt") flomap)) . ((26003 . 6))) ((def ((lib "images/flomap.rkt") flomap-gaussian-blur-y)) . ((30953 . 4))) ((def ((lib "images/icons/symbol.rkt") lambda-icon)) . ((14545 . 9))) ((def ((lib "images/flomap.rkt") make-flomap)) . ((27734 . 6))) ((def ((lib "images/icons/control.rkt") pause-icon)) . ((7362 . 8))) ((def ((lib "images/flomap.rkt") flomap-2d-mapping-inv)) . ((37148 . 5))) ((def ((lib "images/flomap.rkt") build-flomap)) . ((27987 . 6))) ((def ((lib "images/icons/file.rkt") small-save-icon)) . ((11557 . 11))) ((def ((lib "images/flomap.rkt") flomap-lc-crop)) . ((32728 . 5))) ((def ((lib "images/icons/tool.rkt") small-macro-stepper-hash-color)) . ((25166 . 3))) ((def ((lib "images/flomap.rkt") flomap-inset)) . ((32103 . 14))) ((def ((lib "images/flomap.rkt") unsafe-flomap-ref)) . ((27253 . 9))) ((def ((lib "images/flomap.rkt") flomap-append-components)) . ((29282 . 4))) ((def ((lib "images/flomap.rkt") flomap-blur-x)) . ((31479 . 4))) ((def ((lib "images/flomap.rkt") flomap-lb-crop)) . ((32831 . 5))) ((def ((lib "images/flomap.rkt") flomap-copy)) . ((31643 . 7))) ((def ((lib "images/icons/misc.rkt") stethoscope-icon)) . ((20647 . 5))) ((def ((lib "images/flomap.rkt") unsafe-flomap-ref*)) . ((27444 . 8))) ((def ((lib "images/flomap.rkt") projection-mapping)) . ((38507 . 4))) ((def ((lib "images/icons/tool.rkt") small-check-syntax-icon)) . ((23504 . 7))) ((def ((lib "images/icons/control.rkt") search-backward-icon)) . ((9681 . 8))) ((def ((lib "images/flomap.rkt") make-flomap-2d-mapping)) . ((37365 . 5))) ((def ((lib "images/flomap.rkt") flomap-size)) . ((26155 . 3))) ((def ((lib "images/icons/arrow.rkt") up-arrow-icon)) . ((2397 . 8))) ((def ((lib "images/icons/control.rkt") bar-icon)) . ((4767 . 8))) ((def ((lib "images/flomap.rkt") flomap-box-blur-x)) . ((31183 . 4))) ((def ((lib "images/icons/misc.rkt") lock-icon)) . ((21163 . 13))) ((def ((lib "images/icons/arrow.rkt") right-under-arrow-icon)) . ((3960 . 8))) ((def ((lib "images/icons/file.rkt") floppy-disk-icon)) . ((10080 . 8))) ((def ((lib "images/flomap.rkt") draw-flomap)) . ((28370 . 5))) ((def ((lib "images/flomap.rkt") coords->index)) . ((27110 . 7))) ((def ((lib "images/icons/stickman.rkt") running-stickman-icon)) . ((22480 . 15))) ((def ((lib "images/flomap.rkt") flomap-box-blur-y)) . ((31275 . 4))) ((def ((lib "images/icons/file.rkt") load-icon)) . ((11020 . 11))) ((def ((lib "images/flomap.rkt") flomap-ct-crop)) . ((32934 . 5))) ((def ((lib "images/icons/control.rkt") step-icon)) . ((7731 . 8))) ((def ((lib "images/flomap.rkt") flomap-cc-superimpose)) . ((34815 . 4))) ((def ((lib "images/flomap.rkt") flomap-box-blur)) . ((31042 . 5))) ((def ((lib "images/icons/style.rkt") metal-icon-color)) . ((79 . 3))) ((def ((lib "images/icons/misc.rkt") foot-icon)) . ((16771 . 8))) ((form ((lib "images/flomap.rkt") Projection)) . ((38489 . 2))) ((def ((lib "images/flomap.rkt") flomap-rt-superimpose)) . ((35009 . 4))) ((def ((lib "images/icons/style.rkt") default-icon-material)) . ((1071 . 5))) ((form ((lib "images/flomap.rkt") inline-flomap-lift2)) . ((30405 . 4))) ((def ((lib "images/icons/tool.rkt") debugger-bomb-color)) . ((24955 . 3))) ((def ((lib "images/flomap.rkt") flomap-pin)) . ((33807 . 13))) ((def ((lib "images/flomap.rkt") flomap-cb-superimpose)) . ((34912 . 4))) ((def ((lib "images/icons/misc.rkt") clock-icon)) . ((19463 . 12))) ((def ((lib "images/icons/misc.rkt") short-stethoscope-icon)) . ((20899 . 5))) ((def ((lib "images/icons/arrow.rkt") left-under-arrow-icon)) . ((4365 . 8))) ((def ((lib "images/flomap.rkt") flomap-pin*)) . ((34101 . 13))) ((form ((lib "images/flomap.rkt") inline-build-flomap)) . ((28616 . 8))) ((def ((lib "images/flomap.rkt") flomap-rc-superimpose)) . ((35106 . 4))) ((form ((lib "images/flomap.rkt") inline-build-flomap*)) . ((28823 . 8))) ((def ((lib "images/logos.rkt") macro-stepper-logo)) . ((25635 . 3))) ((def ((lib "images/icons/tool.rkt") macro-stepper-icon)) . ((23799 . 6))) ((def ((lib "images/icons/style.rkt") metal-icon-material)) . ((1013 . 2))) ((def ((lib "images/flomap.rkt") flomap-multiply-alpha)) . ((28482 . 3))) ((def ((lib "images/flomap.rkt") flomap-rotate-transform)) . ((36258 . 3))) ((def ((lib "images/flomap.rkt") flomap-min-value)) . ((26693 . 3))) ((def ((lib "images/flomap.rkt") flomap-gradient-x)) . ((30476 . 3))) ((def ((lib "images/flomap.rkt") fmsqrt)) . ((29382 . 3))) ((def ((lib "images/flomap.rkt") flomap-fisheye-transform)) . ((36413 . 3))) ((def ((lib "images/icons/style.rkt") halt-icon-color)) . ((344 . 3))) ((def ((lib "images/flomap.rkt") fm*)) . ((29827 . 4))) ((def ((lib "images/icons/symbol.rkt") check-icon)) . ((14157 . 8))) ((def ((lib "images/flomap.rkt") flomap-nonzero-rect)) . ((26891 . 6))) ((def ((lib "images/icons/file.rkt") small-load-icon)) . ((12118 . 11))) ((def ((lib "images/flomap.rkt") flomap-gradient-normal)) . ((30674 . 3))) ((def ((lib "images/flomap.rkt") struct:flomap-2d-mapping)) . ((37148 . 5))) ((def ((lib "images/logos.rkt") stepper-logo)) . ((25516 . 3))) ((def ((lib "images/icons/style.rkt") glass-icon-material)) . ((955 . 2))) ((def ((lib "images/flomap.rkt") equal-area-projection)) . ((38346 . 3))) ((def ((lib "images/flomap.rkt") fm/)) . ((29925 . 4))) ((def ((lib "images/flomap.rkt") flomap-scale-transform)) . ((36492 . 4))) ((def ((lib "images/icons/control.rkt") back-icon)) . ((5496 . 8))) ((def ((lib "images/flomap.rkt") flomap-height)) . ((26003 . 6))) ((form ((lib "images/flomap.rkt") inline-flomap-lift)) . ((30342 . 4))) ((def ((lib "images/icons/control.rkt") play-icon)) . ((5130 . 8))) ((def ((lib "images/icons/style.rkt") plastic-icon-material)) . ((836 . 2))) ((def ((lib "images/flomap.rkt") flomap-ht-append)) . ((35576 . 4))) ((def ((lib "images/flomap.rkt") flomap-lift)) . ((29487 . 3))) ((def ((lib "images/flomap.rkt") fmmin)) . ((30023 . 4))) ((def ((lib "images/flomap.rkt") flomap-id-transform)) . ((36623 . 2))) ((def ((lib "images/icons/misc.rkt") left-magnifying-glass-icon)) . ((17720 . 12))) ((def ((lib "images/flomap.rkt") flomap-cb-crop)) . ((33140 . 5))) ((def ((lib "images/logos.rkt") plt-logo)) . ((25282 . 3))) ((def ((lib "images/icons/tool.rkt") debugger-icon)) . ((24385 . 6))) ((def ((lib "images/flomap.rkt") flomap-hc-append)) . ((35668 . 4))) ((def ((lib "images/flomap.rkt") flomap-shadow)) . ((38614 . 5))) ((def ((lib "images/icons/control.rkt") continue-backward-icon)) . ((8880 . 8))) ((def ((lib "images/flomap.rkt") fmmax)) . ((30123 . 4))) ((def ((lib "images/flomap.rkt") flomap-transform-compose)) . ((37616 . 4))) ((form ((lib "images/compile-time.rkt") compiled-bitmap)) . ((25760 . 5))) ((def ((lib "images/icons/symbol.rkt") text-icon)) . ((12679 . 16))) ((def ((lib "images/flomap.rkt") flomap-rt-crop)) . ((33243 . 5))) ((def ((lib "images/flomap.rkt") flomap-width)) . ((26003 . 6))) ((def ((lib "images/flomap.rkt") flomap-2d-mapping)) . ((37148 . 5))) ((def ((lib "images/flomap.rkt") flomap-hb-append)) . ((35760 . 4))) ((def ((lib "images/flomap.rkt") flomap-take-components)) . ((29102 . 4))) ((def ((lib "images/icons/misc.rkt") stop-signs-icon)) . ((16367 . 8))) ((def ((lib "images/icons/file.rkt") save-icon)) . ((10483 . 11))) ((def ((lib "images/icons/control.rkt") step-back-icon)) . ((8097 . 8))) ((def ((lib "images/flomap.rkt") flomap-components)) . ((26003 . 6))) ((def ((lib "images/flomap.rkt") flomap-projection-transform)) . ((37887 . 7))) ((def ((lib "images/icons/misc.rkt") stop-sign-icon)) . ((15966 . 8))) ((def ((lib "images/flomap.rkt") flomap-2d-mapping-fun)) . ((37148 . 5))) ((def ((lib "images/flomap.rkt") make-flomap*)) . ((27861 . 5))) ((def ((lib "images/icons/symbol.rkt") x-icon)) . ((13780 . 8))) ((def ((lib "images/flomap.rkt") flomap-outline)) . ((38766 . 5))) ((def ((lib "images/flomap.rkt") flomap-rc-crop)) . ((33346 . 5))) ((def ((lib "images/flomap.rkt") flomap?)) . ((26003 . 6))) ((def ((lib "images/flomap.rkt") perspective-projection)) . ((38137 . 3))) ((def ((lib "images/icons/stickman.rkt") standing-stickman-icon)) . ((21810 . 13))) ((def ((lib "images/flomap.rkt") linear-projection)) . ((38208 . 3))) ((def ((lib "images/flomap.rkt") build-flomap*)) . ((28171 . 7))) ((def ((lib "images/icons/arrow.rkt") right-over-arrow-icon)) . ((3159 . 8))) ((def ((lib "images/flomap.rkt") flomap-cc-crop)) . ((33037 . 5))) ((def ((lib "images/flomap.rkt") flomap-flip-horizontal)) . ((35852 . 3))) ((def ((lib "images/flomap.rkt") orthographic-projection)) . ((38274 . 3))) ((def ((lib "images/flomap.rkt") flomap-ref)) . ((26245 . 6))) ((def ((lib "images/flomap.rkt") flomap-ref-component)) . ((29014 . 4))) ((def ((lib "images/flomap.rkt") flomap-blur)) . ((31367 . 5))) ((def ((lib "images/icons/arrow.rkt") down-arrow-icon)) . ((2775 . 8))) ((form ((lib "images/flomap.rkt") Flomap-Transform)) . ((37124 . 2))) ((def ((lib "images/icons/misc.rkt") magnifying-glass-icon)) . ((17137 . 12))) ((def ((lib "images/flomap.rkt") flomap-flip-vertical)) . ((35921 . 3))) ((def ((lib "images/icons/arrow.rkt") left-arrow-icon)) . ((2013 . 8))) ((def ((lib "images/flomap.rkt") flomap->bitmap)) . ((27618 . 3))) ((def ((lib "images/flomap.rkt") subflomap)) . ((31825 . 7))) ((def ((lib "images/icons/control.rkt") rewind-icon)) . ((6252 . 8))) ((def ((lib "images/flomap.rkt") flomap-drop-components)) . ((29192 . 4))) ((def ((lib "images/flomap.rkt") flomap-blur-y)) . ((31561 . 4))) ((def ((lib "images/flomap.rkt") flomap-transpose)) . ((35988 . 3))) ((def ((lib "images/flomap.rkt") stereographic-projection)) . ((38416 . 3))) ((def ((lib "images/flomap.rkt") bitmap->flomap)) . ((27676 . 3))) ((def ((lib "images/flomap.rkt") flomap-trim)) . ((32005 . 4))) ((def ((lib "images/flomap.rkt") flomap-gaussian-blur)) . ((30743 . 5))) ((def ((lib "images/icons/misc.rkt") stopwatch-icon)) . ((20045 . 12))) ((def ((lib "images/flomap.rkt") flomap-cw-rotate)) . ((36051 . 3))) ((def ((lib "images/flomap.rkt") flomap-crop)) . ((32459 . 7))) ((def ((lib "images/flomap.rkt") flomap-extreme-values)) . ((26817 . 3))))
value
light-metal-icon-color : (or/c string? (is-a?/c color%))
=  "azure"
value
metal-icon-color : (or/c string? (is-a?/c color%))
=  "lightsteelblue"
value
dark-metal-icon-color : (or/c string? (is-a?/c color%))
=  "steelblue"
value
syntax-icon-color : (or/c string? (is-a?/c color%))
=  (make-object color% 76 76 255)
value
halt-icon-color : (or/c string? (is-a?/c color%))
=  (make-object color% 255 32 24)
value
run-icon-color : (or/c string? (is-a?/c color%))
=  "lawngreen"
parameter
(default-icon-height) -> (and/c rational? (>=/c 0))
(default-icon-height height) -> void?
  height : (and/c rational? (>=/c 0))
=  24
parameter
(toolbar-icon-height) -> (and/c rational? (>=/c 0))
(toolbar-icon-height height) -> void?
  height : (and/c rational? (>=/c 0))
=  16
value
plastic-icon-material : deep-flomap-material-value?
value
rubber-icon-material : deep-flomap-material-value?
value
glass-icon-material : deep-flomap-material-value?
value
metal-icon-material : deep-flomap-material-value?
parameter
(default-icon-material) -> deep-flomap-material-value?
(default-icon-material material) -> void?
  material : deep-flomap-material-value?
=  plastic-icon-material
procedure
(bitmap-render-icon bitmap [z-ratio material]) -> (is-a?/c bitmap%)
  bitmap : (is-a?/c bitmap%)
  z-ratio : (and rational? (>=/c 0)) = 5/8
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(icon-color->outline-color color) -> (is-a?/c color%)
  color : (or/c string? (is-a?/c color%))
procedure
(right-arrow-icon  #:color color             
                  [#:height height           
                   #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(left-arrow-icon  #:color color             
                 [#:height height           
                  #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(up-arrow-icon  #:color color             
               [#:height height           
                #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(down-arrow-icon  #:color color             
                 [#:height height           
                  #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(right-over-arrow-icon  #:color color             
                       [#:height height           
                        #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(left-over-arrow-icon  #:color color             
                      [#:height height           
                       #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(right-under-arrow-icon  #:color color             
                        [#:height height           
                         #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(left-under-arrow-icon  #:color color             
                       [#:height height           
                        #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(bar-icon  #:color color             
          [#:height height           
           #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(play-icon  #:color color             
           [#:height height           
            #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(back-icon  #:color color             
           [#:height height           
            #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(fast-forward-icon  #:color color             
                   [#:height height           
                    #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(rewind-icon  #:color color             
             [#:height height           
              #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(stop-icon  #:color color             
           [#:height height           
            #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(record-icon  #:color color             
             [#:height height           
              #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(pause-icon  #:color color             
            [#:height height           
             #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(step-icon  #:color color             
           [#:height height           
            #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(step-back-icon  #:color color             
                [#:height height           
                 #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(continue-forward-icon  #:color color             
                       [#:height height           
                        #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(continue-backward-icon  #:color color             
                        [#:height height           
                         #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(search-forward-icon  #:color color             
                     [#:height height           
                      #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(search-backward-icon  #:color color             
                      [#:height height           
                       #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(floppy-disk-icon [#:color color             
                   #:height height           
                   #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = "slategray"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(save-icon [#:disk-color disk-color       
            #:arrow-color arrow-color     
            #:height height               
            #:material material])     -> (is-a?/cbitmap%)
  disk-color : (or/c string? (is-a?/c color%)) = "gold"
  arrow-color : (or/c string? (is-a?/c color%))
              = syntax-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(load-icon [#:disk-color disk-color       
            #:arrow-color arrow-color     
            #:height height               
            #:material material])     -> (is-a?/cbitmap%)
  disk-color : (or/c string? (is-a?/c color%)) = "gold"
  arrow-color : (or/c string? (is-a?/c color%))
              = syntax-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(small-save-icon [#:disk-color disk-color       
                  #:arrow-color arrow-color     
                  #:height height               
                  #:material material])     -> (is-a?/cbitmap%)
  disk-color : (or/c string? (is-a?/c color%)) = "gold"
  arrow-color : (or/c string? (is-a?/c color%))
              = syntax-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(small-load-icon [#:disk-color disk-color       
                  #:arrow-color arrow-color     
                  #:height height               
                  #:material material])     -> (is-a?/cbitmap%)
  disk-color : (or/c string? (is-a?/c color%)) = "gold"
  arrow-color : (or/c string? (is-a?/c color%))
              = syntax-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(text-icon  str                     
           [font                    
            #:trim? trim?           
            #:color color           
            #:height height         
            #:material material     
            #:outline outline]) -> (is-a?/cbitmap%)
  str : string?
  font : (is-a?/c font%) = (make-font)
  trim? : boolean? = #t
  color : (or/c string? (is-a?/c color%)) = "white"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
  outline : (and/c rational? (>=/c 0)) = (/ height 32)
procedure
(recycle-icon [#:color color             
               #:height height           
               #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = "forestgreen"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(x-icon [#:color color             
         #:height height           
         #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = halt-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(check-icon [#:color color             
             #:height height           
             #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = run-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(lambda-icon [#:color color             
              #:height height           
              #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
        = light-metal-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(hash-quote-icon [#:color color             
                  #:height height           
                  #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = "mediumseagreen"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(regular-polygon-icon  sides                     
                      [start]                    
                       #:color color             
                      [#:height height           
                       #:material material]) -> (is-a?/cbitmap%)
  sides : exact-positive-integer?
  start : real? = (- (/ pi sides) (* 1/2 pi))
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(stop-sign-icon [#:color color             
                 #:height height           
                 #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = halt-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(stop-signs-icon [#:color color             
                  #:height height           
                  #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = halt-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(foot-icon  #:color color             
           [#:height height           
            #:material material]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%))
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(magnifying-glass-icon [#:frame-color frame-color   
                        #:handle-color handle-color 
                        #:height height             
                        #:material material])       
 -> (is-a?/cbitmap%)
  frame-color : (or/c string? (is-a?/c color%))
              = light-metal-icon-color
  handle-color : (or/c string? (is-a?/c color%)) = "brown"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(left-magnifying-glass-icon [#:frame-color frame-color   
                             #:handle-color handle-color 
                             #:height height             
                             #:material material])       
 -> (is-a?/cbitmap%)
  frame-color : (or/c string? (is-a?/c color%))
              = light-metal-icon-color
  handle-color : (or/c string? (is-a?/c color%)) = "brown"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(bomb-icon [#:cap-color cap-color       
            #:bomb-color bomb-color     
            #:height height             
            #:material material])   -> (is-a?/cbitmap%)
  cap-color : (or/c string? (is-a?/c color%))
            = light-metal-icon-color
  bomb-color : (or/c string? (is-a?/c color%))
             = dark-metal-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(left-bomb-icon [#:cap-color cap-color       
                 #:bomb-color bomb-color     
                 #:height height             
                 #:material material])   -> (is-a?/cbitmap%)
  cap-color : (or/c string? (is-a?/c color%))
            = light-metal-icon-color
  bomb-color : (or/c string? (is-a?/c color%))
             = dark-metal-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(clock-icon [hours                       
             minutes                     
             #:face-color face-color     
             #:hand-color hand-color     
             #:height height])       -> (is-a?/cbitmap%)
  hours : (integer-in 0 11) = 0
  minutes : (real-in 0 60) = 47
  face-color : (or/c string? (is-a?/c color%))
             = light-metal-icon-color
  hand-color : (or/c string? (is-a?/c color%)) = "firebrick"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
procedure
(stopwatch-icon [hours                       
                 minutes                     
                 #:face-color face-color     
                 #:hand-color hand-color     
                 #:height height])       -> (is-a?/cbitmap%)
  hours : (integer-in 0 11) = 0
  minutes : (real-in 0 60) = 47
  face-color : (or/c string? (is-a?/c color%))
             = light-metal-icon-color
  hand-color : (or/c string? (is-a?/c color%)) = "firebrick"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
procedure
(stethoscope-icon [#:color color         
                   #:height height]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = "black"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
procedure
(short-stethoscope-icon [#:color color         
                         #:height height]) -> (is-a?/cbitmap%)
  color : (or/c string? (is-a?/c color%)) = "black"
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
procedure
(lock-icon [open?                             
            #:body-color body-color           
            #:shackle-color shackle-color     
            #:height height                   
            #:material material])         -> (is-a?/cbitmap%)
  open? : boolean? = #f
  body-color : (or/c string? (is-a?/c color%)) = "orange"
  shackle-color : (or/c string? (is-a?/c color%))
                = light-metal-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(standing-stickman-icon [#:body-color body-color 
                         #:arm-color arm-color   
                         #:head-color head-color 
                         #:height height         
                         #:material material])   
 -> (is-a?/cbitmap%)
  body-color : (or/c string? (is-a?/c color%)) = run-icon-color
  arm-color : (or/c string? (is-a?/c color%)) = "white"
  head-color : (or/c string? (is-a?/c color%)) = run-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(running-stickman-icon  t                       
                       [#:body-color body-color 
                        #:arm-color arm-color   
                        #:head-color head-color 
                        #:height height         
                        #:material material])   
 -> (is-a?/cbitmap%)
  t : rational?
  body-color : (or/c string? (is-a?/c color%)) = run-icon-color
  arm-color : (or/c string? (is-a?/c color%)) = "white"
  head-color : (or/c string? (is-a?/c color%)) = run-icon-color
  height : (and/c rational? (>=/c 0)) = (default-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(check-syntax-icon [#:height height           
                    #:material material]) -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(small-check-syntax-icon [#:height height       
                          #:material material]) 
 -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(macro-stepper-icon [#:height height           
                     #:material material]) -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(small-macro-stepper-icon [#:height height       
                           #:material material]) 
 -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(debugger-icon [#:height height           
                #:material material]) -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
procedure
(small-debugger-icon [#:height height           
                      #:material material]) -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = (toolbar-icon-height)
  material : deep-flomap-material-value?
           = (default-icon-material)
value
debugger-bomb-color : (or/c string? (is-a?/c color%))
=  (make-object color% 128 32 32)
value
macro-stepper-hash-color : (or/c string? (is-a?/c color%))
=  (make-object color% 60 192 60)
value
small-macro-stepper-hash-color : (or/c string? (is-a?/c color%))
=  (make-object color% 128 255 128)
procedure
(plt-logo [#:height height]) -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = 256
procedure
(planet-logo [#:height height]) -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = 96
procedure
(stepper-logo [#:height height]) -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = 96
procedure
(macro-stepper-logo [#:height height]) -> (is-a?/cbitmap%)
  height : (and/c rational? (>=/c 0)) = 96
syntax
(compiled-bitmap expr [quality])
 
  expr : (is-a?/c bitmap%)
  quality : (integer-in 0 100)
syntax
(compiled-bitmap-list expr [quality])
 
  expr : (listof (is-a?/c bitmap%))
  quality : (integer-in 0 100)
struct
(struct flomap (values components width height))
  values : FlVector
  components : Integer
  width : Integer
  height : Integer
procedure
(flomap-size fm) -> Nonnegative-Fixnum Nonnegative-Fixnum
  fm : flomap
procedure
(flomap-ref fm k x y) -> Float
  fm : flomap
  k : Integer
  x : Integer
  y : Integer
procedure
(flomap-ref* fm x y) -> FlVector
  fm : flomap
  x : Integer
  y : Integer
procedure
(flomap-bilinear-ref fm k x y) -> Float
  fm : flomap
  k : Integer
  x : Real
  y : Real
procedure
(flomap-bilinear-ref* fm x y) -> FlVector
  fm : flomap
  x : Real
  y : Real
procedure
(flomap-min-value fm) -> Float
  fm : flomap
procedure
(flomap-max-value fm) -> Float
  fm : flomap
procedure
(flomap-extreme-values fm) -> Float Float
  fm : flomap
procedure
(flomap-nonzero-rect fm) -> Nonnegative-Fixnum
                            Nonnegative-Fixnum
                            Nonnegative-Fixnum
                            Nonnegative-Fixnum
  fm : flomap
procedure
(coords->index c w k x y) -> Fixnum
  c : Integer
  w : Integer
  k : Integer
  x : Integer
  y : Integer
procedure
(unsafe-flomap-ref vs c w h k x y) -> Float
  vs : FlVector
  c : Integer
  w : Integer
  h : Integer
  k : Integer
  x : Integer
  y : Integer
procedure
(unsafe-flomap-ref* vs c w h x y) -> FlVector
  vs : FlVector
  c : Integer
  w : Integer
  h : Integer
  x : Integer
  y : Integer
procedure
(flomap->bitmap fm) -> Any
  fm : flomap
procedure
(bitmap->flomap bm) -> flomap
  bm : Any
procedure
(make-flomap c w h [v]) -> flomap
  c : Integer
  w : Integer
  h : Integer
  v : Real = 0.0
procedure
(make-flomap* w h vs) -> flomap
  w : Integer
  h : Integer
  vs : (U (Vectorof Real) FlVector)
procedure
(build-flomap c w h f) -> flomap
  c : Integer
  w : Integer
  h : Integer
  f : (Nonnegative-Fixnum Nonnegative-Fixnum Nonnegative-Fixnum -> Real)
procedure
(build-flomap* c w h f) -> flomap
  c : Integer
  w : Integer
  h : Integer
  f : (Nonnegative-Fixnum Nonnegative-Fixnum
       -> (U (Vectorof Real) FlVector))
procedure
(draw-flomap draw w h) -> flomap
  draw : (Any -> Any)
  w : Integer
  h : Integer
procedure
(flomap-multiply-alpha fm) -> flomap
  fm : flomap
procedure
(flomap-divide-alpha fm) -> flomap
  fm : flomap
syntax
(inline-build-flomap c w h f)
 
  c : Integer
  w : Integer
  h : Integer
  f : (Nonnegative-Fixnum Nonnegative-Fixnum Nonnegative-Fixnum
       Nonnegative-Fixnum -> Float)
syntax
(inline-build-flomap* c w h f)
 
  c : Integer
  w : Integer
  h : Integer
  f : (Nonnegative-Fixnum Nonnegative-Fixnum
       Nonnegative-Fixnum -> FlVector)
procedure
(flomap-ref-component fm k) -> flomap
  fm : flomap
  k : Integer
procedure
(flomap-take-components fm k) -> flomap
  fm : flomap
  k : Integer
procedure
(flomap-drop-components fm k) -> flomap
  fm : flomap
  k : Integer
procedure
(flomap-append-components fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(fmsqrt fm) -> flomap
  fm : flomap
procedure
(fmsqr fm) -> flomap
  fm : flomap
procedure
(flomap-lift f) -> (flomap -> flomap)
  f : (Float -> Real)
procedure
(flomap-normalize fm) -> flomap
  fm : flomap
procedure
(fm+ fm1 fm2) -> flomap
  fm1 : (U Real flomap)
  fm2 : (U Real flomap)
procedure
(fm- fm1 fm2) -> flomap
  fm1 : (U Real flomap)
  fm2 : (U Real flomap)
procedure
(fm* fm1 fm2) -> flomap
  fm1 : (U Real flomap)
  fm2 : (U Real flomap)
procedure
(fm/ fm1 fm2) -> flomap
  fm1 : (U Real flomap)
  fm2 : (U Real flomap)
procedure
(fmmin fm1 fm2) -> flomap
  fm1 : (U Real flomap)
  fm2 : (U Real flomap)
procedure
(fmmax fm1 fm2) -> flomap
  fm1 : (U Real flomap)
  fm2 : (U Real flomap)
procedure
(flomap-lift2 f) -> ((U Real flomap) (U Real flomap) -> flomap)
  f : (Float Float -> Real)
syntax
(inline-flomap-lift f)
 
  f : (Float -> Float)
syntax
(inline-flomap-lift2 f)
 
  f : (Float Float -> Float)
procedure
(flomap-gradient-x fm) -> flomap
  fm : flomap
procedure
(flomap-gradient-y fm) -> flomap
  fm : flomap
procedure
(flomap-gradient fm) -> flomap flomap
  fm : flomap
procedure
(flomap-gradient-normal fm) -> flomap
  fm : flomap
procedure
(flomap-gaussian-blur fm xσ [yσ]) -> flomap
  fm : flomap
  xσ : Real
  yσ : Real = xσ
procedure
(flomap-gaussian-blur-x fm σ) -> flomap
  fm : flomap
  σ : Real
procedure
(flomap-gaussian-blur-y fm σ) -> flomap
  fm : flomap
  σ : Real
procedure
(flomap-box-blur fm x-radius [y-radius]) -> flomap
  fm : flomap
  x-radius : Real
  y-radius : Real = x-radius
procedure
(flomap-box-blur-x fm radius) -> flomap
  fm : flomap
  radius : Real
procedure
(flomap-box-blur-y fm radius) -> flomap
  fm : flomap
  radius : Real
procedure
(flomap-blur fm xσ [yσ]) -> flomap
  fm : flomap
  xσ : Real
  yσ : Real = xσ
procedure
(flomap-blur-x fm xσ) -> flomap
  fm : flomap
  xσ : Real
procedure
(flomap-blur-y fm yσ) -> flomap
  fm : flomap
  yσ : Real
procedure
(flomap-copy fm x-start y-start x-end y-end) -> flomap
  fm : flomap
  x-start : Integer
  y-start : Integer
  x-end : Integer
  y-end : Integer
procedure
(subflomap fm x-start y-start x-end y-end) -> flomap
  fm : flomap
  x-start : Integer
  y-start : Integer
  x-end : Integer
  y-end : Integer
procedure
(flomap-trim fm [alpha?]) -> flomap
  fm : flomap
  alpha? : Boolean = #t
procedure
(flomap-inset fm amt) -> flomap
  fm : flomap
  amt : Integer
(flomap-inset fm h-amt v-amt) -> flomap
  fm : flomap
  h-amt : Integer
  v-amt : Integer
(flomap-inset fm l-amt t-amt r-amt b-amt) -> flomap
  fm : flomap
  l-amt : Integer
  t-amt : Integer
  r-amt : Integer
  b-amt : Integer
procedure
(flomap-crop fm w h left-frac top-frac) -> flomap
  fm : flomap
  w : Integer
  h : Integer
  left-frac : Real
  top-frac : Real
procedure
(flomap-lt-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-lc-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-lb-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-ct-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-cc-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-cb-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-rt-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-rc-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-rb-crop fm w h) -> flomap
  fm : flomap
  w : Integer
  h : Integer
procedure
(flomap-scale fm x-scale [y-scale]) -> flomap
  fm : flomap
  x-scale : Real
  y-scale : Real = x-scale
procedure
(flomap-resize fm w h) -> flomap
  fm : flomap
  w : (Option Integer)
  h : (Option Integer)
procedure
(flomap-pin fm1 x1 y1 fm2) -> flomap
  fm1 : flomap
  x1 : Integer
  y1 : Integer
  fm2 : flomap
(flomap-pin fm1 x1 y1 fm2 x2 y2) -> flomap
  fm1 : flomap
  x1 : Integer
  y1 : Integer
  fm2 : flomap
  x2 : Integer
  y2 : Integer
procedure
(flomap-pin* x1-frac     
             y1-frac     
             x2-frac     
             y2-frac     
             fm0         
             fm ...) -> flomap
  x1-frac : Real
  y1-frac : Real
  x2-frac : Real
  y2-frac : Real
  fm0 : flomap
  fm : flomap
procedure
(flomap-lt-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-lc-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-lb-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-ct-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-cc-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-cb-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-rt-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-rc-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-rb-superimpose fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-vl-append fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-vc-append fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-vr-append fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-ht-append fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-hc-append fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-hb-append fm0 fm ...) -> flomap
  fm0 : flomap
  fm : flomap
procedure
(flomap-flip-horizontal fm) -> flomap
  fm : flomap
procedure
(flomap-flip-vertical fm) -> flomap
  fm : flomap
procedure
(flomap-transpose fm) -> flomap
  fm : flomap
procedure
(flomap-cw-rotate fm) -> flomap
  fm : flomap
procedure
(flomap-ccw-rotate fm) -> flomap
  fm : flomap
procedure
(flomap-rotate fm θ) -> flomap
  fm : flomap
  θ : Real
procedure
(flomap-rotate-transform θ) -> Flomap-Transform
  θ : Real
procedure
(flomap-whirl-transform θ) -> Flomap-Transform
  θ : Real
procedure
(flomap-fisheye-transform α) -> Flomap-Transform
  α : Real
procedure
(flomap-scale-transform x-scale [y-scale]) -> Flomap-Transform
  x-scale : Real
  y-scale : Real = x-scale
value
flomap-id-transform : Flomap-Transform
procedure
(flomap-transform fm t) -> flomap
  fm : flomap
  t : Flomap-Transform
(flomap-transform fm          
                  t           
                  x-start     
                  y-start     
                  x-end       
                  y-end)  -> flomap
  fm : flomap
  t : Flomap-Transform
  x-start : Integer
  y-start : Integer
  x-end : Integer
  y-end : Integer
syntax
Flomap-Transform
struct
(struct flomap-2d-mapping (fun inv bounded-by))
  fun : (Float Float -> (values Float Float))
  inv : (Float Float -> (values Float Float))
  bounded-by : (U 'id 'corners 'edges 'all)
procedure
(make-flomap-2d-mapping fun inv [bounded-by]) -> flomap-2d-mapping
  fun : (Float Float -> (values Real Real))
  inv : (Float Float -> (values Real Real))
  bounded-by : (U 'id 'corners 'edges 'all) = 'edges
procedure
(flomap-transform-compose t2 t1) -> Flomap-Transform
  t2 : Flomap-Transform
  t1 : Flomap-Transform
procedure
(flomap-transform-bounds t w h) -> Integer Integer Integer Integer
  t : Flomap-Transform
  w : Integer
  h : Integer
procedure
(flomap-projection-transform to-proj       
                             from-proj     
                             crop?)    -> Flomap-Transform
  to-proj : Projection
  from-proj : Projection
  crop? : Boolean
procedure
(perspective-projection α) -> Projection
  α : Real
procedure
(linear-projection α) -> Projection
  α : Real
procedure
(orthographic-projection α) -> Projection
  α : Real
procedure
(equal-area-projection α) -> Projection
  α : Real
procedure
(stereographic-projection α) -> Projection
  α : Real
syntax
Projection
struct
(struct projection-mapping (fun inv))
  fun : (Float -> Float)
  inv : (Float -> Float)
procedure
(flomap-shadow fm σ [color]) -> flomap
  fm : flomap
  σ : Real
  color : (Option (U (Vectorof Real) FlVector)) = #f
procedure
(flomap-outline fm radius [color]) -> flomap
  fm : flomap
  radius : Real
  color : (Option (U (Vectorof Real) FlVector)) = #f
