GMRAPER1 (858)    ROUTINE (9.8)