SUBROUTINE COSMAP_CREATE ( NAME, NLANES, LWIDTH, LHEIGHT, DTYPE, STATUS ) NAME = CHARACTER*(*) (given) directory name for big image NLANES = INTEGER (given) number of lanes in big image LWIDTH = INTEGER (given) lane width in pixels LHEIGHT = INTEGER (given) lane height in pixels DTYPE = CHARACTER*(*) (given) data type of pixel data STATUS = INTEGER (given and returned) global status