C  X specific bits
C   AUTHOR: RODGER STADEN
      SUBROUTINE INITRS()
      CALL INITX()
      END
      INTEGER FUNCTION XVERSN()
C
C set xversn to true for x version
C
      XVERSN = 1
      END