get-width in bitmap%

Gets the width of the bitmap in pixels.

• (send a-bitmap get-width) -> exact integer in [1, 10000]