LROR6 (383)    ROUTINE (9.8)