SUBROUTINE  SCAN (MATCH, LOW, HIGH) 
      INTEGER     MATCH,  LOW,    HIGH 
      EXTERNAL    OLSCN 
      CALL OSCAN (MATCH, LOW, HIGH) 
      RETURN 
      END