c utio.inc
      LOGICAL useutio
      CHARACTER*256 cabase
      REAL*8 reventmjd,reventdoy,reventsec,reventsod
      REAL*8 rstartmjd,rstartdoy,rstartsec,rstartsod
      REAL*8 rstopmjd,rstopdoy,rstopsec,rstopsod
      REAL*8 rcurmjd,rdumpmjd,rdumpint,rcorfac
      REAL*8 rsid
      INTEGER utarr(4)

      COMMON /utioinfo/
     $       ieventyr,ieventmon,ieventDay,ieventhr,ieventmin,
     $       ieventsec,ieventdoy,
     $       istartyr,istartmon,istartDay,istarthr,istartmin,
     $       istartsec,istartdoy,
     $       istopyr,istopmon,istopDay,istophr,istopmin,
     $       istopsec,istopdoy,
     $       useutio, !leave here to align common block
     $       reventsec,reventdoy,reventsod,
     $       rstartsec,rstartdoy,rstartsod,
     $       rstopsec,rstopdoy,rstopsod,
     $       rdumpint,rcorfac,reventmjd,rstartmjd,rstopmjd,
     $       rcurmjd,rdumpmjd,rsid,utarr,cabase