      REAL*8 MAXERR, MAXERR2
      INTEGER MAXPOI,MAX_POLY, MAX_VERT, MAX_PL_VER, MAX_NORD
      PARAMETER(
     *     MAXERR        = 1.d-10,
     *     MAXERR2       = 1.d-8,
!     *     MAXPOI        = 26,
     *     MAXPOI        = 1000,
     *     MAX_POLY      = 100,
     *     MAX_VERT      = 400,
     *     MAX_PL_VER    = 100,
     $     MAX_NORD      = 100)
