c
c   basic dimensioning for the elliptic solver
c
      PARAMETER (MX = 101, MY = 101)