C     N: NUMBER OF lattice in X(t)  (N=(XMAX-XMIN+2*LL)*64+1)
C     MINIMUM TICK IS 1/64
c      I0=(Z0-XMIN+LL)*64+1
      INTEGER NDATA,I0,N
      PARAMETER (NDATA=90000,N=593,I0=129)
      REAL*8 XMIN,Z0
      PARAMETER (XMIN=79.00d0, Z0=80.00D0)
      REAL*8 MUMIN,MUL,SGMIN,SGL,LT,LL,ROMIN,ROL
      REAL*8 BETA,ALPHA,LBDMIN,LBDL
      PARAMETER (MUMIN=-0.50d-6,MUL=0.50d-6)
      parameter (SGMIN=0.000010d0,SGL=0.000010d0)
      PARAMETER (LBDMIN=2.50d-4,LBDL=1.0d-4)
      PARAMETER (ROMIN=0.194D0, ROL=0.004D0)
      PARAMETER (LL=1.00D0,LT=0.10d0)
      INTEGER NM,NS,NR,NL
      PARAMETER (NM=4, NS=43, NL=4, NR=4  )
      PARAMETER (BETA=0.20D0,ALPHA=0.40D0)