Using the data storage type defined on this page for raster images, write the image to a PPM file (binary P6 prefered).

(Read the definition of PPM file on Wikipedia.)




INTERFACE PPM;
 
IMPORT Bitmap, Pathname;
 
PROCEDURE Create(imgfile: Pathname.T; img: Bitmap.T);
 
END PPM.