C**********************************************************************
C array size and related parameters
C**********************************************************************
      parameter ( nx = 2048, nz = 37, nrot = 2 )
      parameter ( nxb = nx+2, nzb = nz+2 )
      parameter ( nwk1 = NZ+2 )

