(graymap-equalize! graymap)
This procedure applies a histogram equalization to the 16 bit graymap thus maximizing contrast.
The graymap is modfied.
The modified graymap is returned.
> (define x (mandelbrot 0.2709223 0.2709225 0.0047223 0.0047225 2000 1000))
x
> (graymap-invert! x)
#<graymap(16) orow:-1 ocol:-1 xres:-1 yres:-1 w:1000 h:999>
> (graymap-equalize! x)
#<graymap(16) orow:-1 ocol:-1 xres:-1 yres:-1 w:1000 h:999>
> (graymap-writepng x "fractal-example-16bit.png")
ok
>
The resulting 16 bit grayscale PNG image file displays as follows: