C**********************************************************************
C array size and related parameters
C**********************************************************************
      parameter ( nx = 10, nz = 100, nrot = 2 )
c      parameter ( nx = 512, nz = 250, nrot = 2 )
c      parameter ( nx = 512, nz = 106, nrot = 2 )
      parameter ( nxb = nx+2, nzb = nz+2 )
