XQ5 (79)    ROUTINE (9.8)