greymap-equal?

Synopsis

(greymap-equal? greymap1 greymap2)

Parameters

  • greymap1
  • greymap2

Description

Side Effects

Return Value

Returns #t if both greymaps are equal (same dimensions and content), otherwise #f is returned.

Example

> (define gm (greymap-create 640 480))
gm
> (define gm2 (greymap-copy gm))
gm2
> (greymap-invert! gm2)
#<greymap orow:-1 ocol:-1 xres:-1 yres:-1 h:640 w:480>
> (greymap-invert! gm2)
#<greymap orow:-1 ocol:-1 xres:-1 yres:-1 h:640 w:480>
> (greymap-equal? gm gm2)
#t
>