PROGRAM STRAN 
      CALL INIT 
      CALL PARSE
      STOP  
      END