SUBROUTINE COSMAP_PUTROW ( BD, LANE_NO, ROW_NO, BUFFER, STATUS ) BD = INTEGER (given) bigimage descriptor LANE_NO = INTEGER (given) lane number ROW_NO = INTEGER (given) row number BUFFER(*) = INTEGER*2 (given) values to be put STATUS = INTEGER (given and returned) global status