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