(graymap-drawline! graymap from-x from-y to-x to-y)
The origin (0,0) is in located at the upper left, the X-axis is oriented downwards and the Y-axis goes to the right.
A line is drawn between both points incrementing each gray value on the way up to the maximum of 65535 (full white).
unspecified (ok)
> (define g (graymap-create 100 100))
g
> (graymap-drawline! g 0 0 20 50)
ok
> (graymap-drawline! g 20 0 0 50)
ok
> (graymap-normalize! g)
#<graymap(16) orow:-1 ocol:-1 xres:-1 yres:-1 w:100 h:100>
> (graymap-writepng g "graymap-drawline.png")
ok
>
The result displays as folows: