c =========================================================================

      SUBROUTINE nro_transf (tps, tumjd, tu, xp, yp, dX0, dY0, iclef, xq,
     .                        dxqdxp, dxqdyp, dxqdut1, dxqdx, dxqdy)
C-------------------------------------------------------------------------C
C    Matrix transformation from the terrestrial reference system (TRS)    C
C    to the celestial reference system (CRS) at the date of observation   C
C      (IAU 2000 resolutions B1-6 to B1-8)                                C
C                [CRS]= XQ [TRS]= xpn * xtheta * xyp [TRS]                C
C     using  the nonrotating origin (Guinot 1979) to realize the          C
C     intermediate reference frame of date t,                             C
C      see IERS Conventions (2000), Chapter 5.                            C
C									  C
C                                                                         C
C      INPUT :                                                            C
C       tps= (JD - 2451545.0)/36525  (in Julian centuries)    and JD can  C
C           be considered as measured in TT or TDB  (in days)             C
c
C       tumjd= date of observation - JD 2451545.0   (julian days)         C
c
c       tu= time UT1 (((hx60)+m)x60)+sec +UT1-UTC)  (days)                C
C       tu= Julian UT1 date - JD 2451545.0 UT1	(in days)		  C
c
C       xp, yp= "polar coordinates" of the CIP in the TRS  (in arcsecond) C
C                see IERS Conventions (2000), Chapter 5.                  C
C       dX0, dY0= celestial pole offsets (in arcsecond)                   C
C                   see IERS Conventions (2000), Chapter 5.               C
C       iclef = 1  ==> use of M1 matrice to compute precession-nutation   C
C             <>1  ==> use of E,d angle and rotation matrices to compute  C
C                       precession-nutation                               C
C                   see IERS Conventions (2000), Chapter 5.               C
C                                                                         C
C     OUTPUT :                                                            C
C       xq     = transformation matrix from the [TRS] to the [CRS]        C
C                dimension(3,3), (in radian)                              C
C       dxqdxp, dxqdyp | = partial derivative of the transformation       C
C       dxqdut1        |    matrix from the [TRS] to the [CRS] with       C
C       dxqdx, dxqdy   |    respect to Earth orientation parameters       C
C                           (xp, yp, UT1-UTC, X, Y) dimensions(3,3),      C
C                           (units: without dimension)                    C
C                                                                         C
C     COMMON / conversion /                                               C
C       tpi= 2*pi                                                         C
C       secrad= arc second in radian                                      C
C       degrad= degrees in radian                                         C
C                                                                         C
C     SUBROUTINE INTERFACE :                                              C
C       called subroutines : mvtpole, angstellaire, precnut,              C
C                            dmvtpole, dangstellair, dprecnut, dmatm1,    C
C                            mulmat                                       C
C                                                                         C
C     Author: Anne-Marie.Gontier@obspm.fr                                 C
C     Date:   8 december 2002                                             C
C     Ref: Notice for users of the fortran procedure nro_transf           C
C-------------------------------------------------------------------------C	

       IMPLICIT NONE
       INTEGER iclef
       DOUBLE PRECISION tps, tumjd, tu, xp, yp, dX0, dY0, xq(3,3)
       DOUBLE PRECISION dxqdxp(3,3), dxqdyp(3,3), dxqdut1(3,3)
       DOUBLE PRECISION dxqdx(3,3), dxqdy(3,3)

C---------------LOCAL VARIABLES-----------------------------------------C
       DOUBLE PRECISION tpi, secrad, degrad
       DOUBLE PRECISION sp, ak, theta, x, y, stheta, E, d, s
       DOUBLE PRECISION xpn(3,3), xyp(3,3), xtheta(3,3), x1(3,3) 

       COMMON/conversion/tpi,secrad,degrad

        ! Conversion factor
        tpi= 6.28318530717958648d0
        secrad= tpi / (360.d0*3600.d0)
        degrad= tpi / 360.d0

            ! Computation of xq matrix
	CALL mvtpole (tps, xp, yp, sp, xyp)
	CALL angstellaire (tumjd, tu, ak, theta, xtheta)
        CALL precnut (dX0, dY0, iclef, tps, E, D, S, stheta, x, y, xpn)

	CALL mulmat (xpn, xtheta, x1, 3, 3, 3)
	CALL mulmat (x1, xyp, xq, 3, 3, 3)

           ! Computation of partial derivatives of xq w.r.t. EOP
        CALL dmvtpole (sp, x1, xp, yp, dxqdxp, dxqdyp)
        CALL dangstellair (ak, theta, xpn, xyp, dxqdut1)
        IF (iclef.EQ.1) THEN
          CALL dmatm1 (stheta, x, y, xtheta, xyp, dxqdx, dxqdy)
        ELSE
          CALL dprecnut (E, D, S, x, y, xtheta, xyp, dxqdx, dxqdy)
        ENDIF 

      END
C=======================================================================C


      SUBROUTINE mvtpole (tps, xp, yp, sp, xyp)
C-------------------------------------------------------------------------C
C  ROUTINE TO compute the polar motion matrix for the observation date    C
C  see IERS Conventions (2000), Chapter 5, equations (3) and (12)         C
C-------------------------------------------------------------------------C
C                                                                         C
C      INPUT :                                                            C
C       tps= Julian date - 2451545.0    (in Julian centuries)             C
C       xp, yp= "polar coordinates" of the CIP in the TRS  (in arcsecond) C
C                                                                         C
C     OUTPUT :                                                            C
C       sp=  TEO displacement (in radian)                                 C
C       xyp(3,3)= R3(-sp)*R1(yp)*R2(xp) matrix   (in radian)              C
C                                                                         C
C     COMMON / conversion /                                               C
C       tpi= 2*pi                                                         C
C       secrad= arc second in radian                                      C
C       degrad= degrees in radian                                         C
C                                                                         C
C     SUBROUTINE INTERFACE :                                              C
C        caller subroutine : nro_transf                                   C
C        called subroutines: rota, mulmat                                 C
C                                                                         C
C     Author: Anne-Marie.Gontier@obspm.fr                                 C
C     Date:   8 december 2002                                             C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??    C
C-------------------------------------------------------------------------C

       IMPLICIT NONE
       DOUBLE PRECISION tps, xp, yp, sp, xyp(3,3)
       DOUBLE PRECISION tpi, secrad, degrad

C---------------LOCAL VARIABLES-----------------------------------------C
       DOUBLE PRECISION xmat1(3,3), xmat2(3,3), xmat(3,3)

       COMMON/conversion/tpi,secrad,degrad


        sp = -47.d-06 * tps * secrad      !! Lambert & Bizouard, A&A, 2002

        CALL rota (1, yp*secrad, xmat1)
        CALL rota (2, xp*secrad, xmat2)
        CALL mulmat (xmat1, xmat2, xmat, 3, 3, 3)
        CALL rota (3, -sp, xmat1)
        CALL mulmat (xmat1, xmat, xyp, 3, 3, 3)

      END
C=======================================================================C


      SUBROUTINE angstellaire_old (tumjd, tu, ak, theta, xtheta)
C-------------------------------------------------------------------------C
C  ROUTINE TO compute rotation of the Earth matrix                        C
C  see IERS Conventions (2000), Chapter 5, equations (5) and (13)         C
C-------------------------------------------------------------------------C
C                                                                         C
C      INPUT :                                                            C
C       tumjd= date of observation - JD 2451545.0   (julian days)         C
c       tu= time UT1 (((hx60)+m)x60)+sec +UT1-UTC)  (days)                C
C                                                                         C
C     OUTPUT :                                                            C
C       ak=  constant                                                     C
C       theta= Earth rotation angle   (in radian)                         C
C       xtheta(3,3)= R3(-theta) matrix   (in radian)                      C
C                                                                         C
C     COMMON / conversion /                                               C
C       tpi= 2*pi                                                         C
C       secrad= arc second in radian                                      C
C       degrad= degrees in radian                                         C
C                                                                         C
C     SUBROUTINE INTERFACE :                                              C
C        caller subroutine : nro_transf                                   C
C        called subroutines: rota                                         C
C                                                                         C
C     Author: Anne-Marie.Gontier@obspm.fr                                 C
C     Date:   8 december 2002                                             C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??    C
C-------------------------------------------------------------------------C

       IMPLICIT NONE
       DOUBLE PRECISION tumjd, tu, ak, theta, xtheta(3,3)
       DOUBLE PRECISION tpi, secrad, degrad

C---------------LOCAL VARIABLES-----------------------------------------C
       DOUBLE PRECISION theta0, tu0, part_dec 

       COMMON/conversion/tpi,secrad,degrad


        theta0 = 0.7790572732640d0
        ak = 0.00273781191135448d0
        tu0 = tumjd + tu
        part_dec = DMOD(tumjd, 1.d0) +  DMOD(tu, 1.d0)

        theta = (theta0 + ak * tu0 + part_dec) * tpi
        theta = DMOD(theta, tpi)
        if (theta.LT.0.D0) theta=theta+tpi

        ak = 1.00273781191135448d0           ! pb of precision

        CALL rota (3, -theta, xtheta)

      END
      
      
      SUBROUTINE angstellaire (tumjd, tu, ak, theta, xtheta)
C-------------------------------------------------------------------------C
C  ROUTINE TO compute rotation of the Earth matrix                        C
C  see IERS Conventions (2003), Chapter 5, equations (13)                 C
C-------------------------------------------------------------------------C
C                                                                         C
C      INPUT :                                                            C
C       tumjd= partie entierere UT1 - JD 2451545.0 - TAI)  (julian days)  C
c       tu= partie fractionnaire de UT1 - JD 2451545.0 - TAI (julian days)C
C                                                                         C
C     OUTPUT :                                                            C
C       ak=  constant                                                     C
C       theta= Earth rotation angle   (in radian)                         C
C       xtheta(3,3)= R3(-theta) matrix   (in radian)                      C
C                                                                         C
C     COMMON / conversion /                                               C
C       tpi= 2*pi                                                         C
C       secrad= arc second in radian                                      C
C       degrad= degrees in radian                                         C
C                                                                         C
C     SUBROUTINE INTERFACE :                                              C
C        caller subroutine : nro_transf                                   C
C        called subroutines: rota                                         C
C                                                                         C
C     Author: Christian Bizouard                                          C
C     Date:   Janvier 2008                                                C
C-------------------------------------------------------------------------C

       IMPLICIT NONE
       DOUBLE PRECISION tumjd, tu, ak, theta, xtheta(3,3)
       DOUBLE PRECISION tpi, secrad, degrad

C---------------LOCAL VARIABLES-----------------------------------------C
       DOUBLE PRECISION theta0 

       COMMON/conversion/tpi,secrad,degrad


        theta0 = 0.7790572732640d0
        ak = 1.00273781191135448d0       
        
        theta = tpi * (theta0 + ak * tumjd)  ! partie entiere
	
        theta = DMOD(theta, tpi)
	
	theta = theta + tpi * ak * tu   ! rajout de la partie fractionnaire
       
        theta = DMOD(theta, tpi)
	
        if (theta.lt.0.D0) theta = theta + tpi

        CALL rota (3, -theta, xtheta)

      END      
C=======================================================================C


      SUBROUTINE precnut (dX0, dY0, iclef, tps, E, D, S, stheta, x, y, xpn)
C-------------------------------------------------------------------------C
C  ROUTINE TO compute precession-nutation matrix                          C
C  see IERS Conventions (2000), Chapter 5, equations (6-7) and (10)       C
C-------------------------------------------------------------------------C
C                                                                         C
C      INPUT :                                                            C
C       dX0, dY0= celestial pole offsets (in arcsecond)                   C
C                   see IERS Conventions (2000), Chapter 5.               C
C       iclef = 1  ==> use of M1 matrice to compute precession-nutation   C
C             <>1  ==> use of E,d angles and rotation matrices to compute C
C                       precession-nutation                               C
C                   see IERS Conventions (2000), Chapter 5.               C
C       tps= Julian date - 2451545.0   (in Julian centuries)              C
C                   see IERS Conventions (2000), Chapter 5.               C
C                                                                         C
C     OUTPUT :                                                            C
C       x, y= celestial coordinates of the CIP  (in arcsecond)            C
C       stheta= s+XY/2, CEO displacement  (in arcsecond)                  C 
C       E, d, s=  angles     (in radian)                                  C
C       xpn(3,3)= R3(-E)*R2(-d)*R3(E)*R3(s) matrix   (in radian)          C
C                                                                         C
C     COMMON / conversion /                                               C
C       tpi= 2*pi                                                         C
C       secrad= arc second in radian                                      C
C       degrad= degrees in radian                                         C
C                                                                         C
C     SUBROUTINE INTERFACE :                                              C
C        caller subroutine : nro_transf                                   C
C        called subroutines: coord2000_XY, rota, mulmat, arctangente      C
C                                                                         C
C     Author: Anne-Marie.Gontier@obspm.fr                                 C
C     Date:   8 december 2002                                             C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??    C
C-------------------------------------------------------------------------C

       IMPLICIT NONE
       INTEGER iclef
       DOUBLE PRECISION tps, dX0, dY0, x, y, stheta, E, d, s, xpn(3,3)
       DOUBLE PRECISION tpi, secrad, degrad

C---------------LOCAL VARIABLES-----------------------------------------C
       DOUBLE PRECISION arctangente
       DOUBLE PRECISION xa, ya, zb, v, cosE, sinE
       DOUBLE PRECISION xmat1(3,3), xmat2(3,3), xmat(3,3), smat(3,3)

       COMMON/conversion/tpi,secrad,degrad


        CALL coord2000_XY (tps, stheta, x, y)
        x = x + dX0
        y = y + dY0

        xa = x * secrad
        ya = y * secrad
        S = stheta - (x * ya) / 2.d0
        S = S * secrad

        IF (iclef.EQ.1) THEN
          v = 0.5d0 + (1.d0 / 8.d0) * (xa**2 + ya**2)
          xmat(1,1) = 1.d0 - v * (xa**2)
          xmat(1,2) = -v * xa * ya
          xmat(1,3) = xa
          xmat(2,1) = xmat(1,2)
          xmat(2,2) = 1.d0 - v * (ya**2)
          xmat(2,3) = ya
          xmat(3,1) = -xa
          xmat(3,2) = -ya
          xmat(3,3) = 1.d0 - v * (xa**2 + ya**2)
        ELSE
          zb = DSQRT(1.d0 - (xa**2 + ya**2))
          v = -DSQRT(x**2 + y**2)
          cosE = x / v
          sinE = y / v
          v = v * secrad
          E = arctangente (sinE, cosE)
          D = arctangente (v, zb)
          E = E * degrad
          D = D * degrad

          CALL rota (3, E, xmat)
          CALL rota( 2, -D, xmat1)
          CALL mulmat (xmat1, xmat, xmat2, 3, 3, 3)
          CALL rota (3, -E, xmat1)
          CALL mulmat (xmat1, xmat2, xmat, 3, 3, 3)
        ENDIF
 
        CALL rota (3, S, smat)
        CALL mulmat (xmat, smat, xpn, 3, 3, 3)

      END
C=====================================================================C


	SUBROUTINE coord2000_XY (tps, stheta, X, Y)
C-------------------------------------------------------------------------C
C  ROUTINE TO compute the motion of the CIP in the GCRS                   C
C  see IERS Conventions (2000), Chapter 5, equations (15-16)              C
C-------------------------------------------------------------------------C
C                                                                         C
C      INPUT :                                                            C
C       tps= Julian date - 2451545.0   (in Julian centuries)              C
C                                                                         C
C     OUTPUT :                                                            C
C       X, Y= celestial pole coordinates of the CIP  (in arcsecond)       C
C       stheta= s+XY/2, CEO displacement   (in arcsecond)                 C
C                                                                         C
C     COMMON / conversion /                                               C
C       tpi= 2*pi                                                         C
C       secrad= arc second in radian                                      C
C       degrad= degrees in radian                                         C
C                                                                         C
C     SUBROUTINE INTERFACE :                                              C
C        caller subroutine : precnut                                      C
C                                                                         C
C     Authors: Anne-Marie.Gontier@obspm.fr, Sebastien.Lambert@obspm.fr    C
C     Date:   8 december 2002                                             C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??    C
C-------------------------------------------------------------------------C

       IMPLICIT NONE
       DOUBLE PRECISION tps, X, Y, stheta 
       DOUBLE PRECISION tpi, secrad, degrad

C---------------LOCAL VARIABLES-----------------------------------------C
       INTEGER maxang, maxtab
       PARAMETER (maxang=14, maxtab=16)
       INTEGER i, j
       DOUBLE PRECISION angle(maxang), ang
       DOUBLE PRECISION tps2, tps3, tps4, tps5
       DOUBLE PRECISION tabX0(maxtab,1306),tabX1(maxtab,253),tabX2(maxtab,36)
       DOUBLE PRECISION tabX3(maxtab,4), tabX4(maxtab,1)
       DOUBLE PRECISION tabY0(maxtab,962), tabY1(maxtab,277), tabY2(maxtab,30)
       DOUBLE PRECISION tabY3(maxtab,5), tabY4(maxtab,1)
       DOUBLE PRECISION tabs0(maxtab,33), tabs1(maxtab,3), tabs2(maxtab,25)
       DOUBLE PRECISION tabs3(maxtab,4), tabs4(maxtab,1) 

       COMMON/conversion/tpi,secrad,degrad


C-----------------------------------------------------------------------C
C         X CIP DATA  in micro"                                         C
C-----------------------------------------------------------------------C
c       Terms of order    0
        DATA ((tabX0(i,j),i=1,maxtab),j=   1,  10) /
     . -6844318.44d0,     1328.67d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .  -523908.04d0,     -544.76d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .   -90552.22d0,      111.23d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    82168.76d0,      -27.64d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    58707.02d0,      470.05d0,  0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    28288.28d0,      -34.69d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .   -20557.78d0,      -20.84d0,  0.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .   -15406.85d0,       15.12d0,  0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .   -11991.74d0,       32.46d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    -8584.95d0,        4.42d0,  0.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  11,  20) /
     .    -6245.02d0,       -6.68d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     5095.50d0,        7.19d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    -4910.93d0,        0.76d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     2521.07d0,       -5.97d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     2511.85d0,        1.07d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     2372.58d0,        5.93d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     2307.58d0,       -7.52d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    -2053.16d0,        5.13d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     1898.27d0,       -0.72d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    -1825.49d0,        1.23d0,  2.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  21,  30) /
     .    -1534.09d0,        6.29d0,  0.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    -1292.02d0,        0.00d0,  0.d0,  2.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    -1234.96d0,        5.21d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     1163.22d0,       -2.94d0,  2.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     1137.48d0,       -0.04d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     1029.70d0,       -2.63d0,  0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -866.48d0,        0.52d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -813.13d0,        0.40d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      664.57d0,       -0.40d0,  0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -628.24d0,       -0.64d0,  0.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  31,  40) /
     .     -603.52d0,        0.44d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -556.26d0,        3.16d0,  0.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -512.37d0,       -1.47d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      506.65d0,        2.54d0,  0.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      438.51d0,       -0.56d0,  2.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      405.91d0,        0.99d0,  1.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -122.67d0,      203.78d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .     -305.78d0,        1.75d0,  1.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      300.99d0,       -0.44d0,  0.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -292.37d0,       -0.32d0,  1.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  41,  50) /
     .      284.09d0,        0.32d0,  0.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -264.02d0,        0.99d0,  0.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      261.54d0,       -0.95d0,  1.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      256.30d0,       -0.28d0,  2.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -250.54d0,        0.08d0,  0.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      230.72d0,        0.08d0,  1.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      229.78d0,       -0.60d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -212.82d0,        0.84d0,  2.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      196.64d0,       -0.84d0,  0.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      188.95d0,       -0.12d0,  0.d0,  1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  51,  60) /
     .      187.95d0,       -0.24d0,  1.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -160.15d0,      -14.04d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -172.95d0,       -0.40d0,  0.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -168.26d0,        0.20d0,  0.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      161.79d0,        0.24d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      161.34d0,        0.20d0,  1.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       57.44d0,       95.82d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0, -1.d0,
     .      142.16d0,        0.20d0,  0.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -134.81d0,        0.20d0,  1.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      132.81d0,       -0.52d0,  1.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  61,  70) /
     .     -130.31d0,        0.04d0,  1.d0, -1.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      121.98d0,       -0.08d0,  2.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -115.40d0,        0.60d0,  3.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -114.49d0,        0.32d0,  1.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      112.14d0,        0.28d0,  1.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      105.29d0,        0.44d0,  0.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       98.69d0,       -0.28d0,  1.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       91.31d0,       -0.40d0,  2.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       86.74d0,       -0.08d0,  2.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -18.38d0,       63.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  71,  80) /
     .       82.14d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       79.03d0,       -0.24d0,  1.d0,  0.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -79.08d0,  0.d0,  1.d0, -1.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -78.56d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       47.73d0,       23.79d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -8.d0, 12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       66.03d0,       -0.20d0,  0.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       62.65d0,       -0.24d0,  3.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       60.50d0,        0.36d0,  1.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       59.07d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       57.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  81,  90) /
     .      -55.66d0,        0.16d0,  1.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -54.81d0,       -0.08d0,  2.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -53.22d0,       -0.20d0,  1.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -52.95d0,        0.32d0,  1.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -52.27d0,        0.00d0,  1.d0, -1.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       51.32d0,        0.00d0,  1.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -51.00d0,       -0.12d0,  2.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       51.02d0,        0.00d0,  0.d0,  2.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -48.65d0,       -1.15d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       48.29d0,        0.20d0,  2.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=  91, 100) /
     .      -46.38d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .      -45.59d0,       -0.12d0,  1.d0,  0.d0, -4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -43.76d0,        0.36d0,  2.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -40.58d0,       -1.00d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -41.53d0,  1.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       40.54d0,       -0.04d0,  2.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       40.33d0,       -0.04d0,  2.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -38.57d0,        0.08d0,  1.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       37.75d0,        0.04d0,  1.d0, -1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       37.15d0,       -0.12d0,  3.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 101, 110) /
     .       36.68d0,       -0.04d0,  0.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -18.30d0,      -17.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -17.86d0,       17.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -34.81d0,        0.04d0,  0.d0,  1.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -33.22d0,        0.08d0,  0.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       32.43d0,       -0.04d0,  0.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -30.47d0,        0.04d0,  1.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -29.53d0,        0.04d0,  1.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       28.50d0,       -0.08d0,  2.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       28.35d0,       -0.16d0,  0.d0,  1.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 111, 120) /
     .      -28.00d0,        0.00d0,  0.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -27.61d0,        0.20d0,  0.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -26.77d0,        0.08d0,  0.d0,  1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       26.54d0,       -0.12d0,  0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       26.54d0,        0.04d0,  0.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -26.17d0,        0.00d0,  0.d0,  1.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -25.42d0,       -0.08d0,  1.d0,  0.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -16.91d0,        8.43d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.32d0,       24.42d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -19.53d0,        5.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 121, 130) /
     .      -23.79d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       23.66d0,        0.00d0,  1.d0, -1.d0,  0.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -23.47d0,        0.16d0,  1.d0, -1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       23.39d0,       -0.12d0,  2.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -23.49d0,        0.00d0,  0.d0,  1.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -23.28d0,       -0.08d0,  1.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -22.99d0,        0.04d0,  1.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -22.67d0,       -0.08d0,  1.d0, -1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        9.35d0,       13.29d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       22.47d0,       -0.04d0,  0.d0,  1.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 131, 140) /
     .        4.89d0,      -16.55d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        4.89d0,      -16.51d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       21.28d0,       -0.08d0,  0.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       20.57d0,        0.64d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       21.01d0,        0.00d0,  1.d0, -1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.23d0,      -19.13d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .      -19.97d0,        0.12d0,  3.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       19.65d0,       -0.08d0,  0.d0,  0.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       19.58d0,       -0.12d0,  1.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       19.61d0,       -0.08d0,  1.d0, -1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 141, 150) /
     .      -19.41d0,        0.08d0,  2.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -19.49d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .      -18.64d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       18.58d0,        0.04d0,  1.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -18.42d0,        0.00d0,  1.d0, -1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       18.22d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.72d0,      -17.34d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -18.02d0,       -0.04d0,  1.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       17.74d0,        0.08d0,  0.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       17.46d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 151, 160) /
     .      -17.42d0,        0.00d0,  0.d0,  3.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.60d0,       10.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       16.43d0,        0.52d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -16.75d0,        0.04d0,  1.d0, -1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       16.55d0,       -0.08d0,  0.d0,  0.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       16.39d0,       -0.08d0,  2.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       13.88d0,       -2.47d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       15.69d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -15.52d0,        0.00d0,  0.d0,  0.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.34d0,       11.86d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 161, 170) /
     .       14.72d0,       -0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       14.92d0,       -0.04d0,  2.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.26d0,       11.62d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -14.64d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       14.47d0,  1.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -14.37d0,        0.00d0,  1.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       14.32d0,       -0.04d0,  1.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -14.10d0,        0.04d0,  1.d0,  0.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       10.86d0,        3.18d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -10.58d0,       -3.10d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 171, 180) /
     .       -3.62d0,        9.86d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -13.48d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       13.41d0,       -0.04d0,  1.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       13.32d0,       -0.08d0,  2.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -13.33d0,       -0.04d0,  0.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -13.29d0,        0.00d0,  1.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       13.05d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       13.13d0,  1.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -8.99d0,        4.02d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,-18.d0, 16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -12.93d0,        0.04d0,  1.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 181, 190) /
     .        2.03d0,       10.82d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .      -12.78d0,        0.04d0,  0.d0,  0.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       12.24d0,        0.04d0,  1.d0,  0.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        8.71d0,        3.54d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,-10.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       11.98d0,       -0.04d0,  1.d0, -1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -11.38d0,        0.04d0,  2.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -11.30d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       11.14d0,       -0.04d0,  0.d0,  0.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       10.98d0,        0.00d0,  0.d0,  3.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -10.98d0,        0.00d0,  1.d0,  2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 191, 200) /
     .        0.44d0,      -10.38d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       10.46d0,        0.08d0,  1.d0,  0.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -10.42d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .      -10.30d0,        0.08d0,  4.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.92d0,        3.34d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .       10.07d0,        0.04d0,  1.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       10.02d0,        0.00d0,  2.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -9.75d0,        0.04d0,  0.d0,  1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        9.75d0,        0.00d0,  1.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        9.67d0,       -0.04d0,  1.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 201, 210) /
     .       -1.99d0,        7.72d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        9.27d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.42d0,        6.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.56d0,       -8.67d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  1.d0,
     .       -9.19d0,        0.00d0,  2.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        9.11d0,        0.00d0,  1.d0,  0.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        9.07d0,        0.00d0,  2.d0, -2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.63d0,        6.96d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -8.47d0,        0.00d0,  0.d0,  2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -8.28d0,        0.04d0,  1.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 211, 220) /
     .        8.27d0,        0.04d0,  2.d0,  0.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -8.04d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        7.91d0,        0.00d0,  0.d0,  1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -7.84d0,       -0.04d0,  1.d0,  0.d0, -4.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -7.64d0,        0.08d0,  2.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        5.21d0,       -2.51d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.77d0,        1.87d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        5.01d0,       -2.51d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -7.48d0,        0.00d0,  0.d0,  0.d0,  2.d0, -3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -7.32d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 221, 230) /
     .        7.40d0,       -0.04d0,  0.d0,  0.d0,  4.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        7.44d0,        0.00d0,  1.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.32d0,       -1.11d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.13d0,       -1.19d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.20d0,       -6.88d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        6.92d0,        0.04d0,  1.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.48d0,       -0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -6.94d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.47d0,       -4.46d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -2.23d0,       -4.65d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 231, 240) /
     .       -1.07d0,       -5.69d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.97d0,       -1.71d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .        5.57d0,        1.07d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -5.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.48d0,        0.08d0,  1.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.03d0,        4.53d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  1.d0,
     .        4.10d0,       -2.39d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, 19.d0,-21.d0,  3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -6.44d0,  0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.40d0,        0.00d0,  3.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.32d0,        0.00d0,  1.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.67d0,       -3.62d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 241, 250) /
     .       -1.91d0,       -4.38d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .       -2.43d0,       -3.82d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-15.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        6.20d0,        0.00d0,  0.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.38d0,       -2.78d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -6.12d0,        0.04d0,  0.d0,  0.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.09d0,       -0.04d0,  0.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.01d0,       -0.04d0,  1.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.18d0,       -2.82d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -5.05d0,        0.84d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        5.85d0,        0.00d0,  3.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 251, 260) /
     .        5.69d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        5.73d0,       -0.04d0,  1.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        5.61d0,        0.00d0,  0.d0,  0.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        5.49d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.33d0,        0.04d0,  3.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.29d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  2.d0,
     .        5.25d0,        0.00d0,  2.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.99d0,        4.22d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.99d0,        4.22d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        5.21d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 261, 270) /
     .        5.13d0,        0.04d0,  0.d0,  2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.90d0,        0.00d0,  2.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.10d0,        1.79d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.81d0,        0.04d0,  0.d0,  0.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.75d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.70d0,       -0.04d0,  3.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.69d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -4.65d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        4.65d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.57d0,        0.00d0,  2.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 271, 280) /
     .        4.49d0,       -0.04d0,  4.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.53d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  3.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -4.53d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -4.53d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -4.53d0,        0.00d0,  2.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.50d0,        0.00d0,  1.d0, -1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.49d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        1.83d0,        2.63d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.38d0,        0.00d0,  2.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.88d0,       -3.46d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 281, 290) /
     .       -2.70d0,        1.55d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.22d0,        0.00d0,  0.d0,  0.d0,  2.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.10d0,       -0.12d0,  1.d0,  1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.54d0,       -0.64d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.50d0,        0.68d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        4.18d0,        0.00d0,  1.d0, -1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.14d0,        0.00d0,  1.d0,  2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.10d0,        0.00d0,  1.d0,  0.d0,  0.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.06d0,        0.00d0,  2.d0,  0.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.70d0,       -1.35d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,-18.d0, 16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 291, 300) /
     .       -4.04d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.98d0,       -0.04d0,  1.d0,  0.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.98d0,        0.04d0,  1.d0, -1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.02d0,        0.00d0,  2.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.94d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -5.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.84d0,       -3.10d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.30d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.59d0,        2.27d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -8.d0, 13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.66d0,       -0.20d0,  2.d0, -1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.10d0,       -0.72d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, -6.d0,  8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 301, 310) /
     .       -3.82d0,        0.00d0,  1.d0, -1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.62d0,       -0.16d0,  2.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.74d0,        0.00d0,  0.d0,  1.d0, -2.d0,  1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.74d0,        0.00d0,  4.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.74d0,        0.00d0,  0.d0,  2.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.71d0,        0.00d0,  0.d0,  2.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.02d0,        0.68d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .        3.70d0,        0.00d0,  1.d0,  0.d0, -4.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.30d0,        0.40d0,  0.d0,  2.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.66d0,        0.04d0,  2.d0, -1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 311, 320) /
     .        3.66d0,        0.04d0,  0.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.62d0,        0.00d0,  1.d0,  0.d0, -2.d0, -3.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.61d0,        0.00d0,  2.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.90d0,        0.68d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        0.80d0,       -2.78d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.54d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.54d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -3.50d0,        0.00d0,  2.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.45d0,        0.00d0,  0.d0,  2.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -3.42d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 321, 330) /
     .        3.38d0,        0.00d0,  1.d0, -2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.27d0,       -1.11d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,-18.d0, 16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.34d0,        0.00d0,  1.d0, -1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.34d0,        0.00d0,  0.d0,  1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.30d0,        0.01d0,  0.d0,  0.d0,  2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.31d0,        0.00d0,  1.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.30d0,        0.00d0,  3.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.30d0,        0.00d0,  1.d0,  0.d0, -2.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.39d0,       -1.91d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        3.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 331, 340) /
     .        3.26d0,        0.00d0,  2.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.26d0,        0.00d0,  1.d0,  0.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.22d0,       -0.04d0,  1.d0,  0.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.26d0,        0.00d0,  2.d0, -1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.51d0,       -0.64d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        3.14d0,        0.00d0,  2.d0,  0.d0, -4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.63d0,       -0.48d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0,
     .        3.10d0,        0.00d0,  3.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.06d0,        0.00d0,  2.d0, -1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.94d0,       -0.12d0,  1.d0, -2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 341, 350) /
     .        3.06d0,        0.00d0,  2.d0,  0.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.98d0,  0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.98d0,        0.00d0,  1.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.07d0,        0.91d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -2.98d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .        2.94d0,        0.00d0,  0.d0,  2.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.94d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -2.94d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -2.90d0,        0.00d0,  1.d0, -1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,       -2.35d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 351, 360) /
     .       -1.47d0,        1.39d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.80d0,        0.00d0,  1.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.74d0,        0.00d0,  2.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        2.63d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        2.15d0,       -0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -2.70d0,        0.00d0,  1.d0,  1.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.79d0,       -0.88d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        2.19d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.44d0,        2.23d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        2.07d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 361, 370) /
     .       -2.59d0,        0.00d0,  0.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.55d0,        0.00d0,  2.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.11d0,        1.43d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.51d0,        0.00d0,  3.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.51d0,        0.00d0,  2.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.51d0,        0.00d0,  1.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.50d0,  1.d0,  0.d0, -1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.47d0,        0.00d0,  1.d0, -1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.11d0,       -0.36d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.67d0,        0.80d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 371, 380) /
     .        2.46d0,        0.00d0,  0.d0,  2.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.43d0,        0.00d0,  1.d0,  0.d0, -2.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.39d0,        0.00d0,  1.d0,  0.d0,  2.d0, -3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.83d0,        0.56d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,       -1.95d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.24d0,        2.15d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        2.39d0,        0.00d0,  2.d0,  0.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.35d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.27d0,        0.00d0,  1.d0,  0.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.22d0,        0.00d0,  2.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 381, 390) /
     .       -1.03d0,       -1.15d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.87d0,        0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  1.d0,
     .       -0.32d0,       -1.87d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.15d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.80d0,        1.35d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.11d0,        0.00d0,  3.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.11d0,        0.00d0,  1.d0,  1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,       -1.55d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.11d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.84d0,       -1.27d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 391, 400) /
     .       -1.99d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.24d0,        1.87d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.24d0,       -1.87d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.03d0,        0.00d0,  1.d0, -2.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.03d0,        0.00d0,  2.d0, -1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.03d0,        0.00d0,  2.d0,  0.d0,  0.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.03d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.40d0,        1.59d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.99d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.95d0,        0.00d0,  0.d0,  1.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 401, 410) /
     .        1.95d0,        0.00d0,  3.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.91d0,        0.00d0,  0.d0,  1.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.19d0,       -0.72d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        1.87d0,        0.00d0,  2.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.87d0,        0.00d0,  1.d0,  1.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.27d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0, -1.d0,
     .        0.72d0,       -1.15d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.99d0,        0.88d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.87d0,        0.00d0,  2.d0, -1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.87d0,        0.00d0,  1.d0,  1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 411, 420) /
     .       -1.83d0,        0.00d0,  2.d0,  0.d0, -4.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.79d0,        0.00d0,  0.d0,  1.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.79d0,        0.00d0,  4.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.79d0,        0.00d0,  1.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.79d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -1.79d0,        0.00d0,  1.d0,  1.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.75d0,        0.00d0,  0.d0,  0.d0,  4.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.75d0,        0.00d0,  3.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.75d0,        0.00d0,  2.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.47d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 421, 430) /
     .       -1.71d0,        0.00d0,  1.d0,  0.d0,  2.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.71d0,        0.00d0,  2.d0,  0.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        1.39d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.28d0,       -1.43d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.52d0,       -1.19d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        1.67d0,        0.00d0,  2.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.67d0,        0.00d0,  0.d0,  1.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.76d0,       -0.91d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.32d0,        1.35d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -1.39d0,       -0.28d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0, -5.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 431, 440) /
     .        1.63d0,        0.00d0,  2.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.59d0,        0.00d0,  1.d0,  0.d0,  2.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.03d0,       -0.56d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        1.59d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.55d0,        0.00d0,  1.d0,  0.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,       -1.27d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.64d0,        0.91d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,       -1.23d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -1.55d0,        0.00d0,  1.d0, -1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.51d0,        0.00d0,  1.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 441, 450) /
     .        1.51d0,        0.00d0,  2.d0, -2.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.51d0,        0.00d0,  2.d0, -1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.51d0,        0.00d0,  2.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.47d0,        0.00d0,  2.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.47d0,        0.00d0,  0.d0,  0.d0,  2.d0,  3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.95d0,       -0.52d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        1.23d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.60d0,        0.88d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -6.d0,  8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.47d0,        0.00d0,  1.d0, -1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.43d0,        0.00d0,  1.d0,  0.d0, -2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 451, 460) /
     .        1.43d0,        0.00d0,  1.d0, -1.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.43d0,        0.00d0,  0.d0,  1.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.68d0,       -0.76d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,
     .        0.95d0,       -0.48d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.95d0,       -0.48d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.19d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.36d0,       -1.07d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -4.d0,
     .                               10.d0,  0.d0,  0.d0,  0.d0,
     .        0.95d0,        0.48d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -5.d0,  6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.43d0,        0.00d0,  1.d0,  1.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.39d0,        0.00d0,  0.d0,  0.d0,  0.d0,  4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 461, 470) /
     .        1.39d0,        0.00d0,  2.d0, -1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.39d0,        0.00d0,  1.d0, -2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.39d0,        0.00d0,  1.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.39d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,       -1.27d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.56d0,        0.84d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.44d0,       -0.95d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0, -2.d0,
     .        0.32d0,       -1.07d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.03d0,       -0.36d0,  2.d0,  0.d0, -1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        1.11d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -4.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 471, 480) /
     .        0.44d0,        0.95d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .       -1.35d0,        0.00d0,  1.d0, -1.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.88d0,        0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -1.35d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        1.35d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.35d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.31d0,        0.00d0,  0.d0,  1.d0, -2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.31d0,        0.00d0,  1.d0,  0.d0, -2.d0,  1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.19d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        1.27d0,        0.00d0,  0.d0,  0.d0,  4.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 481, 490) /
     .        0.40d0,       -0.88d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -9.d0, 13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.27d0,        0.00d0,  1.d0,  0.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.27d0,        0.00d0,  3.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,       -1.11d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.84d0,        0.44d0,  2.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.84d0,       -0.44d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.84d0,       -0.44d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.27d0,        0.00d0,  1.d0,  0.d0, -4.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.27d0,        0.00d0,  1.d0,  0.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.27d0,        0.00d0,  1.d0,  1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 491, 500) /
     .       -0.44d0,       -0.84d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.27d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.27d0,        0.00d0,  2.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.23d0,        0.00d0,  1.d0, -1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.23d0,        0.00d0,  1.d0, -2.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.23d0,        0.00d0,  0.d0,  0.d0,  2.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.23d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        1.11d0,  0.d0,  0.d0,  1.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.22d0,        0.00d0,  0.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.19d0,        0.00d0,  1.d0,  1.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 501, 510) /
     .       -0.24d0,        0.95d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.76d0,       -0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.91d0,        0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        1.19d0,        0.00d0,  1.d0,  1.d0, -2.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.19d0,        0.00d0,  3.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.19d0,  0.d0,  0.d0,  1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.15d0,        0.00d0,  2.d0, -1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.15d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.15d0,        0.00d0,  1.d0,  0.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.15d0,        0.00d0,  2.d0, -1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 511, 520) /
     .       -1.15d0,        0.00d0,  2.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.15d0,        0.00d0,  3.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.15d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  2.d0,
     .       -0.95d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.24d0,        0.91d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -1.15d0,        0.00d0,  1.d0,  1.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.12d0,        0.00d0,  0.d0,  1.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.11d0,        0.00d0,  1.d0,  0.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.11d0,        0.00d0,  1.d0,  2.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.95d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 521, 530) /
     .       -1.11d0,        0.00d0,  2.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.11d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       -0.91d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.72d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -1.11d0,        0.00d0,  1.d0,  1.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.11d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.07d0,        0.00d0,  2.d0, -1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.07d0,        0.00d0,  2.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.76d0,       -0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -1.07d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 531, 540) /
     .        1.07d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.07d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -4.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.07d0,        0.00d0,  0.d0,  1.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.07d0,        0.00d0,  0.d0,  0.d0,  2.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.84d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -3.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.03d0,  0.d0,  0.d0,  3.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.03d0,        0.00d0,  2.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.03d0,        0.00d0,  3.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.84d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 541, 550) /
     .       -1.03d0,        0.00d0,  3.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.03d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.99d0,        0.00d0,  2.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.76d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.99d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.16d0,        0.84d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.99d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.64d0,        0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.99d0,        0.00d0,  1.d0, -2.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.36d0,       -0.64d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 551, 560) /
     .       -0.95d0,        0.00d0,  3.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.95d0,        0.00d0,  1.d0, -1.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.95d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0,
     .        0.64d0,        0.32d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -3.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.95d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.84d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.76d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.95d0,        0.00d0,  3.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.95d0,        0.00d0,  1.d0,  0.d0,  4.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.95d0,        0.00d0,  1.d0, -1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 561, 570) /
     .        0.00d0,        0.92d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.91d0,        0.00d0,  1.d0,  1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.91d0,        0.00d0,  3.d0,  0.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.52d0,  1.d0, -2.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.91d0,        0.00d0,  5.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,        0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -9.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.44d0,       -0.48d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  8.d0,-14.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.91d0,        0.00d0,  2.d0,  0.d0,  0.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.91d0,        0.00d0,  3.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,       -0.56d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  3.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 571, 580) /
     .        0.91d0,        0.00d0,  1.d0,  0.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.88d0,        0.00d0,  1.d0,  2.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.88d0,        0.00d0,  2.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.60d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  8.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.88d0,        0.00d0,  0.d0,  2.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.36d0,       -0.52d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -3.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.52d0,        0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.88d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.56d0,        0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 581, 590) /
     .        0.64d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.88d0,        0.00d0,  1.d0, -1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.88d0,        0.00d0,  1.d0, -1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.88d0,        0.00d0,  1.d0, -1.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.84d0,        0.00d0,  0.d0,  1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.68d0,       -0.16d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0, -6.d0,  8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.84d0,        0.00d0,  1.d0,  2.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.56d0,        0.28d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0, -8.d0, 12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.68d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.64d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 591, 600) /
     .        0.16d0,        0.68d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.72d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.83d0,        0.00d0,  2.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.80d0,        0.00d0,  2.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.80d0,        0.00d0,  2.d0,  2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.80d0,        0.00d0,  4.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.52d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.68d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  2.d0,
     .       -0.32d0,        0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 601, 610) /
     .        0.36d0,       -0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.36d0,       -0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  1.d0,
     .       -0.80d0,        0.00d0,  0.d0,  1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.79d0,        0.00d0,  1.d0,  1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.74d0,       -0.04d0,  0.d0,  0.d0,  2.d0, -2.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.76d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.76d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -2.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.76d0,        0.00d0,  1.d0,  0.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.76d0,        0.00d0,  3.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 611, 620) /
     .        0.76d0,        0.00d0,  2.d0,  1.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.76d0,        0.00d0,  2.d0, -1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.76d0,        0.00d0,  1.d0,  0.d0, -4.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.64d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.76d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.76d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -9.d0, 15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.76d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.64d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.16d0,       -0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.76d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 621, 630) /
     .        0.00d0,       -0.76d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  2.d0,
     .        0.28d0,       -0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.32d0,        0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.76d0,        0.00d0,  1.d0,  1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.72d0,        0.00d0,  4.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.72d0,        0.00d0,  1.d0, -1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.48d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.72d0,        0.00d0,  0.d0,  1.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.72d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.72d0,        0.00d0,  0.d0,  0.d0,  2.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 631, 640) /
     .       -0.72d0,        0.00d0,  3.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.71d0,        0.00d0,  1.d0, -1.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.68d0,        0.00d0,  1.d0,  0.d0, -2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.68d0,        0.00d0,  0.d0,  2.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.68d0,        0.00d0,  0.d0,  1.d0, -4.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.68d0,        0.00d0,  0.d0,  1.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.68d0,        0.00d0,  1.d0,  0.d0, -2.d0,  4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.68d0,        0.00d0,  0.d0,  2.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.56d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.68d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 641, 650) /
     .       -0.68d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,        0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.44d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.68d0,        0.00d0,  1.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.64d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.64d0,        0.00d0,  3.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.64d0,        0.00d0,  2.d0, -1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.64d0,        0.00d0,  0.d0,  1.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.64d0,        0.00d0,  1.d0,  0.d0, -2.d0, -3.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.52d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 651, 660) /
     .       -0.12d0,       -0.52d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.16d0,       -0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.44d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0, 11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.44d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.24d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.20d0,       -0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.64d0,        0.00d0,  1.d0,  0.d0,  0.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  3.d0, -7.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.64d0,        0.00d0,  1.d0,  0.d0, -2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 661, 670) /
     .        0.64d0,        0.00d0,  0.d0,  1.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.63d0,        0.00d0,  2.d0,  0.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,        0.00d0,  0.d0,  1.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.60d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0, -8.d0, 11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,        0.00d0,  2.d0,  0.d0, -2.d0, -3.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,        0.00d0,  4.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.60d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                3.d0,  0.d0,  0.d0,  2.d0,
     .        0.24d0,       -0.36d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  4.d0,
     .                               -3.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 671, 680) /
     .        0.48d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.12d0,        0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.24d0,       -0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.36d0,        0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-11.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.44d0,        0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,        0.00d0,  0.d0,  0.d0,  0.d0,  3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .        0.60d0,        0.00d0,  2.d0, -1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.60d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 681, 690) /
     .        0.59d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,        0.00d0,  3.d0,  0.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,       -0.12d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0, -6.d0,  8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.56d0,        0.00d0,  1.d0,  2.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.56d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,        0.00d0,  3.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,        0.00d0,  3.d0,  0.d0,  0.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.56d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  2.d0,
     .        0.16d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 691, 700) /
     .        0.44d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.20d0,       -0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.36d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -3.d0,  7.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,        0.00d0,  0.d0,  0.d0,  4.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.55d0,        0.00d0,  1.d0,  1.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        0.00d0,  1.d0,  0.d0,  0.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.00d0,  1.d0,  1.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        0.00d0,  0.d0,  1.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.36d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 701, 710) /
     .       -0.52d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.00d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.00d0,  0.d0,  0.d0,  2.d0,  6.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.52d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.12d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.52d0,        0.00d0,  1.d0,  0.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.00d0,  2.d0,  0.d0, -2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 711, 720) /
     .        0.00d0,       -0.52d0,  1.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        0.00d0,  1.d0,  1.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        0.00d0,  0.d0,  0.d0,  0.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.51d0,        0.00d0,  1.d0,  0.d0,  0.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.51d0,        0.00d0,  1.d0,  0.d0,  2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.48d0,        0.00d0,  0.d0,  1.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.48d0,        0.00d0,  0.d0,  0.d0,  2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        0.00d0,  1.d0, -2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        0.00d0,  0.d0,  1.d0, -2.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 721, 730) /
     .        0.48d0,        0.00d0,  3.d0, -1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.48d0,        0.00d0,  4.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        0.00d0,  3.d0, -1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,       -0.36d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                3.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.12d0,       -0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.16d0,        0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0,-13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 731, 740) /
     .       -0.36d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  4.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.48d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  2.d0,
     .        0.32d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                3.d0,  0.d0,  0.d0,  1.d0,
     .        0.48d0,        0.00d0,  1.d0, -1.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        0.00d0,  2.d0,  1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        0.00d0,  3.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.48d0,  1.d0,  0.d0,  1.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.48d0,        0.00d0,  1.d0,  1.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 741, 750) /
     .       -0.48d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.48d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.44d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,       -0.12d0,  0.d0,  0.d0,  1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,        0.00d0,  0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  9.d0,-17.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.44d0,        0.00d0,  3.d0, -1.d0, -2.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,        0.00d0,  1.d0, -1.d0,  0.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.44d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 751, 760) /
     .        0.12d0,        0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.20d0,        0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.32d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-11.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.44d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.44d0,        0.00d0,  1.d0,  2.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,        0.00d0,  0.d0,  1.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,        0.00d0,  3.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.44d0,        0.00d0,  1.d0, -1.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 761, 770) /
     .        0.44d0,        0.00d0,  2.d0,  0.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  2.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.00d0,  2.d0,  1.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.00d0,  2.d0,  1.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.00d0,  1.d0,  0.d0,  4.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  2.d0,  0.d0, -4.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.16d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -5.d0,  6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  3.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.28d0,  2.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  1.d0,  2.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 771, 780) /
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  4.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0,-13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  5.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0,-12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.20d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 781, 790) /
     .       -0.12d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  1.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0,
     .        0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  1.d0,  1.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  2.d0,  0.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  4.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.36d0,        0.00d0,  1.d0,  0.d0,  0.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.36d0,        0.00d0,  1.d0, -2.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 791, 800) /
     .        0.24d0,       -0.12d0,  0.d0,  2.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       -0.16d0,  2.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  3.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.36d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.36d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  2.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.24d0,  1.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  2.d0, -2.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  0.d0,  3.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  2.d0, -1.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  1.d0,  3.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 801, 810) /
     .        0.36d0,        0.00d0,  1.d0, -1.d0, -2.d0, -3.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.36d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -2.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.12d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.24d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.36d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 811, 820) /
     .        0.36d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.24d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.36d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  1.d0, -2.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.36d0,        0.00d0,  2.d0,  0.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.36d0,        0.00d0,  0.d0,  1.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.36d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.13d0,        0.22d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 821, 830) /
     .       -0.32d0,        0.00d0,  1.d0,  1.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  4.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -8.d0, 15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  0.d0,  2.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.20d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -6.d0,  8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.00d0,  3.d0, -1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0, -1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.00d0,  2.d0,  0.d0,  2.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.32d0,  2.d0,  0.d0, -1.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 831, 840) /
     .        0.32d0,        0.00d0,  1.d0,  2.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  2.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,       -0.20d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -9.d0, 13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.00d0,  3.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.32d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, 20.d0,-21.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.32d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -8.d0, 11.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.32d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.32d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 841, 850) /
     .       -0.32d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.32d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.16d0,        0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.32d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  2.d0,
     .        0.20d0,        0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                4.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 851, 860) /
     .        0.20d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.12d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.32d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                               -1.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.00d0,  0.d0,  0.d0,  4.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  0.d0,  0.d0,  0.d0,  1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  2.d0,  0.d0, -4.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  0.d0,  0.d0,  4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 861, 870) /
     .        0.28d0,        0.00d0,  1.d0, -2.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  1.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.12d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -3.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  3.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        0.00d0,  1.d0,  1.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -9.d0, 17.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  1.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        0.00d0,  4.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        0.00d0,  0.d0,  2.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  0.d0,  2.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 871, 880) /
     .        0.28d0,        0.00d0,  3.d0,  0.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  2.d0, -2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  1.d0,  0.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  0.d0,  2.d0,  3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        0.00d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 881, 890) /
     .       -0.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.12d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.12d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 891, 900) /
     .        0.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  4.d0,
     .                               -5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  2.d0,
     .       -0.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -7.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0, -1.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  1.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,       -0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  0.d0,  0.d0,  2.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  2.d0, -1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 901, 910) /
     .        0.00d0,       -0.28d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.28d0,        0.00d0,  1.d0,  1.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.24d0,  0.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  1.d0, -2.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  0.d0,  1.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  1.d0, -2.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  2.d0,  0.d0, -4.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  2.d0,  0.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 911, 920) /
     .        0.24d0,        0.00d0,  2.d0,  0.d0, -2.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.24d0,  2.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  4.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  5.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  3.d0,  0.d0,  0.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  2.d0,  2.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  2.d0,  2.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  2.d0,  1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 921, 930) /
     .        0.24d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.24d0,  1.d0,  0.d0, -1.d0,  1.d0, -1.d0,
     .                                0.d0,-18.d0, 17.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  0.d0,  2.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  0.d0,  1.d0,  2.d0,  3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.24d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.24d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 931, 940) /
     .        0.00d0,        0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  1.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.24d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.24d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.24d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  2.d0,
     .        0.24d0,        0.00d0,  0.d0,  1.d0,  0.d0,  3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  0.d0,  2.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  2.d0, -1.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  1.d0, -1.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 941, 950) /
     .        0.24d0,        0.00d0,  2.d0,  1.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,        0.00d0,  1.d0, -1.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.24d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.24d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0, -2.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 951, 960) /
     .        0.20d0,        0.00d0,  1.d0, -2.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0,  0.d0, -2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0,  0.d0, -3.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  1.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0, -1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0, -1.d0, -4.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0, -2.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 961, 970) /
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0,  3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  1.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,-10.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0, -1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  4.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 971, 980) /
     .       -0.20d0,        0.00d0,  4.d0, -1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  1.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  4.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0,  1.d0, -2.d0, -3.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  0.d0,  3.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 981, 990) /
     .        0.20d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0, -1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, 17.d0,-16.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0, 20.d0,-20.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  3.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -2.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j= 991,1000) /
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,-10.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -5.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1001,1010) /
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -5.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  1.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -2.d0, -2.d0,
     .       -0.20d0,        0.00d0,  0.d0,  2.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  3.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0, -1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1011,1020) /
     .        0.00d0,       -0.20d0,  1.d0,  0.d0, -1.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  1.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0,  0.d0,  0.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  4.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  3.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0, -1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1021,1030) /
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0, -5.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  2.d0,  1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0, -1.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0,  0.d0,  0.d0, -3.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  2.d0,  0.d0, -2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1031,1040) /
     .        0.16d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  2.d0,  0.d0,  0.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  3.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0,  1.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  2.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  2.d0, -1.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0,  1.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0,  0.d0, -4.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0, -1.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0, -2.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1041,1050) /
     .        0.16d0,        0.00d0,  3.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0,  0.d0, -2.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  2.d0,  0.d0,  4.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,        0.12d0,  2.d0, -2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  3.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  3.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0,  1.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  2.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  1.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0, -4.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1051,1060) /
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  1.d0, -2.d0,  4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.16d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  3.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  3.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  2.d0,  1.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  2.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1061,1070) /
     .        0.16d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -4.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  2.d0, -2.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0,  1.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.16d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1071,1080) /
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -3.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -5.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0, -1.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1081,1090) /
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0, -8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-10.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1091,1100) /
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  1.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -2.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  2.d0,  1.d0,  0.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  1.d0, -1.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1101,1110) /
     .        0.16d0,        0.00d0,  3.d0, -1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  4.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0, -4.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0,  0.d0,  2.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0, -2.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  1.d0, -1.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  2.d0,  0.d0,  2.d0, -3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  0.d0,  1.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.16d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1111,1120) /
     .        0.16d0,        0.00d0,  3.d0,  0.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  2.d0, -1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  2.d0,  0.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  2.d0,  0.d0, -4.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  2.d0, -1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  2.d0, -2.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,        0.00d0,  3.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  0.d0,  2.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1121,1130) /
     .        0.16d0,        0.00d0,  0.d0,  1.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.15d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0, -8.d0, 12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,-10.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,-10.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  1.d0,  4.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1131,1140) /
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  2.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -6.d0,  8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0, -1.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -5.d0,  6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0, -1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  3.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -3.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1141,1150) /
     .        0.12d0,        0.00d0,  2.d0,  2.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0, -1.d0,  2.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  4.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0, -1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0, -2.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1151,1160) /
     .       -0.12d0,        0.00d0,  5.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  3.d0,  0.d0, -2.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  2.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0, -1.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0,  0.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -8.d0, 11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0, -2.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1161,1170) /
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0, -1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                               -1.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  4.d0,  0.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0,  2.d0, -6.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  1.d0, -4.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0, -1.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1171,1180) /
     .        0.00d0,        0.12d0,  2.d0,  0.d0, -1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.08d0,        0.04d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  4.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  3.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  3.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  3.d0,  1.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  3.d0, -1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  3.d0, -1.d0,  0.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  1.d0,  0.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1181,1190) /
     .        0.00d0,        0.12d0,  2.d0,  0.d0,  1.d0, -3.d0,  1.d0,
     .                                0.d0, -6.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  2.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  5.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, -4.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  2.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  5.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0,  0.d0, -2.d0, -5.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0, -1.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  3.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1191,1200) /
     .       -0.12d0,        0.00d0,  1.d0,  1.d0, -2.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  1.d0,  0.d0,  1.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0, -3.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0, -1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  1.d0,  0.d0, -1.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1201,1210) /
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -7.d0,  9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,-10.d0, 15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                               -3.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -4.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1211,1220) /
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-14.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1221,1230) /
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -6.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -3.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1231,1240) /
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  9.d0,-17.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0,-12.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -8.d0,  1.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1241,1250) /
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-10.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,-13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1251,1260) /
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -5.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                               -3.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -8.d0,  1.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1261,1270) /
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  2.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                               -3.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -3.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -6.d0,  3.d0,  0.d0, -2.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                               -2.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1271,1280) /
     .       -0.12d0,        0.00d0,  1.d0,  1.d0,  0.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0,  3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  3.d0,  0.d0, -2.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  2.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  1.d0,  0.d0, -1.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0,  0.d0,  2.d0, -6.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0,  1.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1281,1290) /
     .       -0.12d0,        0.00d0,  2.d0,  1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0,  2.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  4.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  7.d0,-13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0, -1.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  3.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0, -1.d0,
     .                                0.d0, -5.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0, -3.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1291,1300) /
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  1.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0, -1.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  1.d0, -2.d0,  1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0,  1.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  3.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX0(i,j),i=1,maxtab),j=1301,1306) /
     .        0.12d0,        0.00d0,  1.d0,  0.d0,  0.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  1.d0,  1.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0, -2.d0,  4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.11d0,        0.00d0,  0.d0,  0.d0,  4.d0, -4.d0,  4.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    1
        DATA ((tabX1(i,j),i=1,maxtab),j=   1,  10) /
     .    -3328.48d0,   205833.15d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      197.53d0,    12814.01d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       41.19d0,     2187.91d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -35.85d0,    -2004.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       59.15d0,      501.82d0,  0.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.82d0,      448.76d0,  0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -179.56d0,      164.33d0,  0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        5.67d0,      288.49d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       23.85d0,     -214.50d0,  0.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.87d0,     -154.91d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  11,  20) /
     .        2.14d0,     -119.21d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.17d0,      -74.33d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.47d0,       70.31d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.42d0,       58.94d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.95d0,       57.12d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.08d0,      -54.19d0,  2.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.92d0,       36.78d0,  0.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.68d0,      -31.01d0,  0.d0,  2.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.74d0,       29.60d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,      -27.59d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  21,  30) /
     .      -11.11d0,      -15.07d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,      -24.05d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.81d0,       19.06d0,  0.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.18d0,       15.32d0,  0.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.08d0,      -17.90d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.16d0,       15.55d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.77d0,       14.40d0,  0.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.25d0,       11.67d0,  1.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.18d0,        3.58d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .       -1.00d0,       -7.27d0,  0.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  31,  40) /
     .       -0.99d0,        6.87d0,  0.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.27d0,        7.49d0,  0.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        7.31d0,  0.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        7.30d0,  1.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.33d0,        6.80d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.27d0,       -6.81d0,  1.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.35d0,        6.08d0,  0.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.35d0,        6.09d0,  0.d0,  1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.14d0,       -6.19d0,  2.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.14d0,        6.02d0,  2.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  41,  50) /
     .        2.69d0,       -2.76d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.08d0,       -4.93d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.85d0,       -1.77d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0, -1.d0,
     .       -0.07d0,       -4.27d0,  0.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.71d0,        0.38d0,  0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.75d0,        0.04d0,  0.d0,  1.d0, -1.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.82d0,       -2.73d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.06d0,        2.93d0,  2.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,        2.83d0,  2.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.08d0,        2.75d0,  3.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  51,  60) /
     .        0.07d0,        2.75d0,  1.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.07d0,        2.70d0,  1.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.07d0,        2.52d0,  0.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.05d0,       -2.53d0,  2.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,        2.40d0,  1.d0,  0.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.06d0,       -2.37d0,  1.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.69d0,       -1.45d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -8.d0, 12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,        2.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        1.99d0,        0.02d0,  1.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.94d0,        1.07d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  61,  70) /
     .        0.04d0,        1.91d0,  1.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.58d0,       -1.36d0,  2.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.51d0,       -1.25d0,  0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,       -1.59d0,  0.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.39d0,       -1.23d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.03d0,       -1.57d0,  1.d0, -1.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.03d0,        1.50d0,  0.d0,  2.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.04d0,        1.48d0,  1.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,        1.45d0,  1.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,       -1.36d0,  1.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  71,  80) /
     .        0.03d0,       -1.32d0,  2.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.03d0,       -1.24d0,  1.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,       -1.18d0,  2.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.03d0,        1.16d0,  2.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,        1.13d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.04d0,       -1.11d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,        1.11d0,  1.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.03d0,       -1.10d0,  1.d0,  0.d0, -4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.03d0,        1.04d0,  2.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.51d0,        0.56d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  81,  90) /
     .        0.02d0,       -0.98d0,  0.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,       -0.94d0,  0.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,       -0.89d0,  3.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,       -0.88d0,  0.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.31d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.02d0,       -0.87d0,  1.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,       -0.87d0,  2.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,        0.83d0,  0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,        0.77d0,  0.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.42d0,       -0.36d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j=  91, 100) /
     .       -0.01d0,       -0.73d0,  0.d0,  1.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.71d0,  1.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.68d0,  0.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,        0.66d0,  0.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.62d0,  1.d0, -1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,        0.62d0,  1.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.58d0,       -0.03d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,        0.58d0,  1.d0, -1.d0,  0.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.44d0,        0.14d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.02d0,        0.56d0,  1.d0, -1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 101, 110) /
     .        0.01d0,       -0.57d0,  0.d0,  1.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.13d0,       -0.45d0,  1.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.56d0,  3.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,       -0.55d0,  1.d0, -1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.55d0,  1.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.03d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,        0.54d0,  1.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.51d0,  0.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.41d0,       -0.11d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.01d0,        0.50d0,  0.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 111, 120) /
     .        0.01d0,        0.48d0,  1.d0, -1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.45d0,       -0.04d0,  1.d0,  0.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,       -0.48d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.01d0,        0.46d0,  2.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.23d0,        0.24d0,  2.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.46d0,  0.d0,  0.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.35d0,       -0.11d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.45d0,  0.d0,  0.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,       -0.45d0,  1.d0, -1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.45d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 121, 130) /
     .       -0.01d0,        0.44d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.35d0,        0.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.42d0,  1.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.41d0,  1.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.09d0,       -0.33d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.41d0,  0.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.40d0,  0.d0,  3.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.39d0,  2.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.39d0,       -0.01d0,  1.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,       -0.39d0,  0.d0,  0.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 131, 140) /
     .       -0.01d0,        0.38d0,  1.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,       -0.07d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.01d0,        0.36d0,  1.d0, -1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.01d0,       -0.34d0,  1.d0,  0.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,       -0.34d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.33d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.01d0,       -0.32d0,  1.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.32d0,  1.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.32d0,  0.d0,  0.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 141, 150) /
     .       -0.01d0,       -0.31d0,  1.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.31d0,        0.00d0,  0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.07d0,       -0.24d0,  1.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       -0.21d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.30d0,  1.d0,  0.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,        0.29d0,  1.d0,  0.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.29d0,  1.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.29d0,  1.d0,  0.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.23d0,        0.06d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.26d0,        0.02d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  1.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 151, 160) /
     .        0.00d0,       -0.27d0,  2.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.25d0,        0.02d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.09d0,       -0.18d0,  0.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.25d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.14d0,       -0.11d0,  1.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.25d0,  1.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.24d0,  4.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.24d0,  2.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.23d0,  2.d0,  0.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.23d0,  0.d0,  1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 161, 170) /
     .       -0.01d0,       -0.23d0,  1.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.23d0,  0.d0,  1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.22d0,  1.d0,  0.d0, -4.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.21d0,  1.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.21d0,  2.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.17d0,        0.03d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.17d0,        0.03d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.19d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.14d0,       -0.06d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  1.d0,
     .        0.03d0,       -0.17d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -5.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 171, 180) /
     .       -0.13d0,        0.06d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.19d0,  0.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.19d0,  0.d0,  0.d0,  2.d0, -3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.06d0,       -0.13d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.18d0,  0.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.09d0,       -0.09d0,  1.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       -0.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0,
     .        0.06d0,        0.12d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.18d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.18d0,  0.d0,  0.d0,  4.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 181, 190) /
     .        0.00d0,        0.17d0,  0.d0,  0.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.03d0,        0.15d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.01d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.17d0,  1.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.17d0,  2.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.11d0,        0.06d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.17d0,  3.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.08d0,        0.09d0,  1.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.17d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.16d0,  0.d0,  0.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 191, 200) /
     .        0.01d0,        0.15d0,  1.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.13d0,       -0.03d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.15d0,  1.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.15d0,  2.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.13d0,        0.03d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.10d0,       -0.06d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-15.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.07d0,        0.08d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.09d0,       -0.06d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.15d0,  3.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.07d0,       -0.08d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 201, 210) /
     .        0.00d0,       -0.14d0,  2.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,        0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.07d0,        0.08d0,  1.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.03d0,       -0.11d0,  3.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.14d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.14d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,       -0.12d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.14d0,  1.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.14d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  3.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.14d0,  0.d0,  0.d0,  2.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 211, 220) /
     .        0.00d0,        0.13d0,  0.d0,  0.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.08d0,       -0.06d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.13d0,  1.d0, -1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.13d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  2.d0,
     .        0.01d0,        0.13d0,  3.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.13d0,  2.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.13d0,  1.d0, -1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,       -0.11d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.08d0,       -0.04d0,  0.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.13d0,  2.d0,  0.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 221, 230) /
     .        0.00d0,        0.13d0,  1.d0,  0.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,       -0.12d0,  2.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.12d0,  0.d0,  2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,       -0.11d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.12d0,  2.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -5.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.04d0,        0.08d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,-18.d0, 16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.12d0,  1.d0, -1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 231, 240) /
     .        0.00d0,       -0.12d0,  0.d0,  0.d0,  0.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.11d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.03d0,       -0.09d0,  1.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.11d0,  0.d0,  2.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.11d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.11d0,  1.d0, -1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.11d0,  1.d0, -1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.07d0,        0.05d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -8.d0, 13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.11d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.11d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 241, 250) /
     .        0.00d0,       -0.11d0,  4.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,       -0.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.11d0,  2.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,        0.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.11d0,  0.d0,  2.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.11d0,  1.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.08d0,       -0.02d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  2.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  2.d0, -1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.03d0,       -0.07d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,-18.d0, 16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX1(i,j),i=1,maxtab),j= 251, 253) /
     .        0.00d0,        0.10d0,  1.d0,  2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.10d0,  2.d0,  0.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  1.d0, -1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    2
        DATA ((tabX2(i,j),i=1,maxtab),j=   1,  10) /
     .     2038.00d0,       82.26d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      155.75d0,       -2.70d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       26.92d0,       -0.45d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -24.43d0,        0.46d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -17.36d0,       -0.50d0,  0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -8.41d0,        0.01d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.08d0,       -1.36d0,  0.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.59d0,        0.17d0,  0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.57d0,       -0.06d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.54d0,        0.60d0,  0.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX2(i,j),i=1,maxtab),j=  11,  20) /
     .        1.86d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.52d0,       -0.07d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.46d0,        0.04d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.75d0,       -0.02d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.75d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.71d0,       -0.01d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.69d0,        0.02d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.61d0,        0.02d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.54d0,       -0.04d0,  2.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.56d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX2(i,j),i=1,maxtab),j=  21,  30) /
     .        0.46d0,       -0.02d0,  0.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.38d0,       -0.01d0,  0.d0,  2.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.37d0,       -0.02d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.34d0,        0.01d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.35d0,        0.00d0,  2.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.31d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.19d0,       -0.09d0,  0.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.26d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,       -0.01d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabX2(i,j),i=1,maxtab),j=  31,  36) /
     .        0.18d0,       -0.01d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.17d0,        0.00d0,  0.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.15d0,        0.01d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.15d0,        0.00d0,  0.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.13d0,        0.00d0,  2.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    3
        DATA ((tabX3(i,j),i=1,maxtab),j=   1,   4) /
     .        1.76d0,      -20.39d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.27d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.22d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    4
        DATA ((tabX4(i,j),i=1,maxtab),j=   1,   1) /
     .       -0.10d0,       -0.02d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/

C-----------------------------------------------------------------------C
C         Y CIP DATA  in micro"                                         C
C-----------------------------------------------------------------------C
c       Terms of order    0
        DATA ((tabY0(i,j),i=1,maxtab),j=   1,  10) /
     .     1538.18d0,  9205236.26d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -458.66d0,   573033.42d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      137.41d0,    97846.69d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -29.05d0,   -89618.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -17.40d0,    22438.42d0,  0.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       31.80d0,    20069.50d0,  0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       36.70d0,    12902.66d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -13.20d0,    -9592.72d0,  0.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -192.40d0,     7387.02d0,  0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.92d0,    -6918.22d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  11,  20) /
     .        0.40d0,    -5331.13d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.90d0,    -3323.89d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        7.50d0,     3143.98d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        7.80d0,     2636.13d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.60d0,     2554.51d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.00d0,    -2423.59d0,  2.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.80d0,     1645.01d0,  0.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,    -1387.00d0,  0.d0,  2.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        5.90d0,     1323.81d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,    -1233.89d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  21,  30) /
     .        0.30d0,    -1075.60d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.48d0,      852.85d0,  0.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,     -800.34d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       35.80d0,     -674.99d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.40d0,      695.54d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,      684.99d0,  0.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.62d0,      643.75d0,  0.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.50d0,      522.11d0,  1.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      273.50d0,      164.70d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .        1.40d0,      335.24d0,  0.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  31,  40) /
     .        1.90d0,      326.60d0,  1.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,      327.11d0,  0.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,     -325.03d0,  0.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,      307.03d0,  0.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.50d0,      304.17d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,     -304.46d0,  1.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,     -276.81d0,  2.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.90d0,      272.05d0,  0.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,      272.22d0,  0.d0,  1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.20d0,      269.45d0,  2.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  41,  50) /
     .        0.10d0,     -220.67d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      128.60d0,      -77.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0, -1.d0,
     .        0.10d0,     -190.79d0,  0.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      167.90d0,        0.00d0,  0.d0,  1.d0, -1.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -8.20d0,     -123.48d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,      131.04d0,  2.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,      126.64d0,  2.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.90d0,     -122.28d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.70d0,      123.20d0,  3.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,      123.20d0,  1.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  51,  60) /
     .       -0.30d0,      120.70d0,  1.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,      112.90d0,  0.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,     -112.94d0,  2.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,      107.31d0,  1.d0,  0.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,     -106.20d0,  1.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       31.90d0,      -64.10d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -8.d0, 12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       89.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       89.10d0,        0.00d0,  1.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       85.32d0,  1.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,      -71.00d0,  0.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  61,  70) /
     .        0.00d0,      -70.01d0,  1.d0, -1.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       13.90d0,      -55.30d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       67.25d0,  0.d0,  2.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,       66.29d0,  1.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,       64.70d0,  1.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.30d0,      -60.90d0,  2.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,      -60.92d0,  1.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,      -59.20d0,  2.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.10d0,      -55.55d0,  0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -55.60d0,  1.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  71,  80) /
     .       -0.10d0,      -52.69d0,  2.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       51.80d0,  2.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.00d0,      -49.51d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       50.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        2.50d0,       47.70d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       49.59d0,  1.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,      -49.00d0,  1.d0,  0.d0, -4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -23.20d0,       24.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,       46.50d0,  2.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,      -44.04d0,  0.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  81,  90) /
     .       -0.10d0,      -42.19d0,  0.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       13.30d0,       26.90d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.10d0,      -39.90d0,  3.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,      -39.50d0,  0.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -39.11d0,  1.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,      -38.92d0,  2.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       36.95d0,  0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       34.59d0,  0.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,      -32.55d0,  0.d0,  1.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       31.61d0,  1.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j=  91, 100) /
     .        0.00d0,       30.40d0,  0.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       29.40d0,  0.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -27.91d0,  1.d0, -1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       27.50d0,  1.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -25.70d0,       -1.70d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .       19.90d0,        5.90d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       25.80d0,  1.d0, -1.d0,  0.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       25.20d0,  1.d0, -1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -25.31d0,  0.d0,  1.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       25.00d0,  3.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 101, 110) /
     .       -0.10d0,       24.40d0,  1.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,      -24.40d0,  1.d0, -1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -23.30d0,        0.90d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       24.00d0,  1.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -18.00d0,       -5.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.10d0,      -22.80d0,  0.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       22.50d0,  0.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       21.60d0,  1.d0, -1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -21.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.10d0,       20.70d0,  2.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 111, 120) /
     .        0.70d0,      -20.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       20.51d0,  0.d0,  0.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       15.90d0,       -4.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,      -19.94d0,  1.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       20.11d0,  0.d0,  0.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       15.60d0,        4.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -20.00d0,  1.d0, -1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       19.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       18.91d0,  1.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.30d0,      -14.60d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 121, 130) /
     .       -0.10d0,      -18.50d0,  1.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       18.40d0,  0.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       18.10d0,  0.d0,  3.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.00d0,       16.81d0,  0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,      -17.60d0,  2.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -17.60d0,        0.00d0,  1.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.30d0,      -16.26d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -17.41d0,  0.d0,  0.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       14.50d0,       -2.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       17.08d0,  1.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 131, 140) /
     .        0.00d0,       16.21d0,  1.d0, -1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -16.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,      -15.31d0,  1.d0,  0.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -15.10d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       14.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       14.40d0,  1.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,      -14.30d0,  1.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -14.40d0,  0.d0,  0.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -13.81d0,  1.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.50d0,       -9.30d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 141, 150) /
     .      -13.80d0,        0.00d0,  0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -13.38d0,  1.d0,  0.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       13.10d0,  1.d0,  0.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       10.30d0,        2.70d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       12.80d0,  1.d0,  0.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -12.80d0,  1.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       11.70d0,        0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,      -12.00d0,  2.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       11.30d0,        0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       11.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 151, 160) /
     .        0.00d0,      -11.20d0,  1.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       10.90d0,  4.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,      -10.77d0,  1.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -10.80d0,  2.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       10.47d0,  2.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       10.50d0,  2.d0,  0.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -10.40d0,  1.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       10.40d0,  0.d0,  1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -10.20d0,  0.d0,  1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,      -10.00d0,  1.d0,  0.d0, -4.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 161, 170) /
     .        0.00d0,        9.60d0,  1.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        9.40d0,  2.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -7.60d0,        1.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -7.70d0,        1.40d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.40d0,       -7.50d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -5.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.10d0,       -2.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -8.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -5.90d0,        2.60d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        8.40d0,  0.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -8.11d0,  0.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 171, 180) /
     .       -2.60d0,       -5.70d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        8.30d0,  0.d0,  0.d0,  2.d0, -3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.70d0,        5.50d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.20d0,       -4.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0,
     .       -0.10d0,        8.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        8.09d0,  0.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.30d0,        6.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -7.90d0,  0.d0,  0.d0,  4.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        7.80d0,  0.d0,  0.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -7.50d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 181, 190) /
     .       -0.50d0,       -7.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        4.90d0,        2.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        7.50d0,  1.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -7.50d0,  3.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -7.49d0,  2.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -7.20d0,  0.d0,  0.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        6.90d0,  1.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.60d0,        1.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -5.70d0,       -1.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        6.90d0,  2.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 191, 200) /
     .        4.20d0,       -2.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-15.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        6.90d0,  1.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.10d0,        3.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -3.90d0,       -2.90d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        6.60d0,  3.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.10d0,       -3.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        1.10d0,       -5.39d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -6.40d0,  2.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.90d0,        5.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -6.30d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 201, 210) /
     .       -0.10d0,       -6.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -6.10d0,  1.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        6.10d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  3.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        6.10d0,  0.d0,  0.d0,  2.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.50d0,       -2.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        6.00d0,  0.d0,  0.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        5.90d0,  1.d0, -1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.90d0,       -4.80d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        5.70d0,  1.d0, -1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        5.60d0,  3.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 211, 220) /
     .        0.00d0,        5.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        5.70d0,  2.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        5.60d0,  2.d0,  0.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        5.60d0,  1.d0,  0.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       -5.40d0,  2.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.90d0,       -4.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.40d0,       -5.10d0,  1.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        5.50d0,  0.d0,  2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -5.40d0,  2.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -5.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 221, 230) /
     .        1.80d0,        3.60d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,-18.d0, 16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        5.30d0,  1.d0, -1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -5.30d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -5.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -5.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -5.19d0,  0.d0,  0.d0,  0.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.00d0,        2.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -8.d0, 13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -5.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        5.07d0,  0.d0,  2.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.90d0,       -4.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .       -5.00d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 231, 240) /
     .        0.00d0,       -5.00d0,  3.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        5.00d0,  1.d0, -1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -5.00d0,  1.d0, -1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -4.90d0,  4.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.90d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -4.90d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.90d0,        3.90d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        4.80d0,  2.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.70d0,       -1.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -4.72d0,  0.d0,  2.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 241, 250) /
     .        0.00d0,        4.71d0,  1.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -4.50d0,  2.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.50d0,       -3.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,-18.d0, 16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -4.50d0,  2.d0, -1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,       -4.11d0,  1.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        4.40d0,  1.d0,  2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -4.40d0,  1.d0, -1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        4.39d0,  2.d0,  0.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -4.30d0,  3.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        4.30d0,  2.d0,  0.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 251, 260) /
     .        0.00d0,       -4.30d0,  0.d0,  1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        4.03d0,  1.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        4.00d0,  0.d0,  2.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,        3.50d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        4.10d0,  3.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        4.00d0,  1.d0,  0.d0, -4.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -4.00d0,  0.d0,  1.d0, -2.d0,  1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -3.91d0,  1.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.90d0,        2.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.90d0,  2.d0, -1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 261, 270) /
     .        0.00d0,        3.90d0,  0.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -3.90d0,  1.d0,  0.d0, -2.d0, -3.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.10d0,       -0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        3.90d0,  2.d0, -1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.90d0,  2.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.20d0,        3.51d0,  1.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -3.60d0,  1.d0,  0.d0, -2.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.10d0,        1.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -3.60d0,  1.d0,  1.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 271, 280) /
     .        0.70d0,        2.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -2.80d0,        0.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -3.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.90d0,       -0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -3.40d0,  1.d0, -1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.40d0,  2.d0,  0.d0, -4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.36d0,  0.d0,  0.d0,  2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.50d0,        2.80d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.60d0,       -0.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        1.00d0,       -2.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 281, 290) /
     .        0.00d0,       -3.30d0,  2.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.30d0,  1.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.23d0,  0.d0,  2.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.20d0,  1.d0, -1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -3.20d0,  0.d0,  2.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -3.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        3.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        2.90d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.08d0,        3.05d0,  0.d0,  0.d0,  2.d0, -2.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.70d0,       -2.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 291, 300) /
     .        0.00d0,       -3.08d0,  1.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        3.00d0,  2.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.60d0,        1.40d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.90d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -2.90d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.50d0,        0.40d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,       -2.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -2.90d0,  1.d0,  0.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.89d0,  0.d0,  1.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.80d0,  2.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 301, 310) /
     .       -2.50d0,        0.30d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.50d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -2.70d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.70d0,        0.00d0,  1.d0,  0.d0, -1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.60d0,  0.d0,  1.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.60d0,  0.d0,  1.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.60d0,  3.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.10d0,        0.50d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.50d0,  0.d0,  1.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.80d0,        1.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 311, 320) /
     .        1.90d0,       -0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -2.50d0,  2.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.40d0,  2.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.40d0,  2.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.40d0,  1.d0,  1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.40d0,  1.d0,  0.d0,  2.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.90d0,        0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.10d0,       -2.30d0,  2.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.30d0,  1.d0,  1.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.30d0,  3.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 321, 330) /
     .       -1.40d0,        0.90d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.10d0,       -2.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.20d0,       -2.00d0,  0.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.20d0,  1.d0, -2.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.20d0,  2.d0, -1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.20d0,  1.d0,  1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -1.80d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        2.20d0,  0.d0,  1.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.20d0,  4.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 331, 340) /
     .       -1.70d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.80d0,       -1.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -1.30d0,       -0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        2.10d0,  1.d0,  0.d0, -2.d0,  1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.10d0,  1.d0, -1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.10d0,  1.d0,  0.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.10d0,  2.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.10d0,  1.d0,  0.d0,  2.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.00d0,  1.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.00d0,  1.d0,  0.d0, -2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 341, 350) /
     .        0.00d0,        2.00d0,  1.d0, -1.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        2.00d0,  2.d0, -2.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -2.00d0,  1.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.00d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        1.10d0,       -0.90d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0, -2.d0,
     .        1.60d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -1.91d0,  1.d0,  0.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.90d0,  0.d0,  0.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.90d0,  0.d0,  0.d0,  4.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.90d0,  3.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 351, 360) /
     .        0.00d0,        1.90d0,  2.d0, -1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.50d0,        0.40d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -4.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.50d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -1.40d0,       -0.50d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -4.d0,
     .                               10.d0,  0.d0,  0.d0,  0.d0,
     .       -1.00d0,        0.90d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,
     .        0.00d0,       -1.90d0,  2.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        1.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        1.90d0,  0.d0,  0.d0,  0.d0,  4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.90d0,  1.d0, -1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.80d0,  2.d0, -1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 361, 370) /
     .        0.00d0,       -1.80d0,  2.d0,  0.d0, -4.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.10d0,        0.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.20d0,       -1.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        1.80d0,  2.d0,  0.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.71d0,  0.d0,  0.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.20d0,       -0.50d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -9.d0, 13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.50d0,        0.20d0,  0.d0,  0.d0,  1.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,       -1.10d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.60d0,        1.10d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.60d0,       -1.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 371, 380) /
     .       -1.10d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.70d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.60d0,  0.d0,  1.d0, -2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.60d0,  2.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.60d0,  0.d0,  0.d0,  2.d0,  3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.20d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.50d0,       -1.10d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.60d0,        1.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -1.30d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.30d0,       -1.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 381, 390) /
     .        0.00d0,        1.60d0,  1.d0,  0.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.60d0,  1.d0,  1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.60d0,  0.d0,  0.d0,  4.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.10d0,       -0.50d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.50d0,  1.d0, -1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.50d0,  0.d0,  1.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.50d0,  2.d0, -1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.50d0,  1.d0,  0.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.50d0,  1.d0,  2.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.50d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 391, 400) /
     .        0.00d0,       -1.50d0,  0.d0,  1.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.30d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -1.20d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -1.40d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.50d0,        1.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,        1.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,       -1.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        1.50d0,  1.d0,  1.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.50d0,  1.d0,  0.d0,  0.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 401, 410) /
     .        0.00d0,        1.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.49d0,  2.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.41d0,  2.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.41d0,  0.d0,  1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.40d0,  0.d0,  0.d0,  2.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.40d0,  1.d0, -2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.40d0,  1.d0,  0.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.40d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -4.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.10d0,       -0.30d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.40d0,  3.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 411, 420) /
     .        0.00d0,        1.40d0,  1.d0,  0.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.40d0,        0.00d0,  0.d0,  0.d0,  1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        1.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -3.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        1.20d0,  2.d0, -1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.30d0,        0.00d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.30d0,  1.d0, -1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.30d0,  1.d0, -2.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.70d0,       -0.60d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  8.d0,-14.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.80d0,        0.50d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  3.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -1.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 421, 430) /
     .        1.10d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -1.30d0,  3.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.30d0,  1.d0,  0.d0, -4.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -1.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -1.29d0,  0.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.20d0,  1.d0,  2.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.20d0,  2.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,       -0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  8.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.20d0,  2.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 431, 440) /
     .        1.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.70d0,       -0.50d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -3.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -1.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.20d0,       -1.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.40d0,        0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.40d0,        0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -1.20d0,  1.d0,  1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.15d0,  0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.10d0,  2.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 441, 450) /
     .       -0.20d0,        0.90d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0, -6.d0,  8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.10d0,        0.00d0,  0.d0,  0.d0,  3.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.10d0,  2.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.10d0,        0.00d0,  1.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.10d0,  2.d0, -1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.10d0,  3.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.60d0,       -0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  1.d0,
     .       -0.90d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.40d0,       -0.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 451, 460) /
     .       -0.50d0,        0.60d0,  1.d0, -2.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.10d0,  3.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.10d0,  1.d0, -1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.00d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -2.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.80d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.00d0,  1.d0,  0.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.00d0,  0.d0,  2.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.00d0,  3.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.00d0,        0.00d0,  1.d0,  0.d0,  1.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 461, 470) /
     .        0.00d0,        1.00d0,  1.d0, -1.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.00d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -9.d0, 15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.00d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.80d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.40d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.40d0,       -0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -9.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -1.00d0,  1.d0,  0.d0,  4.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.00d0,  0.d0,  1.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.00d0,  1.d0,  0.d0, -4.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.00d0,  0.d0,  2.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 471, 480) /
     .        0.00d0,        1.00d0,  2.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -1.00d0,  1.d0,  0.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.91d0,  1.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.80d0,  1.d0, -1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.90d0,  1.d0,  0.d0, -2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.90d0,  0.d0,  1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.90d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.90d0,  1.d0,  2.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.70d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.70d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 481, 490) /
     .       -0.30d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.90d0,  5.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.90d0,  3.d0,  0.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.90d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.90d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.90d0,  1.d0, -1.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.90d0,  1.d0,  0.d0, -2.d0,  4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.90d0,  2.d0,  1.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.90d0,  4.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 491, 500) /
     .        0.00d0,       -0.90d0,  1.d0, -1.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.80d0,  2.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.80d0,  3.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.80d0,  2.d0, -1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.70d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.60d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.20d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.80d0,  0.d0,  0.d0,  4.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 501, 510) /
     .       -0.50d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.50d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.30d0,        0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.80d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  2.d0,
     .       -0.30d0,       -0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.30d0,        0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -3.d0,  7.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,       -0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  3.d0, -7.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.80d0,  0.d0,  1.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.80d0,  3.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 511, 520) /
     .        0.00d0,       -0.80d0,  1.d0,  0.d0, -2.d0, -3.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.80d0,  0.d0,  1.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.80d0,  1.d0,  2.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.80d0,  1.d0,  1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.80d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.76d0,  1.d0,  0.d0,  2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.70d0,  3.d0,  0.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       -0.60d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0, -6.d0,  8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.70d0,  0.d0,  1.d0, -4.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.70d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 521, 530) /
     .        0.00d0,       -0.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.70d0,  0.d0,  1.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.70d0,  4.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.70d0,  2.d0,  0.d0, -2.d0, -3.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.70d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,        0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.50d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,        0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0, 11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.20d0,       -0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 531, 540) /
     .        0.50d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.50d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.70d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.70d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                3.d0,  0.d0,  0.d0,  2.d0,
     .       -0.60d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.60d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.40d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.70d0,  1.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.70d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 541, 550) /
     .        0.00d0,        0.70d0,  2.d0, -1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.70d0,  0.d0,  1.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.70d0,  1.d0, -1.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.60d0,  0.d0,  0.d0,  2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       -0.50d0,  0.d0,  0.d0,  1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.60d0,  2.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.60d0,  1.d0,  0.d0,  0.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  2.d0,  1.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 551, 560) /
     .        0.00d0,        0.60d0,  1.d0,  1.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  0.d0,  1.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  1.d0, -1.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.50d0,        0.10d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -2.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.10d0,       -0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.10d0,        0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.50d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.10d0,        0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.60d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 561, 570) /
     .       -0.40d0,        0.20d0,  2.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.60d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0, -8.d0, 11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.40d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                3.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.30d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.40d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.40d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 571, 580) /
     .        0.00d0,        0.60d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  2.d0,
     .        0.40d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.20d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                3.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,        0.60d0,  4.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  0.d0,  0.d0,  0.d0,  3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.60d0,  3.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.60d0,  1.d0,  1.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  0.d0,  0.d0,  0.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  1.d0,  1.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.60d0,  2.d0,  0.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 581, 590) /
     .        0.00d0,       -0.50d0,  1.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.50d0,  2.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.40d0,  2.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.50d0,  0.d0,  1.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.50d0,  1.d0, -2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.50d0,  2.d0,  1.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.50d0,  1.d0, -2.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,       -0.20d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -6.d0,  8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.30d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -5.d0,  6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 591, 600) /
     .        0.20d0,        0.30d0,  2.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  3.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,       -0.10d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.10d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.50d0,  0.d0,  1.d0, -2.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.50d0,  3.d0, -1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.30d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0,-13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.30d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.50d0,  3.d0, -1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 601, 610) /
     .        0.00d0,        0.50d0,  3.d0, -1.d0, -2.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.50d0,  0.d0,  0.d0,  2.d0,  6.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.50d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0,-12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.50d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.50d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-11.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.50d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.40d0,        0.10d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                               -1.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,       -0.10d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 611, 620) /
     .        0.40d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.40d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.10d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.10d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  4.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.50d0,        0.00d0,  0.d0,  0.d0,  3.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.50d0,  2.d0,  0.d0, -4.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.50d0,  2.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.50d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.50d0,  1.d0,  0.d0,  0.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.50d0,  1.d0,  1.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 621, 630) /
     .        0.50d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.50d0,  1.d0,  0.d0,  0.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.50d0,  1.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  1.d0,  0.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,        0.30d0,  1.d0,  1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  1.d0,  0.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  1.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  0.d0,  2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  1.d0,  0.d0,  0.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 631, 640) /
     .        0.00d0,        0.40d0,  4.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  1.d0, -2.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -8.d0, 15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  1.d0,  0.d0,  4.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  1.d0,  1.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  1.d0,  1.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  2.d0, -2.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       -0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                4.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 641, 650) /
     .        0.20d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.10d0,        0.30d0,  2.d0, -2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.10d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.10d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.40d0,  5.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  3.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  1.d0,  2.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  1.d0, -1.d0, -2.d0, -3.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  0.d0,  0.d0,  4.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 651, 660) /
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -8.d0, 11.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -9.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 661, 670) /
     .        0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-15.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.40d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.40d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.40d0,  4.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 671, 680) /
     .        0.00d0,       -0.40d0,  1.d0, -2.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  1.d0,  2.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  0.d0,  2.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  3.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,        0.30d0,  0.d0,  2.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  1.d0,  1.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  3.d0, -1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.40d0,  2.d0,  0.d0,  2.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.40d0,  2.d0,  0.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 681, 690) /
     .        0.00d0,        0.40d0,  0.d0,  0.d0,  2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.21d0,        0.10d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  2.d0,  0.d0, -4.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0, -2.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  0.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.10d0,  0.d0,  0.d0,  1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  1.d0, -2.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  1.d0, -2.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 691, 700) /
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  2.d0,  0.d0,  0.d0, -3.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0,  1.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.10d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -6.d0,  8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       -0.20d0,  2.d0,  0.d0, -1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  3.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0,  1.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       -0.20d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -3.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  2.d0, -1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0, -1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 701, 710) /
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  0.d0,  1.d0,  0.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -9.d0, 17.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  1.d0,  1.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       -0.20d0,  2.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,        0.20d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,-10.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       -0.10d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -7.d0,  9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.20d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 711, 720) /
     .       -0.20d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,-10.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.10d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -5.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.20d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.30d0,  4.d0,  0.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  2.d0,  1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  4.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,        0.00d0,  2.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 721, 730) /
     .        0.00d0,       -0.30d0,  1.d0,  0.d0,  2.d0,  3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,        0.00d0,  1.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,        0.00d0,  1.d0,  0.d0, -1.d0,  1.d0, -1.d0,
     .                                0.d0,-18.d0, 17.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  1.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0, 20.d0,-20.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  0.d0,  2.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  0.d0,  2.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  0.d0,  1.d0,  2.d0,  3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 731, 740) /
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -2.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  9.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  2.d0,
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  1.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0,
     .       -0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 741, 750) /
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  4.d0,
     .                               -5.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  2.d0,
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  1.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  2.d0,
     .        0.00d0,       -0.30d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0, -1.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 751, 760) /
     .        0.30d0,        0.00d0,  2.d0,  0.d0, -1.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  1.d0,  0.d0,  0.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  1.d0, -1.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  1.d0,  0.d0,  0.d0,  4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  3.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  1.d0, -2.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  0.d0,  1.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0,  0.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  0.d0,  0.d0,  2.d0,  3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 761, 770) /
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  1.d0, -2.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0, -1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  2.d0,  0.d0, -2.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0,  0.d0, -4.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  2.d0,  0.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.30d0,  0.d0,  0.d0,  0.d0,  1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 771, 780) /
     .        0.00d0,       -0.30d0,  0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  0.d0,  1.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.30d0,  1.d0,  1.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.21d0,  0.d0,  1.d0,  2.d0, -2.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  3.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 781, 790) /
     .        0.00d0,       -0.20d0,  0.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  3.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  3.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  0.d0, -3.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                1.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 791, 800) /
     .        0.00d0,        0.20d0,  1.d0,  0.d0, -2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  0.d0, -2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  0.d0,  0.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  1.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  1.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  2.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -5.d0,  6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 801, 810) /
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0, -4.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0, -1.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0, -3.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       -0.10d0,  1.d0, -2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0, -1.d0, -4.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 811, 820) /
     .        0.00d0,        0.20d0,  3.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  0.d0, -3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0,  2.d0, -6.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0, -1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0, -2.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0,  4.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0, -1.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  4.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  4.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  4.d0, -1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 821, 830) /
     .        0.00d0,       -0.20d0,  3.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  3.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  3.d0,  0.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  3.d0,  0.d0, -2.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  2.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  1.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0,  2.d0, -3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0, -2.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  1.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 831, 840) /
     .        0.00d0,       -0.20d0,  1.d0,  1.d0, -2.d0, -3.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  1.d0, -2.d0, -6.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0,  0.d0,  3.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0,  0.d0,  1.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0,  0.d0, -1.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0, -3.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  1.d0,  0.d0, -1.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0, -1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0, -1.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 841, 850) /
     .        0.00d0,        0.20d0,  0.d0,  3.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  4.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -3.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -5.d0,  5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  1.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  1.d0,
     .                               -3.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 851, 860) /
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0, -1.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0,-10.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  7.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 861, 870) /
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  9.d0,-17.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 871, 880) /
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0, -8.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  7.d0, -9.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  5.d0,-10.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -4.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 881, 890) /
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  1.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                               -2.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -5.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -7.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 891, 900) /
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -5.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.10d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,       -0.20d0,  1.d0,  0.d0,  4.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  4.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  1.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  7.d0,-13.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 901, 910) /
     .        0.00d0,        0.20d0,  1.d0, -1.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -8.d0, 11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0,  2.d0, -6.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  2.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  3.d0,  0.d0, -2.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0,  0.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0, -1.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  1.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  1.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 911, 920) /
     .        0.00d0,        0.20d0,  2.d0, -1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  1.d0, -2.d0,  4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0,  0.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0, -1.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0,  0.d0, -4.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0, -2.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0, -2.d0, -6.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  3.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0, -2.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  2.d0, -1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 921, 930) /
     .        0.00d0,        0.20d0,  3.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0, -1.d0,  2.d0, -3.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0, -5.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  1.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  2.d0,  1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  1.d0, -1.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  2.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 931, 940) /
     .        0.00d0,       -0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.20d0,  0.d0,  1.d0,  2.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  0.d0,  0.d0,  1.d0, -1.d0,  2.d0,
     .                                0.d0, -8.d0, 12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.20d0,  1.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.19d0,  0.d0,  1.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.17d0,  0.d0,  1.d0, -2.d0,  2.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.11d0,  1.d0,  0.d0, -2.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  1.d0,  1.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 941, 950) /
     .        0.00d0,       -0.10d0,  0.d0,  1.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.10d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,-10.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,-10.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  1.d0,  0.d0, -2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  2.d0, -1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  0.d0,  2.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  1.d0,  0.d0,  0.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.10d0,  0.d0,  1.d0,  4.d0, -4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  2.d0,  0.d0,  0.d0, -6.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 951, 960) /
     .        0.00d0,       -0.10d0,  3.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  2.d0, -1.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.10d0,  2.d0,  2.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  3.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0, -2.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.10d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0, -2.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.10d0,  2.d0, -1.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY0(i,j),i=1,maxtab),j= 961, 962) /
     .        0.00d0,        0.10d0,  2.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.10d0,  1.d0,  2.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    1
        DATA ((tabY1(i,j),i=1,maxtab),j=   1,  10) /
     .   153041.82d0,      878.89d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    11714.49d0,     -289.32d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     2024.68d0,      -50.99d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    -1837.33d0,       47.75d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .    -1312.21d0,      -28.91d0,  0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -632.54d0,        0.78d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      459.68d0,      -67.23d0,  0.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      344.50d0,        1.46d0,  0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      268.14d0,       -7.03d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      192.06d0,       29.80d0,  0.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  11,  20) /
     .      139.64d0,        0.15d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .     -113.94d0,       -1.06d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      109.81d0,        3.18d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -56.37d0,        0.13d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -56.17d0,       -0.02d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -53.05d0,       -1.23d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -51.60d0,        0.17d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       45.91d0,       -0.11d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -42.45d0,        0.02d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       40.82d0,       -1.03d0,  2.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  21,  30) /
     .       34.30d0,       -1.24d0,  0.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       28.89d0,        0.00d0,  0.d0,  2.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       27.61d0,       -1.22d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -25.43d0,        1.00d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -26.01d0,        0.07d0,  2.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -23.02d0,        0.06d0,  0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       19.37d0,       -0.01d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       14.05d0,       -4.19d0,  0.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       18.18d0,       -0.01d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -14.86d0,       -0.09d0,  0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  31,  40) /
     .       13.49d0,       -0.01d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       12.44d0,       -0.27d0,  0.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       11.46d0,        0.03d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -11.33d0,       -0.06d0,  0.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -9.81d0,        0.01d0,  2.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -9.08d0,       -0.02d0,  1.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.74d0,       -4.56d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .        6.84d0,       -0.04d0,  1.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.73d0,        0.01d0,  0.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        6.54d0,        0.01d0,  1.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  41,  50) /
     .       -6.35d0,       -0.01d0,  0.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        5.90d0,       -0.02d0,  0.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.85d0,        0.02d0,  1.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.73d0,        0.01d0,  2.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        5.60d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.16d0,        0.00d0,  1.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -5.14d0,        0.01d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.76d0,       -0.02d0,  2.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.40d0,        0.02d0,  0.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -4.22d0,        0.00d0,  0.d0,  1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  51,  60) /
     .       -4.20d0,        0.01d0,  1.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.58d0,        0.31d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.87d0,        0.01d0,  0.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.76d0,        0.00d0,  0.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.62d0,       -0.01d0,  2.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.61d0,        0.00d0,  1.d0,  0.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.28d0,       -2.14d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0, -1.d0,
     .       -3.18d0,        0.00d0,  0.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.01d0,        0.00d0,  1.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.97d0,        0.01d0,  1.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  61,  70) /
     .        2.91d0,        0.00d0,  1.d0, -1.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.73d0,        0.00d0,  2.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.58d0,       -0.01d0,  3.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.56d0,       -0.01d0,  1.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.51d0,       -0.01d0,  1.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.35d0,       -0.01d0,  0.d0,  1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.21d0,        0.01d0,  1.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.04d0,        0.01d0,  2.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.94d0,        0.00d0,  2.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.41d0,       -1.43d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  71,  80) /
     .       -1.84d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -1.77d0,        0.01d0,  1.d0,  0.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        1.77d0,  0.d0,  1.d0, -1.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.76d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.07d0,       -0.53d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -8.d0, 12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.48d0,        0.00d0,  0.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.40d0,        0.01d0,  3.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.35d0,       -0.01d0,  1.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.32d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.28d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  81,  90) /
     .        1.24d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.23d0,        0.00d0,  2.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.19d0,        0.00d0,  1.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.18d0,       -0.01d0,  1.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.17d0,        0.00d0,  1.d0, -1.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.15d0,        0.00d0,  1.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.14d0,        0.00d0,  2.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.14d0,        0.00d0,  0.d0,  2.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.09d0,        0.03d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.08d0,        0.00d0,  2.d0,  0.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j=  91, 100) /
     .        1.04d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        1.02d0,        0.00d0,  1.d0,  0.d0, -4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.98d0,       -0.01d0,  2.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.91d0,        0.02d0,  1.d0,  0.d0,  0.d0, -1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.93d0,  1.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.91d0,        0.00d0,  2.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.90d0,        0.00d0,  2.d0,  1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.86d0,        0.00d0,  1.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.84d0,        0.00d0,  1.d0, -1.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.83d0,        0.00d0,  3.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 101, 110) /
     .       -0.82d0,        0.00d0,  0.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.41d0,        0.39d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,       -0.38d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.78d0,        0.00d0,  0.d0,  1.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.74d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.73d0,        0.00d0,  0.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.68d0,        0.00d0,  1.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.66d0,        0.00d0,  1.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.64d0,        0.00d0,  2.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.63d0,        0.00d0,  0.d0,  1.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 111, 120) /
     .        0.63d0,        0.00d0,  0.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.62d0,        0.00d0,  0.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.60d0,        0.00d0,  0.d0,  1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.59d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.59d0,        0.00d0,  0.d0,  1.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.59d0,        0.00d0,  0.d0,  1.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.57d0,        0.00d0,  1.d0,  0.d0, -2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.38d0,       -0.19d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.01d0,       -0.55d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.44d0,       -0.11d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 121, 130) /
     .        0.53d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.53d0,        0.00d0,  1.d0, -1.d0,  0.d0, -1.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        0.00d0,  1.d0, -1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.52d0,        0.00d0,  2.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.53d0,        0.00d0,  0.d0,  1.d0,  0.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.52d0,        0.00d0,  1.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.51d0,        0.00d0,  1.d0,  0.d0, -2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.51d0,        0.00d0,  1.d0, -1.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.21d0,       -0.30d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.50d0,        0.00d0,  0.d0,  1.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 131, 140) /
     .       -0.11d0,        0.37d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.11d0,        0.37d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  6.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.48d0,        0.00d0,  0.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.46d0,       -0.01d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.47d0,        0.00d0,  1.d0, -1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.03d0,        0.43d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  0.d0,
     .        0.45d0,        0.00d0,  3.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,        0.00d0,  0.d0,  0.d0,  0.d0,  4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,        0.00d0,  1.d0,  0.d0,  0.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.44d0,        0.00d0,  1.d0, -1.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 141, 150) /
     .        0.43d0,        0.00d0,  2.d0, -1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.44d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.42d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.42d0,        0.00d0,  1.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.41d0,        0.00d0,  1.d0, -1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.41d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.02d0,        0.39d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.40d0,        0.00d0,  1.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.40d0,        0.00d0,  0.d0,  1.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.39d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 151, 160) /
     .        0.39d0,        0.00d0,  0.d0,  3.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.15d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.37d0,       -0.01d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.37d0,        0.00d0,  1.d0, -1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.37d0,        0.00d0,  0.d0,  0.d0,  2.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.37d0,        0.00d0,  2.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.31d0,        0.06d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.35d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.35d0,        0.00d0,  0.d0,  0.d0,  0.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.07d0,       -0.27d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0, -4.d0,  8.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 161, 170) /
     .       -0.33d0,        0.01d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.33d0,        0.00d0,  2.d0, -1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.07d0,       -0.26d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.33d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.32d0,  1.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  1.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.00d0,  1.d0,  1.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.32d0,        0.00d0,  1.d0,  0.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.24d0,       -0.07d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.07d0,  0.d0,  0.d0,  1.d0, -1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 171, 180) /
     .        0.30d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.08d0,       -0.22d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        0.00d0,  1.d0,  0.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.30d0,        0.00d0,  2.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,        0.00d0,  0.d0,  1.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.30d0,        0.00d0,  1.d0,  0.d0,  2.d0, -1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.29d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.29d0,  1.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,       -0.09d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,-18.d0, 16.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.29d0,        0.00d0,  1.d0,  0.d0,  0.d0,  1.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 181, 190) /
     .       -0.05d0,       -0.24d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  1.d0,
     .        0.29d0,        0.00d0,  0.d0,  0.d0,  0.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.27d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.19d0,       -0.08d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,-10.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.27d0,        0.00d0,  1.d0, -1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.25d0,        0.00d0,  2.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.25d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0, -2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.25d0,        0.00d0,  0.d0,  0.d0,  2.d0,  1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.25d0,        0.00d0,  1.d0,  2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.25d0,        0.00d0,  0.d0,  3.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 191, 200) /
     .       -0.01d0,        0.23d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.23d0,        0.00d0,  1.d0,  0.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.23d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.23d0,        0.00d0,  4.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.15d0,       -0.07d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                               -1.d0,  0.d0,  0.d0,  0.d0,
     .       -0.23d0,        0.00d0,  1.d0,  0.d0, -2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.22d0,        0.00d0,  2.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.22d0,        0.00d0,  0.d0,  1.d0,  2.d0,  1.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.22d0,        0.00d0,  1.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.22d0,        0.00d0,  1.d0,  0.d0,  4.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 201, 210) /
     .        0.04d0,       -0.17d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.21d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0, -5.d0,  6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.08d0,       -0.14d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,        0.19d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                               -5.d0,  0.d0,  0.d0,  1.d0,
     .        0.21d0,        0.00d0,  2.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  1.d0,  0.d0, -2.d0,  1.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  2.d0, -2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,       -0.16d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.19d0,        0.00d0,  0.d0,  2.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.19d0,        0.00d0,  1.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 211, 220) /
     .       -0.19d0,        0.00d0,  2.d0,  0.d0, -2.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.18d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  5.d0, -7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.18d0,        0.00d0,  0.d0,  1.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.18d0,        0.00d0,  1.d0,  0.d0, -4.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.17d0,        0.00d0,  2.d0,  0.d0,  2.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.06d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.13d0,       -0.04d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.11d0,        0.06d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  4.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.17d0,        0.00d0,  0.d0,  0.d0,  2.d0, -3.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.16d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 221, 230) /
     .       -0.17d0,        0.00d0,  0.d0,  0.d0,  4.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.17d0,        0.00d0,  1.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.14d0,        0.02d0,  1.d0,  0.d0,  0.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.14d0,        0.03d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.15d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.15d0,        0.00d0,  1.d0,  1.d0, -2.d0, -4.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.14d0,        0.01d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.16d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.06d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-11.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.05d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0, -2.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 231, 240) /
     .        0.02d0,        0.13d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.11d0,        0.04d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  8.d0,-16.d0,  4.d0,
     .                                5.d0,  0.d0,  0.d0,  2.d0,
     .       -0.12d0,       -0.02d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -5.d0,  7.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.05d0,       -0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  1.d0,
     .        0.14d0,        0.00d0,  1.d0,  0.d0,  2.d0,  4.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.09d0,        0.05d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, 19.d0,-21.d0,  3.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.14d0,  0.d0,  0.d0,  1.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.14d0,        0.00d0,  3.d0,  0.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.14d0,        0.00d0,  1.d0,  1.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.04d0,        0.10d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 241, 250) /
     .       -0.06d0,        0.08d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.05d0,        0.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-15.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.14d0,        0.00d0,  0.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.08d0,        0.06d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.14d0,        0.00d0,  0.d0,  0.d0,  0.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.14d0,        0.00d0,  0.d0,  0.d0,  2.d0, -4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.13d0,        0.00d0,  1.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.07d0,        0.06d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.11d0,       -0.02d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.13d0,        0.00d0,  3.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 251, 260) /
     .       -0.13d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  4.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .       -0.13d0,        0.00d0,  1.d0,  1.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.13d0,        0.00d0,  0.d0,  0.d0,  4.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  3.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.12d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                2.d0,  0.d0,  0.d0,  2.d0,
     .       -0.12d0,        0.00d0,  2.d0,  1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.12d0,  1.d0,  0.d0,  0.d0, -1.d0,  0.d0,
     .                                0.d0, -3.d0,  4.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.02d0,       -0.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  4.d0, -6.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .        0.02d0,       -0.09d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -1.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 261, 270) /
     .       -0.11d0,        0.00d0,  0.d0,  2.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.11d0,        0.00d0,  2.d0,  0.d0,  0.d0, -4.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.07d0,       -0.04d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  3.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.11d0,        0.00d0,  0.d0,  0.d0,  2.d0,  4.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.11d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.11d0,        0.00d0,  3.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  1.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.10d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0, -3.d0,  3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  6.d0, -8.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .        0.10d0,        0.00d0,  2.d0,  1.d0,  0.d0, -4.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY1(i,j),i=1,maxtab),j= 271, 277) /
     .        0.10d0,        0.00d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0,  3.d0, -8.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  3.d0, -2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  2.d0,
     .        0.00d0,        0.10d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  2.d0, -5.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0,
     .       -0.10d0,        0.00d0,  4.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.00d0,  2.d0,  0.d0,  0.d0,  2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,        0.00d0,  1.d0, -1.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  1.d0, -3.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -2.d0/
c       Terms of order    2
        DATA ((tabY2(i,j),i=1,maxtab),j=   1,  10) /
     .      121.15d0,    -2301.27d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.98d0,     -143.27d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.27d0,      -24.46d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,       22.41d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.19d0,       -5.61d0,  0.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        3.57d0,       -1.83d0,  0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,       -5.02d0,  0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,       -3.23d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.48d0,        2.40d0,  0.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.10d0,        1.73d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY2(i,j),i=1,maxtab),j=  11,  20) /
     .       -0.01d0,        1.33d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.04d0,        0.83d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.05d0,       -0.79d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.03d0,       -0.66d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.64d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.04d0,        0.61d0,  2.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.41d0,  0.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,        0.35d0,  0.d0,  2.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.33d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.31d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabY2(i,j),i=1,maxtab),j=  21,  30) /
     .        0.01d0,        0.27d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.07d0,       -0.17d0,  0.d0,  2.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.07d0,        0.17d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,       -0.21d0,  0.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,        0.20d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,       -0.17d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.01d0,       -0.16d0,  0.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,       -0.13d0,  1.d0,  0.d0, -2.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.07d0,       -0.04d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0,  0.d0, -1.d0,  0.d0, -2.d0,
     .                                5.d0,  0.d0,  0.d0,  0.d0,
     .        0.02d0,        0.08d0,  0.d0,  1.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    3
        DATA ((tabY3(i,j),i=1,maxtab),j=   1,   5) /
     .      -15.23d0,       -1.62d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.16d0,       -0.01d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.20d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.18d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.13d0,        0.00d0,  0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    4
        DATA ((tabY4(i,j),i=1,maxtab),j=   1,   1) /
     .       -0.01d0,        0.11d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/

C-----------------------------------------------------------------------C
C         stheta (s+XY/2) CEO DATA  in micro"                           C
C-----------------------------------------------------------------------C
c       Terms of order    0
        DATA ((tabs0(i,j),i=1,maxtab),j=   1,  10) /
     .    -2640.73d0,        0.39d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -63.53d0,        0.02d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -11.75d0,       -0.01d0,  0.d0,  0.d0,  2.d0, -2.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .      -11.21d0,       -0.01d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        4.57d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -2.02d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -1.98d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.72d0,        0.00d0,  0.d0,  0.d0,  0.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.41d0,        0.01d0,  0.d0,  1.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.26d0,        0.01d0,  0.d0,  1.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabs0(i,j),i=1,maxtab),j=  11,  20) /
     .        0.63d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.63d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.46d0,        0.00d0,  0.d0,  1.d0,  2.d0, -2.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.45d0,        0.00d0,  0.d0,  1.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.36d0,        0.00d0,  0.d0,  0.d0,  4.d0, -4.d0,  4.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.24d0,        0.12d0,  0.d0,  0.d0,  1.d0, -1.d0,  1.d0,
     .                                0.d0, -8.d0, 12.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.32d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.28d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.27d0,        0.00d0,  1.d0,  0.d0,  2.d0,  0.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.26d0,        0.00d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabs0(i,j),i=1,maxtab),j=  21,  30) /
     .        0.21d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.19d0,        0.00d0,  0.d0,  1.d0, -2.d0,  2.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.18d0,        0.00d0,  0.d0,  1.d0, -2.d0,  2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.10d0,       -0.05d0,  0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  8.d0,-13.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0, -1.d0,
     .       -0.15d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.14d0,        0.00d0,  2.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.14d0,        0.00d0,  0.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.14d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.14d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.13d0,        0.00d0,  0.d0,  0.d0,  4.d0, -2.d0,  4.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabs0(i,j),i=1,maxtab),j=  31,  33) /
     .        0.11d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  4.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.11d0,        0.00d0,  1.d0,  0.d0, -2.d0,  0.d0, -3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.11d0,        0.00d0,  1.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    1
        DATA ((tabs1(i,j),i=1,maxtab),j=   1,   3) /
     .       -0.07d0,        3.57d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.71d0,       -0.03d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.48d0,  0.d0,  0.d0,  2.d0, -2.d0,  3.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    2
        DATA ((tabs2(i,j),i=1,maxtab),j=   1,  10) /
     .      743.65d0,       -0.17d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       56.91d0,        0.06d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        9.84d0,       -0.01d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -8.85d0,        0.01d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -6.38d0,       -0.05d0,  0.d0,  1.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -3.07d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        2.23d0,        0.00d0,  0.d0,  1.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.67d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        1.30d0,        0.00d0,  1.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.93d0,        0.00d0,  0.d0,  1.d0, -2.d0,  2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabs2(i,j),i=1,maxtab),j=  11,  20) /
     .        0.68d0,        0.00d0,  1.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.55d0,        0.00d0,  0.d0,  0.d0,  2.d0, -2.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.53d0,        0.00d0,  1.d0,  0.d0, -2.d0,  0.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.27d0,        0.00d0,  0.d0,  0.d0,  0.d0,  2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.27d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.26d0,        0.00d0,  1.d0,  0.d0, -2.d0, -2.d0, -2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.25d0,        0.00d0,  1.d0,  0.d0,  0.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.22d0,        0.00d0,  1.d0,  0.d0,  2.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.21d0,        0.00d0,  2.d0,  0.d0,  0.d0, -2.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.20d0,        0.00d0,  2.d0,  0.d0, -2.d0,  0.d0, -1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
        DATA ((tabs2(i,j),i=1,maxtab),j=  21,  25) /
     .        0.17d0,        0.00d0,  0.d0,  0.d0,  2.d0,  2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.13d0,        0.00d0,  2.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.13d0,        0.00d0,  2.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.12d0,        0.00d0,  1.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.11d0,        0.00d0,  0.d0,  0.d0,  2.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    3
        DATA ((tabs3(i,j),i=1,maxtab),j=   1,   4) /
     .        0.30d0,      -22.36d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.03d0,       -1.39d0,  0.d0,  0.d0,  2.d0, -2.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .       -0.01d0,       -0.24d0,  0.d0,  0.d0,  2.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,
     .        0.00d0,        0.22d0,  0.d0,  0.d0,  0.d0,  0.d0,  2.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
c       Terms of order    4
        DATA ((tabs4(i,j),i=1,maxtab),j=   1,   1) /
     .       -0.26d0,       -0.01d0,  0.d0,  0.d0,  0.d0,  0.d0,  1.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0,  0.d0,
     .                                0.d0,  0.d0,  0.d0,  0.d0/
C------------------------------------------------------------------------C


        tps2 = tps**2
        tps3 = tps2 * tps
        tps4 = tps2**2
        tps5 = tps4 * tps

C------------------------------------------------------------------------C
C         Fundamental Arguments of the IAU 2000 Theory of Nutation       C
C         IERS conventions (2000), p.??        units: "                  C
C------------------------------------------------------------------------C
        angle(1)= (134.96340251d0 * 3600.d0)+ 1717915923.2178d0*tps +
     @           31.8792d0*tps2 + 0.051635d0*tps3 - 0.00024470d0*tps4
        angle(2)= (357.52910918d0 * 3600.d0) + 129596581.0481d0*tps -
     @           0.5532d0*tps2 + 0.000136d0*tps3 - 0.00001149d0*tps4
        angle(3)= (93.27209062d0 * 3600.d0) + 1739527262.8478d0*tps -
     @           12.7512d0*tps2 - 0.001037d0*tps3 + 0.00000417d0*tps4
        angle(4)= (297.85019547d0 * 3600.d0)+ 1602961601.2090d0*tps -
     @           6.3706d0*tps2 + 0.006593d0*tps3 - 0.00003169d0*tps4
        angle(5)= (125.04455501d0 * 3600.d0) - 6962890.5431d0*tps +
     @           7.4722d0*tps2 + 0.007702d0*tps3 - 0.00005939*tps4

        DO i = 1,5
          angle(i) = angle(i) * secrad            ! transformation in radians
        ENDDO

C------------------------------------------------------------------------C
C         Mean longitude of the planets IAU 2000 Theory of Nutation      C
C         IERS conventions (2000), p.??        units: radians            C
C------------------------------------------------------------------------C
        angle(6)= 4.402608842d0 + 2608.7903141574d0*tps
        angle(7)= 3.176146697d0 + 1021.3285546211d0*tps
        angle(8)= 1.753470314d0 + 628.3075849991d0*tps
        angle(9)= 6.203480913d0 + 334.0612426700d0*tps
        angle(10)= 0.599546497d0 + 52.9690962641d0*tps
        angle(11)= 0.874016757d0 + 21.3299104960d0*tps
        angle(12)= 5.481293872d0 + 7.4781598567d0*tps
        angle(13)= 5.311886287d0 + 3.8133035638d0*tps
        angle(14)= 0.024381750d0*tps + 0.00000538691d0*tps2

C-----------------------------------------------------------------------C
C         X CIP computation  micro"                                     C
C-----------------------------------------------------------------------C
        ! Polynomial terms
        X = -16616.99d0 + 2004191742.88d0 * tps - 427219.05d0 * tps2
     .       - 198620.54d0 * tps3 - 46.05d0 * tps4 + 5.98d0 * tps5

        ! Periodical terms
        DO i=1,1306
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabX0(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          X = X + tabX0(1,i) * DSIN(ang) + tabX0(2,i) * DCOS(ang)
        ENDDO

        ! Poisson terms of order 1
        DO i=1,252
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabX1(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          X = X + (tabX1(1,i) * DSIN(ang) + tabX1(2,i) * DCOS(ang)) * tps
        ENDDO

        ! Poisson terms of order 2
        DO i=1,36
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabX2(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          X = X + (tabX2(1,i) * DSIN(ang) + tabX2(2,i) * DCOS(ang)) * tps2
        ENDDO 

        ! Poisson terms of order 3
        DO i=1,4
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabX3(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          X = X + (tabX3(1,i) * DSIN(ang) + tabX3(2,i) * DCOS(ang)) * tps3
        ENDDO

        ! Poisson terms of order 4                 (one term only)
        ang = 0.d0
        DO j=1,maxang
          ang = ang + angle(j) * tabX4(j+2,1)
        ENDDO
        ang = DMOD(ang, tpi)
        X = X + (tabX4(1,1) * DSIN(ang) + tabX4(2,1) * DCOS(ang)) * tps4

C-----------------------------------------------------------------------C
C         Y CIP computation  micro"                                     C
C-----------------------------------------------------------------------C
        ! Polynomial terms
        Y = -6950.78d0 - 25381.99d0 * tps - 22407250.99d0 * tps2
     .       + 1842.28d0 * tps3 + 1113.06d0 * tps4 + 0.99d0 * tps5

        ! Periodical terms
        DO i=1,952
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabY0(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          Y = Y + tabY0(1,i) * DSIN(ang) + tabY0(2,i) * DCOS(ang)
        ENDDO

        ! Poisson terms of order 1
        DO i=1,277
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabY1(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          Y = Y + (tabY1(1,i) * DSIN(ang) + tabY1(2,i) * DCOS(ang)) * tps
        ENDDO

        ! Poisson terms of order 2
        DO i=1,30
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabY2(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          Y = Y + (tabY2(1,i) * DSIN(ang) + tabY2(2,i) * DCOS(ang)) * tps2
        ENDDO

        ! Poisson terms of order 3
        DO i=1,5
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabY3(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          Y = Y + (tabY3(1,i) * DSIN(ang) + tabY3(2,i) * DCOS(ang)) * tps3
        ENDDO

        ! Poisson terms of order 4                 (one term only)
        ang = 0.d0
        DO j=1,maxang
          ang = ang + angle(j) * tabY4(j+2,1)
        ENDDO
        ang = DMOD(ang, tpi)
        Y = Y + (tabY4(1,1) * DSIN(ang) + tabY4(2,1) * DCOS(ang)) * tps4

C-----------------------------------------------------------------------C
C         Computation of stheta (s+XY/2) micro"                         C
C-----------------------------------------------------------------------C
        ! Polynomial terms
        stheta = 94.0d0 + 3808.35d0 * tps - 119.94d0 * tps2
     .           - 72574.09d0 * tps3 + 27.70d0 * tps4 + 15.61d0 * tps5

        ! Periodical terms
        DO i=1,33
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabs0(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          stheta = stheta + tabs0(1,i) * DSIN(ang) + tabs0(2,i) * DCOS(ang)
        ENDDO

        ! Poisson terms of order 1
        DO i=1,3
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabs1(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          stheta = stheta + (tabs1(1,i)*DSIN(ang) + tabs1(2,i)*DCOS(ang))* tps
        ENDDO

        ! Poisson terms of order 2
        DO i=1,25
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabs2(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          stheta = stheta + (tabs2(1,i)*DSIN(ang) + tabs2(2,i)*DCOS(ang))* tps2
        ENDDO

        ! Poisson terms of order 3
        DO i=1,4
          ang = 0.d0
          DO j=1,maxang
            ang = ang + angle(j) * tabs3(j+2,i)
          ENDDO
          ang = DMOD(ang, tpi)
          stheta = stheta + (tabs3(1,i)*DSIN(ang) + tabs3(2,i)*DCOS(ang))* tps3
        ENDDO

        ! Poisson terms of order 4                 (one term only)
        ang = 0.d0
        DO j=1,maxang
          ang = ang + angle(j) * tabs4(j+2,1)
        ENDDO
        ang = DMOD(ang, tpi)
        stheta = stheta + (tabs4(1,1)*DSIN(ang) + tabs4(2,1)*DCOS(ang))* tps4

C-----------------------------------------------------------------------C
C         ! Transformation in "                                         C
C-----------------------------------------------------------------------C
        X = X * 1.d-06
        Y = Y * 1.d-06
        stheta = stheta * 1.d-06

      END
C=======================================================================C

       SUBROUTINE dmvtpole (sp, x1, xp, yp, dxqdxp, dxqdyp)
C-----------------------------------------------------------------------C
C  ROUTINE TO compute the partial derivative of XQ with respect to the	C
C  pole coordinates (xp, yp).						C
C-----------------------------------------------------------------------C
C									C
C  INPUT:                                                               C
C     sp=  TEO displacement (in radian)                                 C
C     xp, yp= "polar coordinates" of the CIP in the TRS  (in arcsecond) C
C     x1(3,3): transformation matrix, xpn * xtheta (in radian)          C
C									C
C  OUTPUT:                                                              C
C     dxqdxp(3,3), dxqdyp(3,3): matrices of the partial derivatives     C
C		of the transformation matrix XQ with respect to the     C
C		celestial pole coordinates xp, yp (without dimension)	C
C									C
C     COMMON / conversion /                                             C
C       tpi= 2*pi                                                       C
C       secrad= arc second in radian                                    C
C       degrad= degrees in radian                                       C
C                                                                       C
C   SUBROUTINE INTERFACE:						C
C	caller subroutine: nro_transf					C
C	called subroutines: rota, drota, mulmat	                        C
C									C
C     Author: Anne-Marie.Gontier@obspm.fr                               C
C     Date:   8 december 2002                                           C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??  C
C-----------------------------------------------------------------------C
        IMPLICIT NONE
        DOUBLE PRECISION x1, xp, yp, sp, dxqdxp, dxqdyp
        DIMENSION x1(3,3), dxqdxp(3,3), dxqdyp(3,3)
        DOUBLE PRECISION tpi, secrad, degrad

C--------------LOCAL VARIABLES------------------------------------------C
        DOUBLE PRECISION xprd, yprd
        DOUBLE PRECISION xmat1, xmat2, dmat, xmat
        DIMENSION xmat1(3,3), xmat2(3,3), dmat(3,3), xmat(3,3)

        COMMON/conversion/tpi,secrad,degrad


         xprd = xp * secrad
         yprd = yp * secrad
 
         CALL rota (1, yprd, xmat1)
         CALL rota (3, -sp, xmat)
         CALL drota (2, xprd, dmat)

         CALL mulmat (x1, xmat, xmat2, 3, 3, 3)
         CALL mulmat (xmat2, xmat1, xmat, 3, 3, 3)
         CALL mulmat (xmat, dmat, dxqdxp, 3, 3, 3)

         CALL rota (2, xprd, xmat1)
         CALL drota (1, yprd, dmat)
         CALL mulmat (xmat2, dmat, xmat, 3, 3, 3)
         CALL mulmat (xmat, xmat1, dxqdyp, 3, 3, 3)

        END
C=======================================================================C


       SUBROUTINE dangstellair (ak, theta, xpn, xyp, dxqdut1)
C-----------------------------------------------------------------------C
C  ROUTINE TO compute the partial derivate of XQ with respect to UT1    C
C-----------------------------------------------------------------------C
C									C
C  INPUT:                                                               C
C       ak=  constant                                                   C
C       theta= Earth rotation angle   (in radian)                       C
C	xpn(3,3): Precession-Nutation matrix  (in radian)               C
C       xyp(3,3): polar motion matrix  (in radian)                      C
C									C
C  OUTPUT:                                                              C
C        dxqdut1(3,3): matrix of the partial derivatives of the 	C
C		transformation matrix XQ with respect to UT1            C
C		(without dimension)					C
C									C
C  SUBROUTINE INTERFACE:						C
C	caller subroutine: nro_transf					C
C	called subroutines: drota, mulmat, scalmat			C
C									C
C     Author: Anne-Marie.Gontier@obspm.fr                               C
C     Date:   8 december 2002                                           C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??  C
C-----------------------------------------------------------------------C

        IMPLICIT NONE
        DOUBLE PRECISION xpn, xyp, theta, ak, dxqdut1
        DIMENSION xpn(3,3), xyp(3,3), dxqdut1(3,3)

C---------------LOCAL VARIABLES-----------------------------------------C
        DOUBLE PRECISION dtheta, xmat
        DIMENSION dtheta(3,3), xmat(3,3)


         CALL drota (3, -theta, dtheta)
         CALL mulmat (xpn, dtheta, xmat, 3, 3, 3)
         CALL mulmat (xmat, xyp, dxqdut1, 3, 3, 3)
         CALL scalmat (-ak, dxqdut1, dxqdut1, 3, 3)

        END
C=======================================================================C


       SUBROUTINE dmatm1 (stheta, x, y, xtheta, xyp, dxqdx, dxqdy)
C-----------------------------------------------------------------------C
C  ROUTINE TO compute the partial derivative of the matrix M1, directly	C
C  function of X and Y. M1 = ???????? see Capitaine (1990) and          C
C  Capitaine and Gontier (1991).                                        C
C-----------------------------------------------------------------------C
C									C
C  INPUT:                                                               C
C       stheta: s+XY/2, CEO displacement  (in arcsecond)                C
C	x, y= celestial coordinates of the CIP  (in arcsecond)          C
C	xtheta(3,3): Earth rotation matrix  (in radian)                 C
C       xyp(3,3): polar motion matrix  (in radian)                      C
C									C
C  OUTPUT:                                                              C
C       dxqdx(3,3), dxqdy(3,3): matrices of the partial derivatives 	C
C               of the transformation matrix XQ with respect to the     C
C               the celestial pole coordinates X, Y (without dimension)	C
C									C
C     COMMON / conversion /                                             C
C       tpi= 2*pi                                                       C
C       secrad= arc second in radian                                    C
C       degrad= degrees in radian                                       C
C									C
C  SUBROUTINE INTERFACE:						C
C	   caller subroutine: nro_transf				C
C	   called subroutines: rota, mulmat				C
C									C
C     Author: Anne-Marie.Gontier@obspm.fr                               C
C     Date:   8 december 2002                                           C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??  C
C-----------------------------------------------------------------------C

        IMPLICIT NONE
        DOUBLE PRECISION x, y, stheta, xtheta, xyp, dxqdx, dxqdy
        DIMENSION xtheta(3,3), xyp(3,3), dxqdx(3,3), dxqdy(3,3)
        DOUBLE PRECISION tpi, secrad, degrad

C-------------LOCAL VARIABLES-------------------------------------------C
        DOUBLE PRECISION xr, yr, x2, x3, x4, y2, xmat, xmat1, xmat2, sthetar
        DIMENSION xmat(3,3), xmat1(3,3), xmat2(3,3)

        COMMON/conversion/tpi,secrad,degrad


         xr = x * secrad
         yr = y * secrad
         sthetar = stheta * secrad
         x2 = xr**2
         x3 = x2 * xr
         x4 = x2**2
         y2 = yr**2

         dxqdx(1,1) = -xr - x3 / 2.d0
         dxqdx(1,2) = -yr
         dxqdx(1,3) = 1.d0
         dxqdx(2,1) = 0.d0
         dxqdx(2,2) = 0.d0
         dxqdx(2,3) = 0.d0
         dxqdx(3,1) = -1.d0 - y2 / 2.d0
         dxqdx(3,2) = yr * xr
         dxqdx(3,3) = -xr - x3 / 2.d0

         dxqdy(1,1) = -(x2 * yr) / 4.d0
         dxqdy(1,2) = -xr
         dxqdy(1,3) = 0.d0
         dxqdy(2,1) = 0.d0
         dxqdy(2,2) = -yr - (x2 * yr) / 4.d0
         dxqdy(2,3) = 1.d0
         dxqdy(3,1) = -xr * yr
         dxqdy(3,2) = -1.d0 + x2 / 2.d0 + x4 / 8.d0
         dxqdy(3,3) = -yr - (x2 * yr) / 2.d0

         CALL rota (3,sthetar,xmat)
         CALL mulmat (dxqdx, xmat, xmat1, 3, 3, 3)
         CALL mulmat (dxqdy, xmat, xmat2, 3, 3, 3)
         CALL mulmat (xtheta, xyp, xmat, 3, 3, 3)
         CALL mulmat (xmat1, xmat, dxqdx, 3, 3, 3)
         CALL mulmat (xmat2, xmat, dxqdy, 3, 3, 3)

        END
C=======================================================================C


       SUBROUTINE dprecnut (E, D, s, X, Y, xtheta, xyp, dxqdx, dxqdy)
C-----------------------------------------------------------------------C
C  ROUTINE TO compute the partial derivative of the transformation      C
C  matrix express as a product of 4 rotation matrices with respect to   C
C  celestial pole coordinates X, Y.                                     C
C-----------------------------------------------------------------------C
C									C
C  INPUT:                                                               C
C       E, D: angle of the CIP in the CRS  (in radian)                  C
C       s: stheta-XY/2, CEO displacement  (in radian)                   C
C       X, Y= celestial coordinates of the CIP  (in arcsecond)          C
C       xtheta(3,3): Earth rotation matrix  (in radian)                 C
C       xyp(3,3): polar motion matrix  (in radian)                      C
C									C
C  OUTPUT:                                                              C
C       dxqdx(3,3), dxqdy(3,3): matrices of the partial derivatives     C
C               of the transformation matrix XQ with respect to the     C
C               the celestial pole coordinates X, Y (without dimension) C
C                                                                       C
C     COMMON / conversion /                                             C
C       tpi= 2*pi                                                       C
C       secrad= arc second in radian                                    C
C       degrad= degrees in radian                                       C
C									C
C  SUBROUTINE INTERFACE:						C
C	   caller subroutine: nro_transf				C
C	   called subroutines: rota, drota, mulmat, scalmat, admat	C
C									C
C     Author: Anne-Marie.Gontier@obspm.fr                               C
C     Date:   8 december 2002                                           C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??  C
C-----------------------------------------------------------------------C

        IMPLICIT NONE
        DOUBLE PRECISION xtheta, xyp, E, D, s, X, Y, dxqdx, dxqdy
        DIMENSION xtheta(3,3), xyp(3,3), dxqdx(3,3), dxqdy(3,3)
        DOUBLE PRECISION tpi, secrad, degrad

C--------------LOCAL VARIABLES------------------------------------------C
        DOUBLE PRECISION xa, ya, x2, y2, v2, z, dEdx, dEdy, zv, dddx, dddy
        DOUBLE PRECISION dsdx, dsdy, xmat1, xmat2, xmat3, pas1, pas2
        DIMENSION xmat1(3,3),xmat2(3,3),xmat3(3,3), pas1(3,3), pas2(3,3)

        COMMON/conversion/tpi,secrad,degrad


         xa = X * secrad
         ya = Y * secrad
         x2 = xa**2
         y2 = ya**2
         v2 = x2 + y2
         z = DSQRT(1.D0 - v2)

         dEdx = -ya / v2
         dEdy = xa / v2

         zv = z * DSQRT(v2)

         dddx = -xa / zv
         dddy = -ya / zv
         dsdx = -ya / 2.d0
         dsdy = -xa / 2.d0

         CALL rota (3, E, xmat3)
         CALL rota (2, -D, xmat2)
         CALL mulmat (xmat2, xmat3, xmat1, 3, 3, 3)
         CALL drota (3,-E,dxqdx)
         CALL mulmat (dxqdx, xmat1 ,xmat2, 3, 3, 3)
         CALL scalmat (-dEdx, xmat2, pas1, 3, 3)
         CALL scalmat (-dEdy, xmat2, pas2, 3, 3)

         CALL drota (2, -D, dxqdx)
         CALL mulmat (dxqdx, xmat3, xmat1, 3, 3, 3)
         CALL rota (3, -E, xmat3)
         CALL mulmat (xmat3, xmat1, xmat2, 3, 3, 3)
         CALL scalmat (-dddx, xmat2, xmat1, 3, 3)
         CALL scalmat (-dddy, xmat2, xmat2, 3, 3)
         CALL admat (pas1, xmat1, pas1, 3, 3)
         CALL admat (pas2, xmat2, pas2, 3, 3)

         CALL drota (3, E, dxqdx)
         CALL rota (2, -D, xmat2)
         CALL mulmat (xmat2, dxqdx, xmat1, 3, 3, 3)
         CALL mulmat (xmat3, xmat1, xmat2, 3, 3, 3)
         CALL scalmat (dEdx, xmat2, xmat1, 3, 3)
         CALL scalmat (dEdy, xmat2, xmat2, 3, 3)
         CALL admat (pas1, xmat1, pas1, 3, 3)
         CALL admat (pas2, xmat2, pas2, 3, 3)

         CALL rota (3, s, dxqdx)
         CALL mulmat (pas1, dxqdx, xmat1, 3, 3, 3)
         CALL mulmat (pas2, dxqdx, xmat2, 3, 3, 3)

         CALL rota (2, -D, pas2)
         CALL mulmat (xmat3, pas2, pas1, 3, 3, 3)
         CALL rota (3, E, xmat3)
         CALL mulmat (pas1, xmat3, pas2, 3, 3, 3)
         CALL drota (3, s, dxqdx)
         CALL mulmat (pas2, dxqdx, xmat3, 3, 3, 3)
         CALL scalmat (dsdx, xmat3, pas1, 3, 3)
         CALL scalmat (dsdy, xmat3, pas2, 3, 3)
         CALL admat (xmat1, pas1, xmat1, 3, 3)
         CALL admat (xmat2, pas2, xmat2, 3, 3)

         CALL mulmat (xtheta, xyp, xmat3, 3, 3, 3)
         CALL mulmat (xmat1, xmat3, dxqdx, 3, 3, 3)
         CALL mulmat (xmat2, xmat3, dxqdy, 3, 3, 3)

        END
C=======================================================================C


      SUBROUTINE rota (iaxe, angl, rotmat)
C-------------------------------------------------------------------------C
C   ROUTINE TO compute rotation matrix about iaxe-axis by an angle (angl) C
C	iaxe=1 ==> axis X,  iaxe=2 ==> axis Y,  iaxe=3 ==> axis Z	  C
C-------------------------------------------------------------------------C
C                                                                         C
C  INPUT:                                                                 C
C      iaxe: axe number (= 1,2,3)                                         C
C      angl: angle of rotation  (in radian)                               C
C                                                                         C
C  OUTPUT:                                                                C
C      rotmat(3,3): rotation matrix  (without dimension)                  C
C                                                                         C
C  SUBROUTINE INTERFACE :                                                 C
C      caller subroutine : mvtpole, X, Y, S angstellaire, precnut                 C
C                                                                         C
C     Author: Anne-Marie.Gontier@obspm.fr                                 C
C     Date:   8 december 2002                                             C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??    C
C-------------------------------------------------------------------------C

       IMPLICIT NONE
       INTEGER iaxe
       DOUBLE PRECISION angl, rotmat(3,3)

C---------------LOCAL VARIABLES-----------------------------------------C
       DOUBLE PRECISION cangl, sangl


        IF ((iaxe.GE.1).AND.(iaxe.LE.3)) THEN
          cangl = dcos(angl)
          sangl = dsin(angl)
          IF ((ABS(cangl)).LE.1.d-15) THEN
            cangl = 0.d0
          ELSE
            IF ((ABS(sangl)).LE.1.d-15) THEN
              sangl = 0.d0
            ENDIF
          ENDIF

          IF (iaxe.EQ.1) THEN
            rotmat(1,1) = 1.d0
            rotmat(1,2) = 0.d0
            rotmat(1,3) = 0.d0

            rotmat(2,1) = 0.d0
            rotmat(2,2) = cangl
            rotmat(2,3) = sangl

            rotmat(3,1) = 0.d0
            rotmat(3,2) = -sangl
            rotmat(3,3) = cangl
          ELSE
            IF (iaxe.EQ.2) THEN
              rotmat(1,1) = cangl
              rotmat(1,2) = 0.d0
              rotmat(1,3) = -sangl

              rotmat(2,1) = 0.d0
              rotmat(2,2) = 1.d0
              rotmat(2,3) = 0.d0

              rotmat(3,1) = sangl
              rotmat(3,2) = 0.d0
              rotmat(3,3) = cangl
            ELSE
              rotmat(1,1) = cangl
              rotmat(1,2) = sangl
              rotmat(1,3) = 0.d0

              rotmat(2,1) = -sangl
              rotmat(2,2) = cangl
              rotmat(2,3) = 0.d0

              rotmat(3,1) = 0.d0
              rotmat(3,2) = 0.d0
              rotmat(3,3) = 1.d0
            ENDIF
          ENDIF
        ELSE
          PRINT*,'the rotation about the axis ',iaxe,' is not defined'
        ENDIF

      END
C=======================================================================C


       SUBROUTINE drota (iaxe, angl, dmatrot)
C-----------------------------------------------------------------------C
C  ROUTINE TO compute the partial derivative of the rotation matrix     C 
C  about an axis (1=X, 2=Y, 3=Z) by an angle (angl)                     C 
C-----------------------------------------------------------------------C
C									C
C  INPUT:                                                               C
C      iaxe: axis from which the matrix is derivated			C
C	       =1 ==> axis X;   =2 ==> axis Y;    =3 ==> axis Z         C
C      angl: angle from which the matrix is derivated  (in radian)      C
C									C
C  OUTPUT:                                                              C
C      dmatrot(3,3): derivative matrix of the rotation matrix           C
C									C
C  SUBROUTINE INTERFACE:                                                C
C      caller subroutine: dangstellair, dmvtpole, dprecnut		C
C									C
C     Author: Anne-Marie.Gontier@obspm.fr                               C
C     Date:   8 december 2002                                           C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??  C
C-----------------------------------------------------------------------C

        IMPLICIT NONE
        INTEGER iaxe
        DOUBLE PRECISION angl, dmatrot
        DIMENSION dmatrot(3,3)

C--------------LOCAL VARIABLES------------------------------------------C
        DOUBLE PRECISION cangl, sangl


         IF ((iaxe.GE.1).AND.(iaxe.LE.3)) THEN
           cangl = DCOS(angl)
           sangl = DSIN(angl)
           IF ((ABS(cangl)).LE.1.d-15) THEN
             cangl = 0.d0
           ELSE
             IF ((ABS(sangl)).LE.1.d-15) THEN
               sangl = 0.d0
             ENDIF
           ENDIF

           IF (iaxe.EQ.1) THEN
             dmatrot(1,1) = 0.d0
             dmatrot(1,2) = 0.d0
             dmatrot(1,3) = 0.d0

             dmatrot(2,1) = 0.d0
             dmatrot(2,2) = -sangl
             dmatrot(2,3) = cangl

             dmatrot(3,1) = 0.d0
             dmatrot(3,2) = -cangl
             dmatrot(3,3) = -sangl
           ELSE
             IF (iaxe.EQ.2) THEN
               dmatrot(1,1) = -sangl
               dmatrot(1,2) = 0.d0
               dmatrot(1,3 )= -cangl

               dmatrot(2,1) = 0.d0
               dmatrot(2,2) = 0.d0
               dmatrot(2,3) = 0.d0

               dmatrot(3,1) = cangl
               dmatrot(3,2) = 0.d0
               dmatrot(3,3) = -sangl
             ELSE
               dmatrot(1,1) = -sangl
               dmatrot(1,2) = cangl
               dmatrot(1,3) = 0.d0

               dmatrot(2,1) = -cangl
               dmatrot(2,2) = -sangl
               dmatrot(2,3) = 0.d0

               dmatrot(3,1) = 0.d0
               dmatrot(3,2) = 0.d0
               dmatrot(3,3) = 0.d0
             ENDIF
           ENDIF
         ELSE
           PRINT*,'the rotation about the axis ',iaxe,' is not defined'
         ENDIF
 
        END
C=======================================================================C


      SUBROUTINE mulmat (x1 ,x2 ,xr, ni, nc, nj)
C-------------------------------------------------------------------------C
C   ROUTINE TO compute multiplication of matrices                         C
C            xr(ni,nj) = x1(ni,nc) * x2(nc,nj)                            C
C-------------------------------------------------------------------------C
C                                                                         C
C  INPUT:                                                                 C
C      x1(ni,nc), x2(nc,nj): input matrices                               C
C      ni, nc: number of line of matrices x1 and x2 respectively          C
C      nj: number of colum of matrix x2                                   C
C                                                                         C
C  OUTPUT:                                                                C
C      xr(ni,nj): output matrix                                           C
C                                                                         C
C  SUBROUTINE INTERFACE :                                                 C
C      caller subroutine : nro_transf, mvtpole, precnut                   C
C                                                                         C
C     Author: Anne-Marie.Gontier@obspm.fr                                 C
C     Date:   8 december 2002                                             C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??    C
C-------------------------------------------------------------------------C

       IMPLICIT NONE
       INTEGER ni, nc, nj
       DOUBLE PRECISION x1(ni,nc), x2(nc,nj), xr(ni,nj)

C---------------LOCAL VARIABLES-----------------------------------------C
       INTEGER i, j, k
       DOUBLE PRECISION cal


        DO i=1,ni
          DO j=1,nj
            cal = 0.d0
            DO k=1,nc
              cal = cal + x1(i,k) * x2(k,j)
            ENDDO
            xr(i,j) = cal
          ENDDO
        ENDDO 

      END
C=======================================================================C


       SUBROUTINE scalmat (scalar, mat, rmat, ni, nj)
C-----------------------------------------------------------------------C
C  ROUTINE TO multiply a matrix by a scalar				C
C-----------------------------------------------------------------------C
C									C
C  INPUT:                                                               C
C      scalar: scalar number                                            C
C      mat(ni,nj): matrix						C
C      ni: number of lines of the matrix xmat and of the matrix rmat    C
C      nj: number of columns of the matrix xmat and of the matrix rmat  C
C									C
C  OUTPUT:                                                              C
C      rmat(ni,nj): result matrix                                       C
C									C
C  SUBROUTINE INTERFACE:                                                C
C      caller subroutine: dangstellair, dprecnut			C
C                                                                       C
C     Author: Anne-Marie.Gontier@obspm.fr                               C
C     Date:   8 december 2002                                           C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??  C
C-----------------------------------------------------------------------C

        IMPLICIT NONE
        INTEGER ni, nj
        DOUBLE PRECISION scalar, mat, rmat
        DIMENSION mat(ni,nj), rmat(ni,nj)

C--------------LOCAL VARIABLE-------------------------------------------C
        INTEGER k, m


         DO k = 1,ni
           DO m = 1,nj
             rmat(k,m) = mat(k,m) * scalar
           ENDDO
         ENDDO
       END
C=======================================================================C


       SUBROUTINE admat (mat1, mat2, rmat, ni, nj)
C-----------------------------------------------------------------------C
C  ROUTINE TO compute the sum of two matrices				C
C-----------------------------------------------------------------------C
C									C
C  INPUT:                                                               C
C      mat1(ni,nj), mat2(ni,nj): input matrices                         C
C      ni: number of lines of mat1, mat2 and rmat                       C
C      nj: number of columns of mat1, mat2 and rmat                     C
C									C
C  OUTPUT:                                                              C
C      rmat(ni,nj): sum matrix of the two matrices mat1 and mat2	C
C									C
C  SUBROUTINE INTERFACE:                                                C
C      caller subroutine: dprecnut					C
C                                                                       C
C     Author: Anne-Marie.Gontier@obspm.fr                               C
C     Date:   8 december 2002                                           C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??  C
C-----------------------------------------------------------------------C

        IMPLICIT NONE
        INTEGER ni, nj
        DOUBLE PRECISION mat1, mat2, rmat
        DIMENSION mat1(ni,nj), mat2(ni,nj), rmat(ni,nj)

C-------------LOCAL VARIABLES-------------------------------------------C
        INTEGER i, j


         DO i = 1,ni
           DO j = 1,nj
             rmat(i,j) = mat1(i,j) + mat2(i,j)
           ENDDO
         ENDDO
	
       END
C=======================================================================C


      FUNCTION arctangente (a1, a2)
C-------------------------------------------------------------------------C
C   ROUTINE TO compute the angle in degree with the value of the sine (a1)C
C       and the cosine (a2).                                              C
C-------------------------------------------------------------------------C
C                                                                         C
C  INPUT:                                                                 C
C      a1, a2: sine and cosine of the angle to be determined              C
C                                                                         C
C  OUTPUT:                                                                C
C      arctangente: angle  (in degrees)                                   C
C                                                                         C
C     COMMON / conversion /                                               C
C       tpi= 2*pi                                                         C
C       secrad= arc second in radian                                      C
C       degrad= degrees in radian                                         C
C                                                                         C
C  SUBROUTINE INTERFACE:                                                  C
C      caller subroutine : precnut                                        C
C                                                                         C
C     Author: Anne-Marie.Gontier@obspm.fr                                 C
C     Date:   8 december 2002                                             C
C     Ref: Notice for users of the fortran procedure nro_transf pg. ??    C
C-------------------------------------------------------------------------C

        IMPLICIT NONE
        DOUBLE PRECISION arctangente, a1, a2
        DOUBLE PRECISION tpi, secrad, degrad

C-------------LOCAL VARIABLES-------------------------------------------C
        DOUBLE PRECISION pi, angle

        COMMON/conversion/tpi,secrad,degrad


         pi = tpi / 2.d0
         IF (ABS(a2).LT.1.d-17) THEN
           angle = DSIGN(pi/2.d0, a1)
         ELSE
           angle = DATAN(a1/a2)
           IF (a2.LT.0.d0) THEN
             angle = DSIGN(pi-ABS(angle), a1)
           ENDIF
         ENDIF
         IF (ABS(angle).LT.1.d-15) THEN
           angle = 0.d0
         ENDIF

         arctangente = angle / degrad

       END
C=======================================================================C


C=======================================================================C

      subroutine DJDATE (tdj,icode,jour,mois,kan,nh,nm,ns) 
*----------------------------------------------------------------------- 
* 
*     Ref : GF9803 
* 
* --- Objet ------------------------------------------------------------ 
* 
*     Changement de calendrier : Date julienne -> Gregorien/Julien. 
* 
* --- Entree ------------------------------------------------------------ 
* 
*     tdj         Date julienne (reel dp). 
* 
*     icode       Indice code de la conversion (entier) 
*                 icode=0 conversion tdj -> jour-mois-kan et 00-00-00. 
*                 icode=1 conversion tdj -> jour-mois-kan et nh-00-00. 
*                 icode=2 conversion tdj -> jour-mois-kan et nh-nm-00. 
*                 icode=3 conversion tdj -> jour-mois-kan et nh-nm-ns. 
* 
* --- Sortie ----------------------------------------------------------- 
* 
*     jour        Quantieme du mois (entier). 
*     mois        Numero du mois (entier). 
*     kan         Millesime astronomique de l'annee (entier). 
* 
*     nh          Nombre d'heures (entier). 
*     nm          Nombre de minutes (entier). 
*     ns          Nombre de secondes (entier). 
* 
* --- Remarque --------------------------------------------------------- 
* 
*     Date du calendier (Gregorien/Julien) : 
*     Le calendier Gregorien commence le 15/10/1582 a 0h (DJ2299160.5). 
*     Avant cette date on utilise le calendrier Julien. 
* 
*     On utilise le formulaire de J. Meeus. 
*     La date julienne tdj doit etre superieure ou egale a 0. 
*     Si tdj<0, alors jour=mois=kan=nh=nm=ns=0. 
* 
*     L'annee kan est comptee en millesimes astronomiques. 
*     L'annee 1 avant J.C. des historiens correspond a l'an 0 des 
*     astronomes et ainsi de suite. 
*     Ex : l'an 80 avant J.C. correspond a l'an astronomique -79. 
* 
* --- Declarations ----------------------------------------------------- 
* 
      implicit double precision (a-h,o-z) 
* 
* --- Initialisation --------------------------------------------------- 
* 
      jour=0 
      mois=0 
      kan=0 
      nh=0 
      nm=0 
      ns=0 
* 
      if (tdj.lt.0.d0.or.icode.lt.0.or.icode.gt.3) return 
      if (icode.eq.0) dt=0.0d0 
      if (icode.eq.1) dt=0.5d0/24.d0 
      if (icode.eq.2) dt=0.5d0/1440.d0 
      if (icode.eq.3) dt=0.d0
* 
* --- Conversion ------------------------------------------------------- 
* 
      t=tdj+dt+0.5d0 
      z=dint(t) 
      f=t-z 
* 
      if (z.lt.2299161.d0) then 
         a=z 
      else 
         alpha=dint((z-1867216.25d0)/36524.25d0) 
         a=z+1.d0+alpha-dint(alpha/4.d0) 
      endif 
* 
      b = a+1524.d0 
      c = dint((b-122.1d0)/365.25d0) 
      d = dint(365.25d0*c) 
      e = dint((b-d)/30.6001d0) 
* 
      jour=b-d-dint(30.6001d0*e) 
* 
      if (e.lt.13.5d0) then 
         mois=e-1.d0 
      else 
         mois=e-13.d0 
      endif 
* 
      if (mois.lt.2.5d0) then 
         kan=c-4715.d0 
      else 
         kan=c-4716.d0 
      endif 
* 
      f=f*24.d0 
      nh=int(f) 
      f=(f-dble(nh))*60.d0 
      nm=int(f) 
      f=(f-dble(nm))*60.d0 
      ns=int(f) 
* 
* --- Sortie ----------------------------------------------------------- 
* 
      return 
      end  

* 
* 
        function DJ(an,mois,jour,nh,nm,s) 
*----------------------------------------------------------------------- 
* 
*     Ref : GF9803 
* 
* --- Objet ------------------------------------------------------------ 
* 
*     Changement de calendrier : Gregorien/Julien -> Date julienne. 
* 
* --- Entree ------------------------------------------------------------ 
* 
*     jour        Quantieme du mois (entier). 
*     mois        Numero du mois (entier). 
*      an         Millesime astronomique de l'annee (entier). 
* 
*     nh          Nombre d'heures (entier). 
*     nm          Nombre de minutes (entier). 
*     s          Nombre de secondes  (reel). 
* 
* --- Sortie ----------------------------------------------------------- 
* 
*     dj          Date julienne (reel dp). 
* 
* --- Remarque --------------------------------------------------------- 
* 
*     Date du calendier (Gregorien/Julien) : 
*     Le calendier Gregorien commence le 15/10/1582 a 0h (DJ2299160.5). 
*     Avant cette date on utilise le calendrier Julien. 
* 
*     On utilise le formulaire de J. Meeus. 
*     Cette fonction n'est valable que pour les dates posterieures au 
*     1/1/4713 12h avant J.C. 
* 
*     L'annee kan est comptee en millesimes astronomiques. 
*     L'annee 1 avant J.C. des historiens correspond a l'an 0 des 
*     astronomes et ainsi de suite. 
*     Ex : l'an 80 avant J.C. correspond a l'an astronomique -79. 
* 
* --- Declarations ----------------------------------------------------- 
* 
      implicit none 
      integer an,nh,nm,jour,mois,m,idate
      real*8 dj
      real*8 a,b,c,s,y   
* --- Initialisation --------------------------------------------------- 
* 
     
* 
      if ((an.lt.-4713) 
     .   .or.(mois.lt.1.or.mois.gt.12) 
     .   .or.(jour.lt.1.or.jour.gt.31) 
     .   .or.(nh.lt.0.or.nh.gt.24) 
     .   .or.(nm.lt.0.or.nm.gt.59) 
     .   .or.(s.lt.0.or.s.ge.60)) return 
* 
      a=0.d0 
      b=0.d0 
      c=0.d0 
* 
* --- Conversion ------------------------------------------------------- 
* 
      if (mois.gt.2) then 
         y=an 
         m=mois 
      else 
         y=dble(an)-1.d0 
         m=mois+12 
      endif 
* 
      if (y.lt.0) then 
         c=-0.75d0 
      else 
         idate=an*10000+mois*100+jour 
         if (idate.ge.15821015) then 
            a=dint(y/100.d0) 
            b=2.d0-a+dint(a/4.d0) 
         endif 
      endif 
* 
       dj=int(365.25*y+c) 
     .   +int(30.6001*(m+1)) 
     .   +jour+b 
     .   +1720994.5d0
     .   +dble(nh)/24.d0 
     .   +dble(nm)/1440.d0 
     .   +dble(s)/86400.d0 
    
* 
* --- Sortie ----------------------------------------------------------- 
* 
      return 
      end 

c ######################################
      SUBROUTINE JULIAN(IY,IM,ID,MJD,DJ)

C   , CALCULATION OF JULIAN DATE
C  input : IY - YEAR
C          IM - MONTH
C          ID - DAY

C  output: DJ - julian date
C #######################################
  
      implicit none
      real*8 mjd,dj,jd
      integer iy,im,id
  
       JD =
     * ( dble(ID) + ( 2.d0- 1.d0+dble(MOD(IY,4))/4.d0 + 1.d0-dble(MOD(IY,100))/100.d0
     * -1.d0+dble(MOD(IY,400))/400.d0)*((5.d0-dble(IM)/3.d0)/5.d0 )
     * +dble(IY)/4.d0-dble(IY)/100.d0+dble(IY)/400.d0
     * +DINT(dble((IM*3057.0))/100.d0))+1721028.D0
     * +dble(IY)*365.0D0
     
        DJ = JD - 0.5D0

	MJD = DJ - 2400000.5d0 

      RETURN
      END

* 
      function JSEM (tdj) 
*----------------------------------------------------------------------- 
* 
*     Ref : GF9803 
* 
* --- Objet ------------------------------------------------------------ 
* 
*     Calcul du jour de la semaine. 
* 
* --- Entree ------------------------------------------------------------ 
* 
*     tdj         Date Julienne (reel dp). 
* 
* --- Sortie ----------------------------------------------------------- 
* 
*     jsem        Jour de la semaine (entier). 
*                 jsem=1 lundi, jsem=2 mardi, ... , jsem=7 dimanche. 
* 
* --- Remarque --------------------------------------------------------- 
* 
*     Une date julienne se terminant par 0.5 est consideree comme le 
*     jour suivant a 0h. 
* 
*----- Calcul ---------------------------------------------------------- 
* 
      implicit double precision (a-h,o-z) 
* 
      JSEM=0 
* 
      if (tdj.lt.0.0d0) return 
* 
      k=tdj+0.5d0/86400.d0+1.5d0 
      k=mod(k,7) 
      if (k.eq.0) k=7 
* 
      JSEM=k 
* 
      return 
      end 
* 
* 
* 
      subroutine EFFECR 
*----------------------------------------------------------------------- 
* 
*     Ref : GF9802 
* 
* --- Objet ------------------------------------------------------------ 
* 
*     Effacement de l'ecran. 
* 
      call SYSTEM ('clear') 
* 
      return 
      end 

c #######################################################################
	function interplin(x1,x2,y1,y2,x)

c entree :   x1,x2     : les deux abscisses
c            y1,y2     : les deux ordonnees
c            xs        : abscisse d'interpolation 
c sortie     interplin : valeur interpolee lineairement

	implicit none
	real*8 x1,x2,y1,y2,x,interplin
	
	interplin = (y2-y1) / (x2 - x1) * (x - x1) + y1 
        return
	end

c #######################################################################
c Programme spline:interpolation par une fonction spline cubique complete

	function spline(x,y,n,xs)

c entree :   x     : tableau des dates
c            xs    : date a interpolee
c            y     : tableau des valeurs a interpoler
c            n     : dimensions des tableaux x et y
c            ns    : dimensions des tableaux xs et ys
c	     alpha : valeur de la derivee du signal en t0
c            beta  : valeur de la derivee du signal en tn 
c sortie     spline: valeurs interpolees a la date dates xs
c #######################################################################

        implicit none	
	integer i,n,n1,j
	parameter (n1=10000)	
	double precision x(n),y(n)
	double precision S(n1),T(n1),d(n1),a(n1),b(n1),c(n1)
	double precision M(n1),h(n1)
	double precision alpha,beta,xs,spline
	

c La determination des coefficients des polynomes qui constituent la fonction
c spline consiste a resoudre un systeme tridiagonal par la methode du double
c balayage de Cholesky


	do i=1,n-1
	h(i) = x(i+1)-x(i)
	enddo
	
	alpha =(y(2)-y(1))/h(1)
	beta  =(y(n)-y(n-1))/h(n-1)
	
	b(1) = h(1)/3.d0
	c(1) = h(1)/6.d0
	d(1)=(y(2)-y(1))/h(1)-alpha
	
	S(1) =  d(1)/b(1)
	T(1) = -c(1)/b(1)

	do i=2,n-1	
	
	a(i) = h(i-1)/6.d0
	b(i) = (h(i-1)+h(i))/3.d0
	c(i) = h(i)/6.d0
	d(i) = (y(i+1)-y(i))/h(i) - (y(i)-y(i-1))/h(i-1)
	
	S(i) = (d(i)-a(i)*S(i-1)) / (b(i)+a(i)*T(i-1))
	T(i) =-c(i)/(b(i)+a(i)*T(i-1))	
	enddo
	

	a(n) = h(n-1)/6.d0
	b(n) = h(n-1)/3.d0
	
	d(n) = beta - (y(n)-y(n-1))/h(n-1)
	
c calcul des coeeficients M(i)
		
	M(n)=(d(n)-a(n)*S(n-1))/(a(n)*T(n-1)+b(n))

	do i=n-1,1,-1
	M(i)=S(i)+T(i)*M(i+1)	 
	enddo


	if  (xs.lt.x(1)) then
	j = 1
	     spline = 1.d0 / h(j)
     & *(  M(j)  /6.d0 * (x(j+1)-xs)**3  
     &    -M(j+1)/6.d0 * (x(j  )-xs)**3 
     &    +( y(j  )-M(j)   *h(j)**2 /6.d0 ) * (x(j+1)-xs) 
     &    -( y(j+1)-M(j+1) *h(j)**2 /6.d0 ) * (x(j  )-xs)  )
 
	endif

	if  ( (xs.ge.x(1)).and.(xs.lt.x(n-1)) ) then
	
	do j=1,n-2
	if  ( (xs.ge.x(j)).and.(xs.lt.x(j+1)) ) then

	     spline = 1.d0 / h(j)
     & *(  M(j)  /6.d0 * (x(j+1)-xs)**3  
     &    -M(j+1)/6.d0 * (x(j  )-xs)**3 
     &    +( y(j  )-M(j)   *h(j)**2 /6.d0 ) * (x(j+1)-xs) 
     &    -( y(j+1)-M(j+1) *h(j)**2 /6.d0 ) * (x(j  )-xs)  )
          
	endif
	enddo
	endif
	
	if (xs.ge.x(n-1)) then
        j = n-1 
	     spline = 1.d0 / h(j)
     & *(  M(j)  /6.d0 * (x(j+1)-xs)**3  
     &    -M(j+1)/6.d0 * (x(j  )-xs)**3 
     &    +( y(j  )-M(j)   *h(j)**2 /6.d0 ) * (x(j+1)-xs) 
     &    -( y(j+1)-M(j+1) *h(j)**2 /6.d0 ) * (x(j  )-xs)  )

	endif
	return

	end

c #######################################################################
c Programme dspline:calcul de la derivee premiere d'une serie par 
c fonctions splines cubiques completes 
c #######################################################################
	function dspline(x,y,n,xs)

c entree :   x        : tableau des dates
c            xs       : date a interpolee
c            y        : tableau des valeurs a interpoler par la fonction spline
c            n        : dimensions des tableaux x et y
c            ns       : dimensions des tableaux xs et ys
c	     alpha    : valeur de la derivee du signal en t0
c            beta     : valeur de la derivee du signal en tn 
c sortie     dspline  :  valeurs interpolees a la date dates xs
c #######################################################################
	implicit none
	integer i,n,n1,j
	parameter (n1=10000)
	double precision x(n),y(n)
	double precision S(n1),T(n1),d(n1),a(n1),b(n1),c(n1)
	double precision M(n1),h(n1)
	double precision alpha,beta,xs,dspline


c La determination des coefficients des polynomes qui constituent la fonction
c spline consiste a resoudre un systeme tridiagonal par la methode du double
c balayage de Cholesky


	do i=1,n-1
	h(i) = x(i+1)-x(i)
	enddo

	alpha =(y(2)-y(1))/h(1)
	beta  =(y(n)-y(n-1))/h(n-1)
	
	b(1) = h(1)/3.d0
	c(1) = h(1)/6.d0
	d(1)=(y(2)-y(1))/h(1)-alpha
	
	S(1) =  d(1)/b(1)
	T(1) = -c(1)/b(1)

	do i=2,n-1	
	
	a(i) = h(i-1)/6.d0
	b(i) = (h(i-1)+h(i))/3.d0
	c(i) = h(i)/6.d0
	d(i) = (y(i+1)-y(i))/h(i) - (y(i)-y(i-1))/h(i-1)
	
	S(i) = (d(i)-a(i)*S(i-1)) / (b(i)+a(i)*T(i-1))
	T(i) =-c(i)/(b(i)+a(i)*T(i-1))	
	enddo
	

	a(n) = h(n-1)/6.d0
	b(n) = h(n-1)/3.d0
	
	d(n) = beta - (y(n)-y(n-1))/h(n-1)
	
c calcul des coeeficients M(i)
		
	M(n)=(d(n)-a(n)*s(n-1))/(a(n)*T(n-1)+b(n))

	do i=n-1,1,-1
	M(i)=S(i)+T(i)*M(i+1)	 
	enddo


	if  (xs.lt.x(1)) then
	j = 1
		  dspline = 1.d0 / h(j)
     & 		*( -M(j)  /2.d0 * (x(j+1)-xs)**2  
     &  	   +M(j+1)/2.d0 * (x(j  )-xs)**2 
     &  	  -( y(j  ) -M(j)   *h(j)**2 /6.d0 )  
     &   	  +  y(j+1) -M(j+1) *h(j)**2 /6.d0 )
 
	endif
	
	if  ( (xs.ge.x(1)).and.(xs.lt.x(n-1)) ) then
		do j=1,n-2
		if  ( (xs.ge.x(j)).and.(xs.lt.x(j+1)) ) then

		  dspline = 1.d0 / h(j)
     & 		*( -M(j)  /2.d0 * (x(j+1)-xs)**2  
     &  	   +M(j+1)/2.d0 * (x(j  )-xs)**2 
     &  	  -( y(j  ) -M(j)   *h(j)**2 /6.d0 )  
     &   	  +  y(j+1) -M(j+1) *h(j)**2 /6.d0 )
          
		endif
		enddo
	endif
	
	if (xs.ge.x(n-1)) then
        j = n-1 
	 	  dspline = 1.d0 / h(j)
     & *( -M(j)  /2.d0 * (x(j+1)-xs)**2  
     &    +M(j+1)/2.d0 * (x(j  )-xs)**2 
     &    -( y(j  ) -M(j)   *h(j)**2 /6.d0 )  
     &    +  y(j+1)-M(j+1)  *h(j)**2 /6.d0 )
          
	endif

	
	return

	end

		
C=======================================================================C
	SUBROUTINE transmat(xmat,ymat,ni,nj)    
C-----------------------------------------------------------------------C
C	transposition of xmat(ni,nj) to ymat(nj,ni)                	C
C-----------------------------------------------------------------------C
	IMPLICIT DOUBLE PRECISION (a-h,o-z)
	DIMENSION xmat(ni,nj),ymat(nj,ni)

	  DO i=1,ni
		DO j=1,nj
		ymat(j,i) = xmat(i,j)
		ENDDO
	  ENDDO
	END 
	
c ==========================================================================c
       FUNCTION TERVON(D,Y,nmax,U)  
C
C   INTERPOLATION PAR DES POLYNOMES DE LAGRANGE SUR 4 POINTS
C
C   D DATES DU TABLEAU A INTERPOLER
C   Y VALEURS DU PARAMETRE A INTERPOLER
C   NJ DIMENSION DE CES TABLEAUX
C   U DATE POUR LAQUELLE ON VEUT INTERPOLER
C
      implicit none
      integer nmax,i
      real*8 d(nmax),y(nmax),u,tervon
      i=0
 
      DO I=3,nmax-1
      IF(D(I).GE.U) GO TO 10
      enddo

10     TERVON =((U-D(I-1))*(U-D(I))*(U-D(I+1))*Y(I-2))/
     .      ((D(I-2)-D(I-1))*(D(I-2)-D(I))*(D(I-2)-D(I+1)))
     .      +((U-D(I-2))*(U-D(I))*(U-D(I+1))*Y(I-1))/
     .      ((D(I-1)-D(I-2))*(D(I-1)-D(I))*(D(I-1)-D(I+1)))
     .      +((U-D(I-2))*(U-D(I-1))*(U-D(I+1))*Y(I))/
     .      ((D(I)-D(I-2))*(D(I)-D(I-1))*(D(I)-D(I+1)))
     .      +((U-D(I-2))*(U-D(I-1))*(U-D(I))*Y(I+1))/
     .      ((D(I+1)-D(I-2))*(D(I+1)-D(I-1))*(D(I+1)-D(I)))
    
      if ((d(i+1)-d(i-1).le.0.1).or.(d(i+1)-d(i-2).le.0.1).or.
     &(d(i+1)-d(i).le.0.1)) then
c      write(6,*) i,d(i)
      endif
      RETURN
      END
      
C----------------------------------------------------------------
      SUBROUTINE PMUT1_OCEANS (rjd,cor_x,cor_y,cor_ut1,cor_lod)
C
C    This subroutine provides, in time domain, the diurnal/subdiurnal
C    tidal effets on polar motion ("), UT1 (s) and LOD (s). The tidal terms,
C    listed in the program above, have been extracted from the procedure   
C    ortho_eop.f coed by Eanes in 1997.
C    
C    N.B.:  The fundamental lunisolar arguments are those of Simon et al.  
C
C    These corrections should be added to "average"
C    EOP values to get estimates of the instantaneous values.
C
C     PARAMETERS ARE :
C     rjd      - epoch of interest given in mjd
C     cor_x    - tidal correction in x (sec. of arc)
C     cor_y    - tidal correction in y (sec. of arc)
C     cor_ut1  - tidal correction in UT1-UTC (sec. of time)
C     cor_lod  - tidal correction in length of day (sec. of time)
C
C     coded by Ch. Bizouard (2002), initially coded by McCarthy and 
C     D.Gambis(1997) for the 8 prominent tidal waves.  
      
      IMPLICIT DOUBLE PRECISION (A-H,O-Z)
      
      INTEGER nlines
      PARAMETER(nlines=71)
      DOUBLE PRECISION ARG(6),    ! Array of the tidal arguments   
     .                 DARG(6)    ! Array of their time derivative 
      REAL*4 XCOS(nlines),XSIN(nlines),
     .YCOS(nlines),YSIN(nlines),UTCOS(nlines),UTSIN(nlines)
      INTEGER NARG(nlines,6)
      
      halfpi = 1.5707963267948966d0
      secrad=2.d0*halfpi/(180.d0*3600.d0)	

c  Oceanic tidal terms present in x (microas),y(microas),ut1(microseconds)       
c  NARG(j,6) : Multipliers of GMST+pi and Delaunay arguments. 
	
       data( 
     & NARG(j,1),NARG(j,2),NARG(j,3),NARG(j,4),NARG(j,5),NARG(j,6),
     & XSIN(j),XCOS(j),YSIN(j),YCOS(j),UTSIN(j),UTCOS(j),j=1,nlines)/
     &1,-1, 0,-2,-2,-2,  -0.05,   0.94,  -0.94,  -0.05,  0.396, -0.078,
     &1,-2, 0,-2, 0,-1,   0.06,   0.64,  -0.64,   0.06,  0.195, -0.059,
     &1,-2, 0,-2, 0,-2,   0.30,   3.42,  -3.42,   0.30,  1.034, -0.314,
     &1, 0, 0,-2,-2,-1,   0.08,   0.78,  -0.78,   0.08,  0.224, -0.073,
     &1, 0, 0,-2,-2,-2,   0.46,   4.15,  -4.15,   0.45,  1.187, -0.387,
     &1,-1, 0,-2, 0,-1,   1.19,   4.96,  -4.96,   1.19,  0.966, -0.474,
     &1,-1, 0,-2, 0,-2,   6.24,  26.31, -26.31,   6.23,  5.118, -2.499,
     &1, 1, 0,-2,-2,-1,   0.24,   0.94,  -0.94,   0.24,  0.172, -0.090,
     &1, 1, 0,-2,-2,-2,   1.28,   4.99,  -4.99,   1.28,  0.911, -0.475,
     &1, 0, 0,-2, 0, 0,  -0.28,  -0.77,   0.77,  -0.28, -0.093,  0.070,
     &1, 0, 0,-2, 0,-1,   9.22,  25.06, -25.06,   9.22,  3.025, -2.280,
     &1, 0, 0,-2, 0,-2,  48.82, 132.91,-132.90,  48.82, 16.020,-12.069,
     &1,-2, 0, 0, 0, 0,  -0.32,  -0.86,   0.86,  -0.32, -0.103,  0.078,
     &1, 0, 0, 0,-2, 0,  -0.66,  -1.72,   1.72,  -0.66, -0.194,  0.154,
     &1,-1, 0,-2, 2,-2,  -0.42,  -0.92,   0.92,  -0.42, -0.083,  0.074,
     &1, 1, 0,-2, 0,-1,  -0.30,  -0.64,   0.64,  -0.30, -0.057,  0.050,
     &1, 1, 0,-2, 0,-2,  -1.61,  -3.46,   3.46,  -1.61, -0.308,  0.271,
     &1,-1, 0, 0, 0, 0,  -4.48,  -9.61,   9.61,  -4.48, -0.856,  0.751,
     &1,-1, 0, 0, 0,-1,  -0.90,  -1.93,   1.93,  -0.90, -0.172,  0.151,
     &1, 1, 0, 0,-2, 0,  -0.86,  -1.81,   1.81,  -0.86, -0.161,  0.137,
     &1, 0,-1,-2, 2,-2,   1.54,   3.03,  -3.03,   1.54,  0.315, -0.189,
     &1, 0, 0,-2, 2,-1,  -0.29,  -0.58,   0.58,  -0.29, -0.062,  0.035,
     &1, 0, 0,-2, 2,-2,  26.13,  51.25, -51.25,  26.13,  5.512, -3.095,
     &1, 0, 1,-2, 2,-2,  -0.22,  -0.42,   0.42,  -0.22, -0.047,  0.025,
     &1, 0,-1, 0, 0, 0,  -0.61,  -1.20,   1.20,  -0.61, -0.134,  0.070,
     &1, 0, 0, 0, 0, 1,   1.54,   3.00,  -3.00,   1.54,  0.348, -0.171,
     &1, 0, 0, 0, 0, 0, -77.48,-151.74, 151.74, -77.48,-17.620,  8.548,
     &1, 0, 0, 0, 0,-1, -10.52, -20.56,  20.56, -10.52, -2.392,  1.159,
     &1, 0, 0, 0, 0,-2,   0.23,   0.44,  -0.44,   0.23,  0.052, -0.025,
     &1, 0, 1, 0, 0, 0,  -0.61,  -1.19,   1.19,  -0.61, -0.144,  0.065,
     &1, 0, 0, 2,-2, 2,  -1.09,  -2.11,   2.11,  -1.09, -0.267,  0.111,
     &1,-1, 0, 0, 2, 0,  -0.69,  -1.43,   1.43,  -0.69, -0.288,  0.043,
     &1, 1, 0, 0, 0, 0,  -3.46,  -7.28,   7.28,  -3.46, -1.610,  0.187,
     &1, 1, 0, 0, 0,-1,  -0.69,  -1.44,   1.44,  -0.69, -0.320,  0.037,
     &1, 0, 0, 0, 2, 0,  -0.37,  -1.06,   1.06,  -0.37, -0.407, -0.005,
     &1, 2, 0, 0, 0, 0,  -0.17,  -0.51,   0.51,  -0.17, -0.213, -0.005,
     &1, 0, 0, 2, 0, 2,  -1.10,  -3.42,   3.42,  -1.09, -1.436, -0.037,
     &1, 0, 0, 2, 0, 1,  -0.70,  -2.19,   2.19,  -0.70, -0.921, -0.023,
     &1, 0, 0, 2, 0, 0,  -0.15,  -0.46,   0.46,  -0.15, -0.193, -0.005,
     &1, 1, 0, 2, 0, 2,  -0.03,  -0.59,   0.59,  -0.03, -0.396, -0.024,
     &1, 1, 0, 2, 0, 1,  -0.02,  -0.38,   0.38,  -0.02, -0.253, -0.015,
     &2,-3, 0,-2, 0,-2,  -0.49,  -0.04,   0.63,   0.24, -0.089, -0.011,
     &2,-1, 0,-2,-2,-2,  -1.33,  -0.17,   1.53,   0.68, -0.224, -0.032,
     &2,-2, 0,-2, 0,-2,  -6.08,  -1.61,   3.13,   3.35, -0.637, -0.177,
     &2, 0, 0,-2,-2,-2,  -7.59,  -2.05,   3.44,   4.23, -0.745, -0.222,
     &2, 0, 1,-2,-2,-2,  -0.52,  -0.14,   0.22,   0.29, -0.049, -0.015,
     &2,-1,-1,-2, 0,-2,   0.47,   0.11,  -0.10,  -0.27,  0.033,  0.013,
     &2,-1, 0,-2, 0,-1,   2.12,   0.49,  -0.41,  -1.23,  0.141,  0.058,
     &2,-1, 0,-2, 0,-2, -56.87, -12.93,  11.15,  32.88, -3.795, -1.556,
     &2,-1, 1,-2, 0,-2,  -0.54,  -0.12,   0.10,   0.31, -0.035, -0.015,
     &2, 1, 0,-2,-2,-2, -11.01,  -2.40,   1.89,   6.41, -0.698, -0.298,
     &2, 1, 1,-2,-2,-2,  -0.51,  -0.11,   0.08,   0.30, -0.032, -0.014,
     &2,-2, 0,-2, 2,-2,   0.98,   0.11,  -0.11,  -0.58,  0.050,  0.022,
     &2, 0,-1,-2, 0,-2,   1.13,   0.11,  -0.13,  -0.67,  0.056,  0.025,
     &2, 0, 0,-2, 0,-1,  12.32,   1.00,  -1.41,  -7.31,  0.605,  0.266,
     &2, 0, 0,-2, 0,-2,-330.15, -26.96,  37.58, 195.92,-16.195, -7.140,
     &2, 0, 1,-2, 0,-2,  -1.01,  -0.07,   0.11,   0.60, -0.049, -0.021,
     &2,-1, 0,-2, 2,-2,   2.47,  -0.28,  -0.44,  -1.48,  0.111,  0.034,
     &2, 1, 0,-2, 0,-2,   9.40,  -1.44,  -1.88,  -5.65,  0.425,  0.117,
     &2,-1, 0, 0, 0, 0,  -2.35,   0.37,   0.47,   1.41, -0.106, -0.029,
     &2,-1, 0, 0, 0,-1,  -1.04,   0.17,   0.21,   0.62, -0.047, -0.013,
     &2, 0,-1,-2, 2,-2,  -8.51,   3.50,   3.29,   5.11, -0.437, -0.019,
     &2, 0, 0,-2, 2,-2,-144.13,  63.56,  59.23,  86.56, -7.547, -0.159,
     &2, 0, 1,-2, 2,-2,   1.19,  -0.56,  -0.52,  -0.72,  0.064,  0.000,
     &2, 0, 0, 0, 0, 1,   0.49,  -0.25,  -0.23,  -0.29,  0.027, -0.001,
     &2, 0, 0, 0, 0, 0, -38.48,  19.14,  17.72,  23.11, -2.104,  0.041,
     &2, 0, 0, 0, 0,-1, -11.44,   5.75,   5.32,   6.87, -0.627,  0.015,
     &2, 0, 0, 0, 0,-2,  -1.24,   0.63,   0.58,   0.75, -0.068,  0.002,
     &2, 1, 0, 0, 0, 0,  -1.77,   1.79,   1.71,   1.04, -0.146,  0.037,
     &2, 1, 0, 0, 0,-1,  -0.77,   0.78,   0.75,   0.45, -0.064,  0.017,
     &2, 0, 0, 2, 0, 2,  -0.33,   0.62,   0.65,   0.19, -0.049,  0.018/

      T = (rjd - 51544.5D0)/36525.0D0  ! julian century

C Arguments in the following order : chi=GMST+pi,l,lp,F,D,Omega
C et leur derivee temporelle 

      ARG(1) = (67310.54841d0 +
     .        (876600d0*3600d0 + 8640184.812866d0)*T +
     .         0.093104d0*T**2 -
     .         6.2d-6*T**3)*15.0d0 + 648000.0d0
      ARG(1)=dmod(ARG(1),1296000d0)*secrad 
   
      DARG(1) = (876600d0*3600d0 + 8640184.812866d0 
     .         + 2.d0 * 0.093104d0 * T - 3.d0 * 6.2d-6*T**2)*15.d0
      DARG(1) = DARG(1)* secrad / 36525.0D0   ! rad/day


      ARG(2) = -0.00024470d0*T**4 + 0.051635d0*T**3 + 31.8792d0*T**2
     .  + 1717915923.2178d0*T + 485868.249036d0
      ARG(2) = DMOD(ARG(2),1296000d0)*secrad
      
      DARG(2) = -4.d0*0.00024470d0*T**3 + 3.d0*0.051635d0*T**2 
     .  + 2.d0*31.8792d0*T + 1717915923.2178d0 
      DARG(2) = DARG(2)* secrad / 36525.0D0   ! rad/day

      ARG(3) = -0.00001149d0*T**4 - 0.000136d0*T**3
     .  -  0.5532d0*T**2
     .  + 129596581.0481d0*T + 1287104.79305d0
      ARG(3) = DMOD(ARG(3),1296000d0)*secrad

      DARG(3) = -4.D0*0.00001149d0*T**3 - 3.d0*0.000136d0*T**2
     .  -  2.D0*0.5532d0*T + 129596581.0481d0
      DARG(3) = DARG(3)* secrad / 36525.0D0   ! rad/day
          
      ARG(4) = 0.00000417d0*T**4 - 0.001037d0*T**3 - 12.7512d0*T**2
     .  + 1739527262.8478d0*T + 335779.526232d0
      ARG(4) = DMOD(ARG(4),1296000d0)*secrad

      DARG(4) = 4.d0*0.00000417d0*T**3 - 3.d0*0.001037d0*T**2 
     .- 2.d0 * 12.7512d0*T + 1739527262.8478d0 
      DARG(4) = DARG(4)* secrad / 36525.0D0   ! rad/day
    
      ARG(5) = -0.00003169d0*T**4 + 0.006593d0*T**3 - 6.3706d0*T**2
     .  + 1602961601.2090d0*T + 1072260.70369d0
      ARG(5) = DMOD(ARG(5),1296000d0)*secrad

      DARG(5) = -4.d0*0.00003169d0*T**3 + 3.d0*0.006593d0*T**2
     . - 2.d0 * 6.3706d0*T + 1602961601.2090d0
      DARG(5) = DARG(5)* secrad / 36525.0D0   ! rad/day

      ARG(6) = -0.00005939d0*T**4 + 0.007702d0*T**3
     .  + 7.4722d0*T**2
     .  - 6962890.2665d0*T + 450160.398036d0
      ARG(6) = DMOD(ARG(6),1296000d0)*secrad

      DARG(6) = -4.d0*0.00005939d0*T**3 + 3.d0 * 0.007702d0*T**2
     .  + 2.d0 * 7.4722d0*T - 6962890.2665d0
      DARG(6) = DARG(6)* secrad / 36525.0D0   ! rad/day

C CORRECTIONS

	cor_x  = 0.d0
	cor_y  = 0.d0
	cor_ut1= 0.d0
	cor_lod= 0.d0

 	do j=1,nlines
 	
	ag  = 0.d0
 	dag = 0.d0
		do i=1,6
 		ag  = ag  + dble(narg(j,i))*ARG(i)
 		dag = dag + dble(narg(j,i))*DARG(i)
		enddo
	ag=dmod(ag,4.d0*halfpi)

        cor_x  =cor_x   +dble(XCOS(j))*dcos(ag) +dble(XSIN(j))*dsin(ag)
        cor_y  =cor_y   +dble(YCOS(j))*dcos(ag) +dble(YSIN(j))*dsin(ag)
        cor_ut1=cor_ut1 +dble(UTCOS(j))*dcos(ag)+dble(UTSIN(j))*dsin(ag)
        cor_lod=cor_lod -(-dble(UTCOS(j))*dsin(ag) 
     &                    +dble(UTSIN(j))*dcos(ag) ) * dag   	 

        enddo
  
      cor_x = cor_x * 1.0d-6   ! arcsecond (")
      cor_y = cor_y * 1.0d-6   ! arcsecond (")
      cor_ut1 = cor_ut1 * 1.0d-6   ! second (s)
      cor_lod = cor_lod * 1.0d-6   ! second (s)
 
      RETURN
      END
      	
C----------------------------------------------------------------
      SUBROUTINE PM_GRAVI (rjd,cor_x,cor_y)
C
C    This subroutine provides, in time domain, the diurnal
C    lunisolar effet on polar motion (")
C    
C    N.B.:  The fundamental lunisolar arguments are those of Simon et al.  
C
C    These corrections should be added to "average"
C    EOP values to get estimates of the instantaneous values.
C
C     PARAMETERS ARE :
C     rjd      - epoch of interest given in mjd
C     cor_x    - tidal correction in x (sec. of arc)
C     cor_y    - tidal correction in y (sec. of arc)
C
C     coded by Ch. Bizouard (2002)
      
      IMPLICIT DOUBLE PRECISION (A-H,O-Z)
      
      INTEGER nlines
      PARAMETER(nlines=10)
      DOUBLE PRECISION ARG(6)    ! Array of the tidal arguments   
      REAL*4 XCOS(nlines),XSIN(nlines),YCOS(nlines),YSIN(nlines)
      INTEGER NARG(nlines,6)
      
      halfpi = 1.5707963267948966d0
      secrad=2.d0*halfpi/(180.d0*3600.d0)	

c  Diurnal lunisolar tidal terms present in x (microas),y(microas)      
c  NARG(j,6) : Multipliers of GMST+pi and Delaunay arguments. 
	
       data( 
     & NARG(j,1),NARG(j,2),NARG(j,3),NARG(j,4),NARG(j,5),NARG(j,6),
     & XSIN(j),XCOS(j),YSIN(j),YCOS(j),j=1,nlines)/    
     & 1,-1, 0,-2, 0,-1,    -.44,   .25,   -.25,  -.44,
     & 1,-1, 0,-2, 0,-2,   -2.31,  1.32,  -1.32, -2.31,
     & 1, 1, 0,-2,-2,-2,    -.44,   .25,   -.25,  -.44,
     & 1, 0, 0,-2, 0,-1,   -2.14,  1.23,  -1.23, -2.14,
     & 1, 0, 0,-2, 0,-2,  -11.36,  6.52,  -6.52,-11.36,
     & 1,-1, 0, 0, 0, 0,     .84,  -.48,    .48,   .84,
     & 1, 0, 0,-2, 2,-2,   -4.76,  2.73,  -2.73, -4.76,
     & 1, 0, 0, 0, 0, 0,   14.27, -8.19,   8.19, 14.27,
     & 1, 0, 0, 0, 0,-1,    1.93, -1.11,   1.11,  1.93,
     & 1, 1, 0, 0, 0, 0,     .76,  -.43,    .43,   .76/
 
      T = (rjd - 51544.5D0)/36525.0D0  ! julian century

C Arguments in the following order : chi=GMST+pi,l,lp,F,D,Omega
C et leur derivee temporelle 

      ARG(1) = (67310.54841d0 +
     .        (876600d0*3600d0 + 8640184.812866d0)*T +
     .         0.093104d0*T**2 -
     .         6.2d-6*T**3)*15.0d0 + 648000.0d0
      ARG(1)=dmod(ARG(1),1296000d0)*secrad 
   

      ARG(2) = -0.00024470d0*T**4 + 0.051635d0*T**3 + 31.8792d0*T**2
     .  + 1717915923.2178d0*T + 485868.249036d0
      ARG(2) = DMOD(ARG(2),1296000d0)*secrad
      

      ARG(3) = -0.00001149d0*T**4 - 0.000136d0*T**3
     .  -  0.5532d0*T**2
     .  + 129596581.0481d0*T + 1287104.79305d0
      ARG(3) = DMOD(ARG(3),1296000d0)*secrad

          
      ARG(4) = 0.00000417d0*T**4 - 0.001037d0*T**3 - 12.7512d0*T**2
     .  + 1739527262.8478d0*T + 335779.526232d0
      ARG(4) = DMOD(ARG(4),1296000d0)*secrad

    
      ARG(5) = -0.00003169d0*T**4 + 0.006593d0*T**3 - 6.3706d0*T**2
     .  + 1602961601.2090d0*T + 1072260.70369d0
      ARG(5) = DMOD(ARG(5),1296000d0)*secrad

  
      ARG(6) = -0.00005939d0*T**4 + 0.007702d0*T**3
     .  + 7.4722d0*T**2
     .  - 6962890.2665d0*T + 450160.398036d0
      ARG(6) = DMOD(ARG(6),1296000d0)*secrad


C CORRECTIONS

	cor_x  = 0.d0
	cor_y  = 0.d0

 	do j=1,nlines
 	
	ag  = 0.d0
		do i=1,6
 		ag  = ag  + dble(narg(j,i))*ARG(i)
		enddo
	ag=dmod(ag,4.d0*halfpi)

        cor_x  =cor_x   +dble(XCOS(j))*dcos(ag) +dble(XSIN(j))*dsin(ag)
        cor_y  =cor_y   +dble(YCOS(j))*dcos(ag) +dble(YSIN(j))*dsin(ag) 

        enddo
  
      cor_x = cor_x * 1.0d-6   ! arcsecond (")
      cor_y = cor_y * 1.0d-6   ! arcsecond (")
 
      RETURN

      END
      
C=======================================================================C

      subroutine MJDDATE (mjd,jour,mois,an,nh,nm,s) 
*----------------------------------------------------------------------- 
* 
*     Ref : GF9803 
* 
* --- Objet ------------------------------------------------------------- 
* 
*     Changement de calendrier : 
*     Date julienne modifiee TAI -> Date civile grégorienne UTC
*     prenant en compte les secondes intercalaires. 
* 
* --- Entree ------------------------------------------------------------ 
* 
*     mjd         Date julienne modifiee (reel dp) en TAI
*
* --- Sortie : Date civile gregorienne a la fraction de seconde pres ----
* 
*     jour        Quantieme du mois (entier). 
*     mois        Numero du mois (entier). 
*     an          Millesime astronomique de l'annee (entier). 
* 
*     nh          Nombre d'heures (entier). 
*     nm          Nombre de minutes (entier). 
*     s           Nombre de secondes (reel). 
* 
* --- Remarque --------------------------------------------------------- 
* 
*     Date du calendier (Gregorien/Julien) : 
*     Le calendier Gregorien commence le 15/10/1582 a 0h (DJ2299160.5). 
*     Avant cette date on utilise le calendrier Julien. 
* 
*     On utilise le formulaire de J. Meeus. 
*     La date julienne tdj doit etre superieure ou egale a 0. 
*     Si tdj<0, alors jour=mois=an=nh=nm=s=0. 
* 
*     L'annee kan est comptee en millesimes astronomiques. 
*     L'annee 1 avant J.C. des historiens correspond a l'an 0 des 
*     astronomes et ainsi de suite. 
*     Ex : l'an 80 avant J.C. correspond a l'an astronomique -79. 
* 
* --- Declarations ----------------------------------------------------- 
* 

      implicit none
      real*8 tdj,s,a,b,c,d,e,z,z1,t,t1,f,alpha,mjd,tartuf,mjd_tai,mjd_utc,tdj_tai,tdj_utc
      real*8 mjd_intercal_tai,mjd_intercal_utc,sintercal 
      integer*4 jour,mois,an,nh,nm,nsint,i
* 
* --- Initialisation --------------------------------------------------- 
* 
       jour = 0 
       mois = 0 
       an   = 0 
       nh   = 0 
       nm   = 0       
       s    = 0.d0  

* prise en compte des secondes intercalaires 
 	 
       mjd_tai = mjd 
    
* --- Conversion ------------------------------------------------------- 
* 
       t  = mjd_tai + 0.5d0 + 2400000.5
       z  = dint(t)
       t1 = mjd_tai 
       z1  = dint(t1) 
       f  = t1 - z1 
* 
       if (z.lt.2299161.d0) then 
         a=z 
       else 
         alpha = dint((z-1867216.25d0)/36524.25d0) 
         a     = z + 1.d0 + alpha - dint(alpha/4.d0) 
       endif 
* 
       b = a + 1524.d0 
       c = dint((b-122.1d0)/365.25d0) 
       d = dint(365.25d0*c) 
       e = dint((b-d)/30.6001d0) 
* 
       jour = b - d - dint(30.6001d0*e) 
* 
       if (e.lt.13.5d0) then 
         mois = e - 1.d0 
       else 
         mois = e - 13.d0 
       endif 
* 
       if (mois.lt.2.5d0) then 
         an = c - 4715.d0 
       else 
         an = c - 4716.d0 
       endif 
* 
       f  = f * 24.d0 
       nh = int(f) 
       f  = (f-dble(nh))*60.d0 
       nm = int(f) 
       f  = (f-dble(nm))*60.d0 
       s  = f 

        nsint  = tartuf(mjd) 
	
	do i = 1,1000
	mjd_utc = mjd -  dble(nsint) /86400.d0 
	nsint = tartuf(mjd_utc) 
	enddo
c	write(6,1020) nsint/86400.d0
c1020	format('nsint (jours)=',f19.8)	
      ! calcul de la date civile (necessairement en UTC) 
        s = s - nsint
      	if (s.le.-1d-4) then
           
	if (tartuf(mjd_utc).eq.tartuf(mjd_utc-2.d0/86400.d0)) then  ! pas de saut de seconde autour de mjd_utc
	s  = s + 60.d0 ! cas normal 
	else ! pas de saut de seconde	
	s  = s + 61.d0 ! pour un saut de seconde
	endif
	
	nm = nm - 1 
		if (nm.eq.-1) then
		nm = 59
		nh = nh - 1
			if (nh.eq.-1) then   
                        nh = 23 
                        jour = jour - 1
				if (jour.eq.0) then
				
				mois = mois - 1			 
				if ((mois.eq.1).or.(mois.eq.3).or.(mois.eq.5).or.(mois.eq.7).or.(mois.eq.8).or.(mois.eq.10).or.(mois.eq.12)) then
				jour = 31				
				endif 

				if ((mois.eq.4).or.(mois.eq.6).or.(mois.eq.9).or.(mois.eq.11)) then
				jour = 30
				endif 

				if ((mois.eq.2).and.(mod(an,4).ne.0)) then ! annee non divisible par 4  - non bissextile
				jour = 28 
				endif  

				if ( (mois.eq.2).and.(mod(an,4).eq.0).and.(mod(an,100).eq.0).and.(mod(an,400).ne.0)) then ! non bissextile
				jour = 28
				endif  

				if ((mois.eq.2).and.(mod(an,4).eq.0).and.(mod(an,100).eq.0).and.(mod(an,400).eq.0)) then  ! bissextile
				jour = 29
				endif  

				if ((mois.eq.2).and.(mod(an,4).eq.0).and.(mod(an,100).ne.0).and.(mod(an,400).ne.0)) then  ! bissextile
				jour = 29
				endif  
				
				if (mois.eq.0) then
				mois = 12
				jour = 31
				an = an - 1
				endif
			        
				endif	
			endif	
	        endif
	   endif

  
* --- Sortie ----------------------------------------------------------- 
* 
      return 
      end  

c #####################################################################
c This function performs the computation of the time shift TAI-UTC, 
c in seconds, to be removed from UT1-UTC = UT1 - TAI + TAI - UTC 
c in order to get UT1-TAI

c input  : D = Date in Modified Julian Day
c output : TARTUF = TAI-UTC 
c
c C'est la copie de TARTUF se trouvant dans la livrairie Lib90 de eoppc2
c ######################################################################
  	
       FUNCTION TARTUF(D)
       IMPLICIT REAL*8(A-H,O-Z)
       DOUBLE PRECISION D,TARTUF
       DOUBLE PRECISION A(50),B(50),C(50),T(50)
   	
       A(1)=1.422818d0
       A(2)=1.372818d0
       A(3)=1.845858d0
       A(4)=1.945858d0
       A(5)=3.240130d0
      
       DO 10 I=6,11
  10   A(I)=A(I-1)+0.1d0
   
       A(12)=4.313170d0
       A(13)=4.213170d0
      
       DO 11 I=14,50
  11   A(I)=I-4
   
       B(1)=37300.d0
       B(2)=37300.d0
       B(3)=37665.d0
       B(4)=37665.d0
      
       DO 12 I=5,11
  12   B(I)=38761.d0
   
       B(12)=39126.d0
       B(13)=39126.d0
   
       DO 13 I=14,50
  13   B(I)=0.d0
   
       ! coefficients lineaires  
       DO 14 I=1,11
 14    C(I)=0.001296d0
   
       C(3)=0.0011232d0
       C(4)=0.0011232d0
       C(12)=0.002592d0
       C(13)=0.002592d0
 
       ! A partir du 1er juillet 1972 il n'y a plus de termes lineaires	
       DO 15 I=14,50
 15    C(I)=0.d0
             
       TA=37300.d0		  ! 010161
       T(1)=37512.d0		  ! 010861
       T(2)=37665.d0		  ! 010162
       T(3)=38334.d0		  ! 011163
       T(4)=38395.d0		  ! 010164
       T(5)=38486.d0		  ! 010464
       T(6)=38639.d0		  ! 010964
       T(7)=38761.d0		  ! 010165
       T(8)=38820.d0		  ! 010365
       T(9)=38942.d0		  ! 010765
       T(10)=39004.d0		  ! 010965
       T(11)=39126.d0		  ! 010166
       T(12)=39887.d0		  ! 010268
       T(13)=41317.d0		  ! 010172
       T(14)=41499.d0		  ! 010772
       T(15)=41683.d0		  ! 010173
C
C   LA BOUCLE 16 EST A JOUR POUR LE 1.7.82
C
       DO 16 I=16,22
       T(I)=T(I-1)+365.d0
       IF(MOD((I-15),4).EQ.0) T(I)=T(I)+1.d0  
       ! prise en compte des annees bissextiles
 16    CONTINUE
     
       T(23) = 44786.d0   ! 010781
       T(24) = 45151.d0   ! 010782
       T(25) = 45516.d0   ! 010783
       T(26) = 46247.d0	  ! 010785
       T(27) = 47161.d0	  ! 010188
       T(28) = 47892.d0   ! 010190
       T(29) = 48257.d0   ! 010191
       T(30) = 48804.d0   ! 010792
       T(31) = 49169.d0   ! 010793
       T(32) = 49534.d0   ! 010794
       T(33) = 50083.d0   ! 010196
       T(34) = 50630.d0   ! 010797
       T(35) = 51179.d0   ! 010199
       T(36) = 53736.d0   ! 010106
      
       DO  i = 37,50
       T(i) = 53736.d0 + 20.D0 * 365.25d0  
       enddo
       
       TARTUF = 0.d0
       IF(D.LT.TA) THEN 
       WRITE(6,*) 'TAI is not defined before this date'
       GOTO 18
       TARTUF = 999.d0
       ENDIF
       
       DO 17 I=1,50     
	      IF(D.GE.T(I)) GOTO 17  
	      TARTUF = A(I) + (D-B(I))*C(I) 
 	      GOTO 18
   17  CONTINUE

       WRITE(6,*) ' TAI - UTC cannot be given after the date', T(i)
       TARTUF = 999.d0
   18  RETURN
       END         
      
      
   
