c;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -*- Mode: Fortran -*- ;;;;;;;;;;;;;;;;;;;;;;;;;;;
c;; hadr5n17.f --- 
c;; Author          : Friedrich Jegerlehner
c;; Created On      : Thu Jul  6 12:20:17 2017
c;; Last Modified By: Friedrich Jegerlehner
c;; Last Modified On: Sun Jun 16 16:48:07 2019
c;; RCS: $Id$
c;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
c;; Copyright (C) 2017 Friedrich Jegerlehner
c;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
c;; 
       subroutine hadr5x(e,st2,der,errdersta,errdersys,
     &     deg,errdegsta,errdegsys)
c Provides real part of 5 flavor hadronic contribution to photon vacuum polarization
c single precision HADR5 ; double precision DHADR5
c ******************************************************************
c *                                                                *
c *      subroutine for the evaluation of the light hadron         *
c *           contributions to Delta_r  and  Delta_g               *
c *                    using fits to the                           *
c *          QED vacuum polarization from e^+ e^- data             *
c *                                                                *
c *    F. Jegerlehner, Institut für Physik                         *
c *                    Humboldt-Universität zu Berlin              *
c *                    Newtonstraße 15, D-12489 Berlin, Germany    *
c *    E-mail: fjeger@physik.hu-berlin.de                          *
c *    Phone :   +49-3375 500 277                                  *
c *                                                                *
c *    Reference: F. Jegerlehner, Z. Phys. C32 (1986) 195          *
c *               H. Burkhardt et al., Z. Phys. C42 (1989) 497     *
c *               S. Eidelman, F. Jegerlehner, Z. Phys. C (1995)   *
c *               F. Jegerlehner,                                  *
c *                    Nucl.Phys.Proc.Suppl.131:213-222,2004       *
c *                    Nucl.Phys.Proc.Suppl.162:22-32,2006         *
c *                    Nucl.Phys.Proc.Suppl.181-182:135-140,2008   *
c *                                                                *
c ******************************************************************
c       VERSION: 06/107/2017
c
C  Notation: E energy ( momentum transfer ): E>0 timelike , E<0 spacelike
c      sin2ell=0.23153 ! pm 0.00016 LEPEEWG Phys Rep 427 (2006) 257
C            st2 is sin^2(Theta); st2=0.23153 is the reference value
C  the routine returns the hadronic contribution of 5 flavors (u,d,s,c,b)
C                 to   DER=Delta_r with hadronic error ERRDER
C                and   DEG=Delta_g with hadronic error ERRDEG
C  The effective value of the fine structure constant alphaQED at energy
C  E is alphaQED(E)=alphaQED(0)/(1-Delta_r) ,similarly for the SU(2)
C  coupling alphaSU2(E)=alphaSU2(0)/(1-Delta_g), where Delta_r(g) is the
C  sum of leptonic, hadronic contributions (top to be added).
C  updated june 2019
c
      IMPLICIT NONE
      INTEGER NA,NB,NC,IJ,I,ini
      PARAMETER(NA=979,NB=2174,NC=200)
      real e,st2,der,errdersta,errdersys,deg,errdegsta,errdegsys,fac
      real dal(3),dg2(3)
      REAL ETA(NA),DAT(NA,3),DGT(NA,3)
      REAL ESA(NB),DAS(NB,3),DGS(NB,3)
      REAL EMA(NC),DAM(NC,3),DGM(NC,3)
      REAL XXX(NC),YGG(NC,3),Y3G(NC,3)
      COMMON /DATM17/EMA,DAM,DGM
      COMMON /DATT17/ETA,DAT,DGT
      COMMON /DATS17/ESA,DAS,DGS
      COMMON /DATH17/XXX,YGG,Y3G
      data ini/0/
C initialize data

      call dalhad_spacelike17

      call dalhad_timelike17

      call dalhad_timelike1h17

c boundaries of data sets
c space-like and unphysical region  -1.0000E+03 - 0.27599999D0 (ETA,DAT)
c time-like R data range 0.28207018D0 - 38.29000000D0          (ESA,DAS)
c time-like1 pQCD range 1.3005E+01 - 2.0000E+04                (EMA,DAM)
c 2 pion threshold at 0.27914....
      fac=0.23153d0/st2
      if (e.eq.0.0) then
        der=0.0
        errdersta=0.0
        errdersys=0.0
        deg=0.0
        errdegsta=0.0
        errdegsys=0.0
        return
c first bridge cracks between regions
      else if ((e.ge.XXX(NC)).and.(e.lt.ETA(1))) then
        DO I=1,3
        dal(i)=YGG(NC,I)
     &    +(DAT(1,I)-YGG(NC,I))/(ETA(1)-XXX(NC))*(E-XXX(NC))
        dg2(i)=Y3G(NC,I)
     &    +(DAT(1,I)-Y3G(NC,I))/(ETA(1)-XXX(NC))*(E-XXX(NC))
        ENDDO
        der=dal(1)
        errdersta=dal(2)
        errdersys=dal(3)
        deg=dg2(1)*fac
        errdegsta=dg2(2)*fac
        errdegsys=dg2(3)*fac
        return
      else if ((e.ge.ETA(NA)).and.(e.lt.ESA(1))) then
        DO I=1,3
        dal(i)=DAT(NA,I)
     &    +(DAS(1,I)-DAT(NA,I))/(ESA(1)-ETA(NA))*(E-ETA(NA))
        dg2(i)=DGT(NA,I)
     &    +(DGS(1,I)-DGT(NA,I))/(ESA(1)-ETA(NA))*(E-ETA(NA))
        ENDDO
        der=dal(1)
        errdersta=dal(2)
        errdersys=dal(3)
        deg=dg2(1)*fac
        errdegsta=dg2(2)*fac
        errdegsys=dg2(3)*fac
        return
      else if ((e.lt.ETA(NA)).and.(e.ge.ETA(1))) then
        ij=NA
        do while (ETA(ij).gt.e)
          ij=ij-1
        enddo
        DO I=1,3
        dal(i)=DAT(IJ,I)
     &    +(DAT(IJ+1,I)-DAT(IJ,I))/(ETA(IJ+1)-ETA(IJ))*(E-ETA(IJ))
        dg2(i)=DGT(IJ,I)
     &    +(DGT(IJ+1,I)-DGT(IJ,I))/(ETA(IJ+1)-ETA(IJ))*(E-ETA(IJ))
        ENDDO
        der=dal(1)
        errdersta=dal(2)
        errdersys=dal(3)
        deg=dg2(1)*fac
        errdegsta=dg2(2)*fac
        errdegsys=dg2(3)*fac
        return
      else if ((e.lt.EMA(NC)).and.(e.ge.EMA(1))) then
        ij=NC
        do while (EMA(ij).gt.e)
          ij=ij-1
        enddo
        DO I=1,3
        dal(i)=DAM(IJ,I)
     &    +(DAM(IJ+1,I)-DAM(IJ,I))/(EMA(IJ+1)-EMA(IJ))*(E-EMA(IJ))
        dg2(i)=DGM(IJ,I)
     &    +(DGM(IJ+1,I)-DGM(IJ,I))/(EMA(IJ+1)-EMA(IJ))*(E-EMA(IJ))
        ENDDO
        der=dal(1)
        errdersta=dal(2)
        errdersys=dal(3)
        deg=dg2(1)*fac
        errdegsta=dg2(2)*fac
        errdegsys=dg2(3)*fac
        return
      else if ((e.lt.ESA(NB)).and.(e.ge.ESA(1))) then
        if ((e.gt.3.96).and.(e.lt.4.52).and.(ini.eq.0)) then
c           write (*,*) ' ******************************************'
c           write (*,*) ' * Note: fluctuations in the Psi(4,5,6)   *'
c           write (*,*) ' * region are because we are using the    *'
c           write (*,*) ' * CB and BES data without any smoothing  *'
c           write (*,*) ' *********** FJ@HU Berlin *****************'
           ini=1
        endif
        ij=NB
        do while (ESA(ij).gt.e)
          ij=ij-1
        enddo
        DO I=1,3
        dal(i)=DAS(IJ,I)
     &    +(DAS(IJ+1,I)-DAS(IJ,I))/(ESA(IJ+1)-ESA(IJ))*(E-ESA(IJ))
        dg2(i)=DGS(IJ,I)
     &    +(DGS(IJ+1,I)-DGS(IJ,I))/(ESA(IJ+1)-ESA(IJ))*(E-ESA(IJ))
        ENDDO
        der=dal(1)
        errdersta=dal(2)
        errdersys=dal(3)
        deg=dg2(1)*fac
        errdegsta=dg2(2)*fac
        errdegsys=dg2(3)*fac
        return
      else if ((e.lt.XXX(NC)).and.(e.ge.XXX(1))) then
        ij=NC
        do while (XXX(ij).gt.e)
          ij=ij-1
        enddo
        DO I=1,3
        dal(i)=YGG(IJ,I)
     &    +(YGG(IJ+1,I)-YGG(IJ,I))/(XXX(IJ+1)-XXX(IJ))*(E-XXX(IJ))
        dg2(i)=Y3G(IJ,I)
     &    +(Y3G(IJ+1,I)-Y3G(IJ,I))/(XXX(IJ+1)-XXX(IJ))*(E-XXX(IJ))
        ENDDO
        der=dal(1)
        errdersta=dal(2)
        errdersys=dal(3)
        deg=dg2(1)*fac
        errdegsta=dg2(2)*fac
        errdegsys=dg2(3)*fac
        return
      else 
         if (ini.le.10) then
            write(*,*) ' out of range! e=',e
            ini=ini+1
            if (ini.eq.10) write(*,*) ' Warning: continuing anyway ...'
         endif
      endif
      return
      end

       subroutine dhadr5x(de,dst2,dder,derrdersta,derrdersys,
     &     ddeg,derrdegsta,derrdegsys)
c **********************************************************************
c *    F. Jegerlehner, University of Silesia, PL-40007 Katowice, Poland *
c **********************************************************************
c Converts hadr5n15 to double precision variables in dhadr5n15
c
       implicit none
       real *8 de,dst2,dder,ddeg,derrdersta,derrdersys,
     &      derrdegsta,derrdegsys
       real    se,sst2,sder,sdeg,serrdersta,serrdersys,
     &      serrdegsta,serrdegsys
       se  =sngl(de)
       sst2=sngl(dst2)
       call hadr5x(se,sst2,sder,serrdersta,serrdersys,sdeg,
     &      serrdegsta,serrdegsys)
       dder   =dble(sder)
       ddeg   =dble(sdeg)
       derrdersta=dble(serrdersta)
       derrdersys=dble(serrdersys)
       derrdegsta=dble(serrdegsta)
       derrdegsys=dble(serrdegsys)
       return
       end
c
c Following datasets obtained with run parameters specified in the header
c

c      ++++ dalhadslow19 ++++  

c update jun 2019 
       subroutine dalhad_timelike17
       IMPLICIT NONE
       INTEGER NB,I,J
       PARAMETER(NB=2174)
       REAL ESA(NB),DAS(NB,3),DGS(NB,3)
       COMMON /DATS17/ESA,DAS,DGS
c  
c******************************************************************************
c*                                                                            *
c*    --- intRdat1 ---                              Thu Jun 13 10:38:35 2019  *
c*                                                                            *
c***************************# FJ@HU Berlin #***********************************
c  
c  "Delta alpha"               Update version (12/06/2019) 
c  
c ISCAN:  1, Ismooth: 0, IGS: 0, DSET:     , iplot: 0 itestflavorspl: 0
c IKE,Emin,Emax,NP,N,EPSREL:  1, 6.0000E-01, 1.4000E+00, 100, 10, 1.00E-02, 
c ALS(sta)(sys):  0.1184( 0.0007)( 0.0000), MZINP:   91.1876, MTOP:    173.20
c NF,IOR,ICHK: 5,4,2,ISU2: 0,NFL: 5,INAG: 1,inotail:  0, sin2W:   0.23153
c CHPTCUT,EC,ECUT: 0.3180,     5.20,    11.50
c  
  
       DATA  (ESA  (I), I=   1, 100) /
     &   0.28207018D0, 0.28800000D0, 0.29400000D0, 0.30000000D0,
     &   0.30600000D0, 0.30900000D0, 0.31500000D0, 0.32600000D0,
     &   0.33100000D0, 0.33600000D0, 0.34100000D0, 0.34600000D0,
     &   0.35200000D0, 0.35600000D0, 0.36100000D0, 0.36600000D0,
     &   0.37100000D0, 0.37600000D0, 0.38000000D0, 0.38500000D0,
     &   0.38900000D0, 0.39400000D0, 0.39800000D0, 0.40300000D0,
     &   0.40700000D0, 0.41100000D0, 0.41600000D0, 0.41871100D0,
     &   0.42000000D0, 0.42400000D0, 0.42800000D0, 0.43200000D0,
     &   0.43600000D0, 0.44000000D0, 0.44400000D0, 0.44800000D0,
     &   0.45200000D0, 0.45600000D0, 0.46000000D0, 0.46400000D0,
     &   0.46700000D0, 0.47100000D0, 0.47500000D0, 0.47800000D0,
     &   0.48200000D0, 0.48600000D0, 0.48900000D0, 0.49300000D0,
     &   0.49600000D0, 0.50000000D0, 0.52000000D0, 0.54000000D0,
     &   0.56600000D0, 0.59200000D0, 0.60000000D0, 0.60200000D0,
     &   0.60800000D0, 0.61600000D0, 0.62400000D0, 0.63200000D0,
     &   0.64000000D0, 0.64300000D0, 0.64800000D0, 0.65600000D0,
     &   0.66300000D0, 0.67100000D0, 0.67800000D0, 0.68600000D0,
     &   0.68800000D0, 0.69300000D0, 0.69600000D0, 0.70000000D0,
     &   0.70700000D0, 0.71400000D0, 0.72100000D0, 0.72800000D0,
     &   0.73500000D0, 0.74200000D0, 0.74800000D0, 0.75000000D0,
     &   0.75500000D0, 0.75744000D0, 0.76007300D0, 0.76207300D0,
     &   0.76507300D0, 0.76851700D0, 0.77060500D0, 0.77205400D0,
     &   0.77314300D0, 0.77400300D0, 0.77470900D0, 0.77530500D0,
     &   0.77582000D0, 0.77627100D0, 0.77667300D0, 0.77726600D0,
     &   0.77746600D0, 0.77766900D0, 0.77795100D0, 0.77821500D0/
       DATA  (ESA  (I), I= 101, 200) /
     &   0.77846300D0, 0.77869800D0, 0.77892200D0, 0.77913700D0,
     &   0.77934400D0, 0.77954500D0, 0.77974200D0, 0.77993500D0,
     &   0.78012700D0, 0.78031800D0, 0.78051000D0, 0.78070600D0,
     &   0.78090800D0, 0.78112100D0, 0.78135100D0, 0.78161200D0,
     &   0.78193600D0, 0.78268000D0, 0.78341500D0, 0.78373400D0,
     &   0.78399100D0, 0.78421700D0, 0.78442600D0, 0.78462500D0,
     &   0.78481700D0, 0.78500500D0, 0.78519100D0, 0.78537800D0,
     &   0.78556600D0, 0.78575600D0, 0.78595100D0, 0.78615100D0,
     &   0.78635800D0, 0.78657300D0, 0.78679800D0, 0.78703400D0,
     &   0.78728400D0, 0.78755000D0, 0.78773500D0, 0.78793500D0,
     &   0.78814300D0, 0.78847900D0, 0.78884800D0, 0.78925800D0,
     &   0.78971900D0, 0.79024600D0, 0.79085900D0, 0.79158800D0,
     &   0.79248000D0, 0.79361500D0, 0.79513900D0, 0.79736300D0,
     &   0.79800000D0, 0.80000000D0, 0.80200000D0, 0.80400000D0,
     &   0.80600000D0, 0.80800000D0, 0.81200000D0, 0.81400000D0,
     &   0.81600000D0, 0.82000000D0, 0.82200000D0, 0.82400000D0,
     &   0.82600000D0, 0.82800000D0, 0.83000000D0, 0.83100000D0,
     &   0.83700000D0, 0.84300000D0, 0.84900000D0, 0.85400000D0,
     &   0.86000000D0, 0.86600000D0, 0.87200000D0, 0.87700000D0,
     &   0.88300000D0, 0.88900000D0, 0.89400000D0, 0.89700000D0,
     &   0.90250000D0, 0.90500000D0, 0.91100000D0, 0.91600000D0,
     &   0.92200000D0, 0.92700000D0, 0.93300000D0, 0.93800000D0,
     &   0.94300000D0, 0.94900000D0, 0.95200000D0, 0.95400000D0,
     &   0.95800000D0, 0.96000000D0, 0.96200000D0, 0.96400000D0,
     &   0.96600000D0, 0.96800000D0, 0.97000000D0, 0.97400000D0/
       DATA  (ESA  (I), I= 201, 300) /
     &   0.97800000D0, 0.98000000D0, 0.98070000D0, 0.98140000D0,
     &   0.98210000D0, 0.98280000D0, 0.98350000D0, 0.98420000D0,
     &   0.98490000D0, 0.98560000D0, 0.98630000D0, 0.98700000D0,
     &   0.98770000D0, 0.98840000D0, 0.98910000D0, 0.98980000D0,
     &   0.99050000D0, 0.99120000D0, 0.99190000D0, 0.99260000D0,
     &   0.99330000D0, 0.99400000D0, 0.99470000D0, 0.99540000D0,
     &   0.99610000D0, 0.99680000D0, 0.99750000D0, 0.99820000D0,
     &   0.99890000D0, 0.99960000D0, 0.99990000D0, 1.00001000D0,
     &   1.00030000D0, 1.00100000D0, 1.00170000D0, 1.00240000D0,
     &   1.00310000D0, 1.00380000D0, 1.00450000D0, 1.00520000D0,
     &   1.00590000D0, 1.00660000D0, 1.00730000D0, 1.00800000D0,
     &   1.00870000D0, 1.00940000D0, 1.01010000D0, 1.01080000D0,
     &   1.01150000D0, 1.01220000D0, 1.01290000D0, 1.01360000D0,
     &   1.01430000D0, 1.01500000D0, 1.01520000D0, 1.01540000D0,
     &   1.01560000D0, 1.01580000D0, 1.01600000D0, 1.01620000D0,
     &   1.01640000D0, 1.01660000D0, 1.01680000D0, 1.01700000D0,
     &   1.01720000D0, 1.01740000D0, 1.01770000D0, 1.01790000D0,
     &   1.01800000D0, 1.01820000D0, 1.01840000D0, 1.01860000D0,
     &   1.01880000D0, 1.01900000D0, 1.01920000D0, 1.01940000D0,
     &   1.01960000D0, 1.01980000D0, 1.02000000D0, 1.02020000D0,
     &   1.02040000D0, 1.02060000D0, 1.02080000D0, 1.02100000D0,
     &   1.02120000D0, 1.02140000D0, 1.02160000D0, 1.02180000D0,
     &   1.02200000D0, 1.02220000D0, 1.02240000D0, 1.02270000D0,
     &   1.02290000D0, 1.02300000D0, 1.02320000D0, 1.02340000D0,
     &   1.02360000D0, 1.02380000D0, 1.02400000D0, 1.02420000D0/
       DATA  (ESA  (I), I= 301, 400) /
     &   1.02440000D0, 1.02460000D0, 1.02480000D0, 1.02500000D0,
     &   1.02570000D0, 1.02640000D0, 1.02710000D0, 1.02780000D0,
     &   1.02850000D0, 1.02920000D0, 1.02990000D0, 1.03060000D0,
     &   1.03130000D0, 1.03200000D0, 1.03270000D0, 1.03340000D0,
     &   1.03410000D0, 1.03480000D0, 1.03550000D0, 1.03620000D0,
     &   1.03690000D0, 1.03760000D0, 1.03830000D0, 1.03900000D0,
     &   1.03970000D0, 1.03999000D0, 1.04001000D0, 1.04040000D0,
     &   1.04110000D0, 1.04180000D0, 1.04250000D0, 1.04320000D0,
     &   1.04390000D0, 1.04460000D0, 1.04530000D0, 1.04600000D0,
     &   1.04670000D0, 1.04740000D0, 1.04810000D0, 1.04880000D0,
     &   1.04950000D0, 1.05020000D0, 1.05090000D0, 1.05160000D0,
     &   1.05230000D0, 1.05300000D0, 1.05370000D0, 1.05440000D0,
     &   1.05510000D0, 1.05580000D0, 1.05650000D0, 1.05720000D0,
     &   1.05790000D0, 1.05860000D0, 1.05930000D0, 1.06000000D0,
     &   1.06200000D0, 1.06700000D0, 1.07700000D0, 1.08700000D0,
     &   1.09700000D0, 1.10700000D0, 1.11700000D0, 1.12700000D0,
     &   1.13700000D0, 1.13800000D0, 1.15200000D0, 1.16300000D0,
     &   1.16700000D0, 1.17700000D0, 1.18700000D0, 1.18800000D0,
     &   1.19700000D0, 1.20700000D0, 1.21200000D0, 1.21700000D0,
     &   1.22700000D0, 1.23700000D0, 1.24700000D0, 1.25700000D0,
     &   1.26300000D0, 1.26700000D0, 1.27700000D0, 1.28700000D0,
     &   1.28800000D0, 1.29700000D0, 1.30700000D0, 1.31200000D0,
     &   1.31700000D0, 1.32700000D0, 1.33700000D0, 1.34700000D0,
     &   1.35000000D0, 1.35700000D0, 1.36200000D0, 1.36700000D0,
     &   1.37700000D0, 1.38700000D0, 1.38800000D0, 1.39500000D0/
       DATA  (ESA  (I), I= 401, 500) /
     &   1.41000000D0, 1.41900000D0, 1.42700000D0, 1.43500000D0,
     &   1.43800000D0, 1.45200000D0, 1.45700000D0, 1.46000000D0,
     &   1.46400000D0, 1.47200000D0, 1.48100000D0, 1.49000000D0,
     &   1.49100000D0, 1.50000000D0, 1.50100000D0, 1.50600000D0,
     &   1.51000000D0, 1.52300000D0, 1.52500000D0, 1.53800000D0,
     &   1.53900000D0, 1.54000000D0, 1.55000000D0, 1.56000000D0,
     &   1.56200000D0, 1.57400000D0, 1.57500000D0, 1.58000000D0,
     &   1.58100000D0, 1.58700000D0, 1.59000000D0, 1.59900000D0,
     &   1.60000000D0, 1.61000000D0, 1.61900000D0, 1.62400000D0,
     &   1.62500000D0, 1.63800000D0, 1.64000000D0, 1.65000000D0,
     &   1.65700000D0, 1.66000000D0, 1.66200000D0, 1.66300000D0,
     &   1.67300000D0, 1.67500000D0, 1.68100000D0, 1.68700000D0,
     &   1.69000000D0, 1.70000000D0, 1.71000000D0, 1.71200000D0,
     &   1.71300000D0, 1.71900000D0, 1.72200000D0, 1.72500000D0,
     &   1.73800000D0, 1.74000000D0, 1.74600000D0, 1.75000000D0,
     &   1.75600000D0, 1.75700000D0, 1.76000000D0, 1.76200000D0,
     &   1.76400000D0, 1.76900000D0, 1.77500000D0, 1.78100000D0,
     &   1.79000000D0, 1.79900000D0, 1.80000000D0, 1.81200000D0,
     &   1.81900000D0, 1.82500000D0, 1.82600000D0, 1.83400000D0,
     &   1.83500000D0, 1.83800000D0, 1.84500000D0, 1.85700000D0,
     &   1.85900000D0, 1.87400000D0, 1.88100000D0, 1.88600000D0,
     &   1.90000000D0, 1.91900000D0, 1.92500000D0, 1.93000000D0,
     &   1.93800000D0, 1.94000000D0, 1.94500000D0, 1.94600000D0,
     &   1.95000000D0, 1.95500000D0, 1.96000000D0, 1.96200000D0,
     &   1.98100000D0, 1.99050000D0, 2.00500000D0, 2.05000000D0/
       DATA  (ESA  (I), I= 501, 600) /
     &   2.10000000D0, 2.15010000D0, 2.22000000D0, 2.26000000D0,
     &   2.30000000D0, 2.40000000D0, 2.45000000D0, 2.50000000D0,
     &   2.55000000D0, 2.60000000D0, 2.65000000D0, 2.70000000D0,
     &   2.75000000D0, 2.80000000D0, 2.85000000D0, 2.90000000D0,
     &   2.91000000D0, 2.92000000D0, 2.93000000D0, 2.94000000D0,
     &   2.95000000D0, 2.96000000D0, 2.97000000D0, 2.97200000D0,
     &   2.97400000D0, 2.97600000D0, 2.97800000D0, 2.98000000D0,
     &   2.98200000D0, 2.98400000D0, 2.98600000D0, 2.98800000D0,
     &   2.99000000D0, 2.99900000D0, 3.00500000D0, 3.00800000D0,
     &   3.01000000D0, 3.01200000D0, 3.01400000D0, 3.01600000D0,
     &   3.01800000D0, 3.02000000D0, 3.02100000D0, 3.02200000D0,
     &   3.02300000D0, 3.02400000D0, 3.02500000D0, 3.02600000D0,
     &   3.02700000D0, 3.02800000D0, 3.02900000D0, 3.03000000D0,
     &   3.03100000D0, 3.03200000D0, 3.03300000D0, 3.03400000D0,
     &   3.03500000D0, 3.03600000D0, 3.03700000D0, 3.03800000D0,
     &   3.03900000D0, 3.04000000D0, 3.04100000D0, 3.04200000D0,
     &   3.04300000D0, 3.04400000D0, 3.04500000D0, 3.04600000D0,
     &   3.04700000D0, 3.04800000D0, 3.04900000D0, 3.05000000D0,
     &   3.05100000D0, 3.05200000D0, 3.05300000D0, 3.05400000D0,
     &   3.05500000D0, 3.05600000D0, 3.05700000D0, 3.05800000D0,
     &   3.05900000D0, 3.06000000D0, 3.06050000D0, 3.06100000D0,
     &   3.06150000D0, 3.06200000D0, 3.06250000D0, 3.06300000D0,
     &   3.06350000D0, 3.06400000D0, 3.06450000D0, 3.06500000D0,
     &   3.06550000D0, 3.06600000D0, 3.06650000D0, 3.06700000D0,
     &   3.06750000D0, 3.06800000D0, 3.06850000D0, 3.06900000D0/
       DATA  (ESA  (I), I= 601, 700) /
     &   3.06950000D0, 3.07000000D0, 3.07050000D0, 3.07100000D0,
     &   3.07150000D0, 3.07200000D0, 3.07250000D0, 3.07300000D0,
     &   3.07350000D0, 3.07400000D0, 3.07450000D0, 3.07500000D0,
     &   3.07550000D0, 3.07600000D0, 3.07650000D0, 3.07700000D0,
     &   3.07750000D0, 3.07800000D0, 3.07850000D0, 3.07900000D0,
     &   3.07970000D0, 3.08000000D0, 3.08050000D0, 3.08100000D0,
     &   3.08150000D0, 3.08200000D0, 3.08250000D0, 3.08300000D0,
     &   3.08350000D0, 3.08400000D0, 3.08450000D0, 3.08500000D0,
     &   3.08550000D0, 3.08587000D0, 3.08688300D0, 3.08789600D0,
     &   3.08890900D0, 3.08992200D0, 3.09093500D0, 3.09194800D0,
     &   3.09296100D0, 3.09397400D0, 3.09498700D0, 3.09600000D0,
     &   3.09605000D0, 3.09610000D0, 3.09615000D0, 3.09620000D0,
     &   3.09625000D0, 3.09630000D0, 3.09635000D0, 3.09640000D0,
     &   3.09645000D0, 3.09650000D0, 3.09655000D0, 3.09660000D0,
     &   3.09665000D0, 3.09665500D0, 3.09673500D0, 3.09677100D0,
     &   3.09679300D0, 3.09680900D0, 3.09682000D0, 3.09682900D0,
     &   3.09683600D0, 3.09684300D0, 3.09684800D0, 3.09685300D0,
     &   3.09685700D0, 3.09686100D0, 3.09686400D0, 3.09686800D0,
     &   3.09687000D0, 3.09687300D0, 3.09687600D0, 3.09687800D0,
     &   3.09688100D0, 3.09688300D0, 3.09688500D0, 3.09688700D0,
     &   3.09688900D0, 3.09689100D0, 3.09689300D0, 3.09689500D0,
     &   3.09689700D0, 3.09689900D0, 3.09690100D0, 3.09690400D0,
     &   3.09690600D0, 3.09690900D0, 3.09691200D0, 3.09692000D0,
     &   3.09692800D0, 3.09693100D0, 3.09693400D0, 3.09693600D0,
     &   3.09693900D0, 3.09694100D0, 3.09694300D0, 3.09694500D0/
       DATA  (ESA  (I), I= 701, 800) /
     &   3.09694700D0, 3.09694900D0, 3.09695100D0, 3.09695300D0,
     &   3.09695500D0, 3.09695700D0, 3.09695900D0, 3.09696200D0,
     &   3.09696400D0, 3.09696700D0, 3.09697000D0, 3.09697200D0,
     &   3.09697600D0, 3.09697900D0, 3.09698300D0, 3.09698700D0,
     &   3.09699200D0, 3.09699700D0, 3.09700400D0, 3.09701100D0,
     &   3.09702000D0, 3.09703100D0, 3.09704700D0, 3.09706900D0,
     &   3.09710500D0, 3.09715000D0, 3.09720000D0, 3.09725000D0,
     &   3.09730000D0, 3.09735000D0, 3.09740000D0, 3.09745000D0,
     &   3.09750000D0, 3.09755000D0, 3.09760000D0, 3.09765000D0,
     &   3.09770000D0, 3.09775000D0, 3.09780000D0, 3.09785000D0,
     &   3.09790000D0, 3.09795000D0, 3.09800000D0, 3.09898700D0,
     &   3.09997400D0, 3.10096100D0, 3.10194800D0, 3.10293500D0,
     &   3.10392200D0, 3.10490900D0, 3.10589600D0, 3.10688300D0,
     &   3.10787000D0, 3.10800000D0, 3.10900000D0, 3.11000000D0,
     &   3.11100000D0, 3.11200000D0, 3.11300000D0, 3.11400000D0,
     &   3.11500000D0, 3.11600000D0, 3.11700000D0, 3.11800000D0,
     &   3.11900000D0, 3.12000000D0, 3.12100000D0, 3.12200000D0,
     &   3.12300000D0, 3.12400000D0, 3.12500000D0, 3.12600000D0,
     &   3.12700000D0, 3.12800000D0, 3.12900000D0, 3.13000000D0,
     &   3.13100000D0, 3.13200000D0, 3.13300000D0, 3.13400000D0,
     &   3.13500000D0, 3.13600000D0, 3.13700000D0, 3.13800000D0,
     &   3.13900000D0, 3.14000000D0, 3.14100000D0, 3.14200000D0,
     &   3.14300000D0, 3.14400000D0, 3.14500000D0, 3.14600000D0,
     &   3.14700000D0, 3.14800000D0, 3.14900000D0, 3.15000000D0,
     &   3.15100000D0, 3.15200000D0, 3.15300000D0, 3.15400000D0/
       DATA  (ESA  (I), I= 801, 900) /
     &   3.15500000D0, 3.15600000D0, 3.15700000D0, 3.15800000D0,
     &   3.15900000D0, 3.16000000D0, 3.16100000D0, 3.16200000D0,
     &   3.16300000D0, 3.16400000D0, 3.16500000D0, 3.16600000D0,
     &   3.16700000D0, 3.16800000D0, 3.16900000D0, 3.17000000D0,
     &   3.17100000D0, 3.17200000D0, 3.17300000D0, 3.17400000D0,
     &   3.17500000D0, 3.17600000D0, 3.17700000D0, 3.17800000D0,
     &   3.17900000D0, 3.18000000D0, 3.18100000D0, 3.18200000D0,
     &   3.18300000D0, 3.18400000D0, 3.18500000D0, 3.18600000D0,
     &   3.18700000D0, 3.18800000D0, 3.18900000D0, 3.19000000D0,
     &   3.19100000D0, 3.19200000D0, 3.19300000D0, 3.19400000D0,
     &   3.19500000D0, 3.19600000D0, 3.19700000D0, 3.19800000D0,
     &   3.19900000D0, 3.19990000D0, 3.20100000D0, 3.20200000D0,
     &   3.20300000D0, 3.20400000D0, 3.20500000D0, 3.20600000D0,
     &   3.20700000D0, 3.20800000D0, 3.20900000D0, 3.21000000D0,
     &   3.25000000D0, 3.30000000D0, 3.37000000D0, 3.45000000D0,
     &   3.50000000D0, 3.52000000D0, 3.54000000D0, 3.56000000D0,
     &   3.57500000D0, 3.59000000D0, 3.59500000D0, 3.60500000D0,
     &   3.61000000D0, 3.61500000D0, 3.62000000D0, 3.62500000D0,
     &   3.63000000D0, 3.63500000D0, 3.64000000D0, 3.64500000D0,
     &   3.65000000D0, 3.65200000D0, 3.65400000D0, 3.65600000D0,
     &   3.65800000D0, 3.66000000D0, 3.66200000D0, 3.66300000D0,
     &   3.66400000D0, 3.66500000D0, 3.66600000D0, 3.66700000D0,
     &   3.66800000D0, 3.66900000D0, 3.67000000D0, 3.67100000D0,
     &   3.67200000D0, 3.67300000D0, 3.67400000D0, 3.67496000D0,
     &   3.67551000D0, 3.67606000D0, 3.67661000D0, 3.67716000D0/
       DATA  (ESA  (I), I= 901,1000) /
     &   3.67771000D0, 3.67826000D0, 3.67881000D0, 3.67936000D0,
     &   3.67991000D0, 3.68046000D0, 3.68101000D0, 3.68156000D0,
     &   3.68211000D0, 3.68266000D0, 3.68321000D0, 3.68376000D0,
     &   3.68431000D0, 3.68486000D0, 3.68527300D0, 3.68541000D0,
     &   3.68552000D0, 3.68569900D0, 3.68574600D0, 3.68578100D0,
     &   3.68580900D0, 3.68583200D0, 3.68585100D0, 3.68586800D0,
     &   3.68588300D0, 3.68589500D0, 3.68590700D0, 3.68591800D0,
     &   3.68592800D0, 3.68593700D0, 3.68594600D0, 3.68595300D0,
     &   3.68596100D0, 3.68596800D0, 3.68597500D0, 3.68598200D0,
     &   3.68598800D0, 3.68599500D0, 3.68600100D0, 3.68600700D0,
     &   3.68601300D0, 3.68602000D0, 3.68602600D0, 3.68603300D0,
     &   3.68603900D0, 3.68604700D0, 3.68605500D0, 3.68606600D0,
     &   3.68607500D0, 3.68608500D0, 3.68609000D0, 3.68609500D0,
     &   3.68610000D0, 3.68611400D0, 3.68612500D0, 3.68613300D0,
     &   3.68614100D0, 3.68614700D0, 3.68615400D0, 3.68616000D0,
     &   3.68616700D0, 3.68617300D0, 3.68617900D0, 3.68618500D0,
     &   3.68619200D0, 3.68619800D0, 3.68620500D0, 3.68621200D0,
     &   3.68621900D0, 3.68622700D0, 3.68623400D0, 3.68624300D0,
     &   3.68625200D0, 3.68626200D0, 3.68627300D0, 3.68628500D0,
     &   3.68629700D0, 3.68631200D0, 3.68632900D0, 3.68634800D0,
     &   3.68637100D0, 3.68639900D0, 3.68643400D0, 3.68648100D0,
     &   3.68654800D0, 3.68651000D0, 3.68660000D0, 3.68667000D0,
     &   3.68672000D0, 3.68685000D0, 3.68690700D0, 3.68706000D0,
     &   3.68761000D0, 3.68816000D0, 3.68871000D0, 3.68926000D0,
     &   3.68981000D0, 3.69036000D0, 3.69091000D0, 3.69146000D0/
       DATA  (ESA  (I), I=1001,1100) /
     &   3.69201000D0, 3.69256000D0, 3.69311000D0, 3.69366000D0,
     &   3.69421000D0, 3.69476000D0, 3.69531000D0, 3.69586000D0,
     &   3.69641000D0, 3.69696000D0, 3.69796000D0, 3.69950000D0,
     &   3.70050000D0, 3.70250000D0, 3.70450000D0, 3.70700000D0,
     &   3.71200000D0, 3.72128100D0, 3.73082800D0, 3.73660200D0,
     &   3.74060200D0, 3.74360300D0, 3.74597300D0, 3.74791700D0,
     &   3.74955600D0, 3.75096800D0, 3.75220600D0, 3.75330900D0,
     &   3.75430100D0, 3.75520500D0, 3.75603600D0, 3.75680500D0,
     &   3.75752300D0, 3.75819800D0, 3.75883700D0, 3.75944400D0,
     &   3.76002600D0, 3.76058600D0, 3.76112800D0, 3.76165500D0,
     &   3.76217200D0, 3.76268100D0, 3.76318700D0, 3.76369200D0,
     &   3.76420200D0, 3.76472200D0, 3.76526100D0, 3.76582800D0,
     &   3.76644200D0, 3.76713800D0, 3.76800500D0, 3.77000000D0,
     &   3.77199500D0, 3.77286200D0, 3.77355800D0, 3.77417200D0,
     &   3.77474000D0, 3.77527800D0, 3.77579800D0, 3.77630800D0,
     &   3.77681400D0, 3.77731900D0, 3.77782800D0, 3.77834500D0,
     &   3.77887200D0, 3.77941400D0, 3.77997400D0, 3.78055600D0,
     &   3.78116300D0, 3.78180200D0, 3.78247700D0, 3.78319500D0,
     &   3.78396400D0, 3.78479500D0, 3.78569900D0, 3.78669100D0,
     &   3.78779400D0, 3.78903200D0, 3.79044400D0, 3.79208300D0,
     &   3.79402700D0, 3.79639700D0, 3.79939800D0, 3.80339800D0,
     &   3.80917200D0, 3.81871900D0, 3.82200000D0, 3.83200000D0,
     &   3.85000000D0, 3.85200000D0, 3.86700000D0, 3.87300000D0,
     &   3.87800000D0, 3.88400000D0, 3.89000000D0, 3.89600000D0,
     &   3.90000000D0, 3.90200000D0, 3.90800000D0, 3.91400000D0/
       DATA  (ESA  (I), I=1101,1200) /
     &   3.92000000D0, 3.92600000D0, 3.93200000D0, 3.93800000D0,
     &   3.94400000D0, 3.95000000D0, 3.95600000D0, 3.96200000D0,
     &   3.96800000D0, 3.97400000D0, 3.98000000D0, 3.98600000D0,
     &   3.99200000D0, 3.99800000D0, 4.00000000D0, 4.00400000D0,
     &   4.01000000D0, 4.01600000D0, 4.02000000D0, 4.02200000D0,
     &   4.02800000D0, 4.03000000D0, 4.03400000D0, 4.04000000D0,
     &   4.04600000D0, 4.05000000D0, 4.05200000D0, 4.05800000D0,
     &   4.06400000D0, 4.07000000D0, 4.07600000D0, 4.08200000D0,
     &   4.08800000D0, 4.09000000D0, 4.09400000D0, 4.10000000D0,
     &   4.10500000D0, 4.10900000D0, 4.11000000D0, 4.11300000D0,
     &   4.11800000D0, 4.12100000D0, 4.12500000D0, 4.12900000D0,
     &   4.13000000D0, 4.13300000D0, 4.13600000D0, 4.14100000D0,
     &   4.14700000D0, 4.15000000D0, 4.15300000D0, 4.15900000D0,
     &   4.16500000D0, 4.17100000D0, 4.17700000D0, 4.18000000D0,
     &   4.18200000D0, 4.18500000D0, 4.19000000D0, 4.19500000D0,
     &   4.19900000D0, 4.20100000D0, 4.20800000D0, 4.21200000D0,
     &   4.21400000D0, 4.22000000D0, 4.22600000D0, 4.23200000D0,
     &   4.23800000D0, 4.24000000D0, 4.24400000D0, 4.25000000D0,
     &   4.25600000D0, 4.26200000D0, 4.26800000D0, 4.27400000D0,
     &   4.28000000D0, 4.29200000D0, 4.30000000D0, 4.30400000D0,
     &   4.31000000D0, 4.31600000D0, 4.32800000D0, 4.33000000D0,
     &   4.34000000D0, 4.35000000D0, 4.35200000D0, 4.36400000D0,
     &   4.37600000D0, 4.38000000D0, 4.38200000D0, 4.38800000D0,
     &   4.39000000D0, 4.39400000D0, 4.40000000D0, 4.40600000D0,
     &   4.41000000D0, 4.41200000D0, 4.41800000D0, 4.42400000D0/
       DATA  (ESA  (I), I=1201,1300) /
     &   4.43000000D0, 4.43600000D0, 4.44000000D0, 4.44200000D0,
     &   4.44800000D0, 4.45000000D0, 4.46000000D0, 4.47200000D0,
     &   4.48400000D0, 4.49600000D0, 4.50450000D0, 4.54000000D0,
     &   4.55000000D0, 4.57000000D0, 4.60000000D0, 4.62000000D0,
     &   4.65000000D0, 4.66000000D0, 4.70000000D0, 4.71000000D0,
     &   4.80000000D0, 4.90000000D0, 4.98000000D0, 5.06500000D0,
     &   5.15000000D0, 5.22500000D0, 5.25000000D0, 5.30000000D0,
     &   5.40000000D0, 5.45000000D0, 5.50000000D0, 5.60000000D0,
     &   5.70000000D0, 5.75000000D0, 5.80000000D0, 5.85000000D0,
     &   5.90000000D0, 5.95000000D0, 6.00000000D0, 6.05000000D0,
     &   6.10000000D0, 6.15000000D0, 6.20000000D0, 6.25000000D0,
     &   6.30000000D0, 6.35000000D0, 6.40000000D0, 6.45000000D0,
     &   6.50000000D0, 6.55000000D0, 6.60000000D0, 6.65000000D0,
     &   6.70000000D0, 6.75000000D0, 6.80000000D0, 6.85000000D0,
     &   6.90000000D0, 6.95000000D0, 7.00000000D0, 7.05000000D0,
     &   7.10000000D0, 7.15000000D0, 7.20000000D0, 7.25000000D0,
     &   7.30000000D0, 7.35000000D0, 7.40000000D0, 7.44000000D0,
     &   7.50000000D0, 7.60000000D0, 7.70000000D0, 7.80000000D0,
     &   7.90000000D0, 8.00000000D0, 8.10000000D0, 8.20000000D0,
     &   8.30000000D0, 8.40000000D0, 8.50000000D0, 8.60000000D0,
     &   8.70000000D0, 8.80000000D0, 8.90000000D0, 8.91000000D0,
     &   9.00000000D0, 9.10000000D0, 9.20000000D0, 9.28000000D0,
     &   9.30000000D0, 9.35000000D0, 9.39000000D0, 9.40000000D0,
     &   9.41000000D0, 9.41500000D0, 9.42000000D0, 9.42400000D0,
     &   9.42800000D0, 9.43000000D0, 9.43200000D0, 9.43400000D0/
       DATA  (ESA  (I), I=1301,1400) /
     &   9.43600000D0, 9.43800000D0, 9.44000000D0, 9.44100000D0,
     &   9.44200000D0, 9.44300000D0, 9.44400000D0, 9.44500000D0,
     &   9.44600000D0, 9.44700000D0, 9.44800000D0, 9.44900000D0,
     &   9.44937000D0, 9.44959000D0, 9.44981000D0, 9.45003000D0,
     &   9.45025000D0, 9.45047000D0, 9.45069000D0, 9.45091000D0,
     &   9.45113000D0, 9.45135000D0, 9.45157000D0, 9.45179000D0,
     &   9.45201000D0, 9.45223000D0, 9.45245000D0, 9.45267000D0,
     &   9.45289000D0, 9.45311000D0, 9.45333000D0, 9.45355000D0,
     &   9.45377000D0, 9.45399000D0, 9.45421000D0, 9.45443000D0,
     &   9.45465000D0, 9.45487000D0, 9.45509000D0, 9.45531000D0,
     &   9.45553000D0, 9.45575000D0, 9.45597000D0, 9.45619000D0,
     &   9.45641000D0, 9.45663000D0, 9.45685000D0, 9.45707000D0,
     &   9.45729000D0, 9.45751000D0, 9.45773000D0, 9.45795000D0,
     &   9.45817000D0, 9.45839000D0, 9.45861000D0, 9.45883000D0,
     &   9.45905000D0, 9.45927000D0, 9.45949000D0, 9.45971000D0,
     &   9.45993000D0, 9.46000000D0, 9.46014595D0, 9.46019268D0,
     &   9.46021366D0, 9.46022606D0, 9.46023464D0, 9.46024132D0,
     &   9.46024704D0, 9.46025085D0, 9.46025467D0, 9.46025848D0,
     &   9.46026039D0, 9.46026325D0, 9.46026516D0, 9.46026802D0,
     &   9.46026897D0, 9.46027088D0, 9.46027279D0, 9.46027470D0,
     &   9.46027565D0, 9.46027660D0, 9.46027851D0, 9.46027946D0,
     &   9.46028042D0, 9.46028233D0, 9.46028328D0, 9.46028423D0,
     &   9.46028519D0, 9.46028709D0, 9.46028805D0, 9.46028900D0,
     &   9.46029091D0, 9.46029186D0, 9.46029377D0, 9.46029568D0,
     &   9.46030045D0, 9.46030426D0, 9.46030617D0, 9.46030807D0/
       DATA  (ESA  (I), I=1401,1500) /
     &   9.46030998D0, 9.46031094D0, 9.46031189D0, 9.46031284D0,
     &   9.46031475D0, 9.46031570D0, 9.46031666D0, 9.46031761D0,
     &   9.46031952D0, 9.46032047D0, 9.46032143D0, 9.46032333D0,
     &   9.46032429D0, 9.46032619D0, 9.46032715D0, 9.46032906D0,
     &   9.46033096D0, 9.46033287D0, 9.46033478D0, 9.46033669D0,
     &   9.46033955D0, 9.46034145D0, 9.46034527D0, 9.46034908D0,
     &   9.46035290D0, 9.46035862D0, 9.46036530D0, 9.46037388D0,
     &   9.46038628D0, 9.46040726D0, 9.46045494D0, 9.46059000D0,
     &   9.46081000D0, 9.46103000D0, 9.46125000D0, 9.46147000D0,
     &   9.46169000D0, 9.46191000D0, 9.46213000D0, 9.46235000D0,
     &   9.46257000D0, 9.46279000D0, 9.46301000D0, 9.46323000D0,
     &   9.46345000D0, 9.46367000D0, 9.46389000D0, 9.46411000D0,
     &   9.46433000D0, 9.46455000D0, 9.46477000D0, 9.46499000D0,
     &   9.46521000D0, 9.46543000D0, 9.46565000D0, 9.46587000D0,
     &   9.46609000D0, 9.46631000D0, 9.46653000D0, 9.46675000D0,
     &   9.46697000D0, 9.46719000D0, 9.46741000D0, 9.46763000D0,
     &   9.46785000D0, 9.46807000D0, 9.46829000D0, 9.46851000D0,
     &   9.46873000D0, 9.46895000D0, 9.46917000D0, 9.46939000D0,
     &   9.46961000D0, 9.46983000D0, 9.47005000D0, 9.47027000D0,
     &   9.47049000D0, 9.47071000D0, 9.47093000D0, 9.47115000D0,
     &   9.47137000D0, 9.47337000D0, 9.47500000D0, 9.47700000D0,
     &   9.48000000D0, 9.48400000D0, 9.49000000D0, 9.49500000D0,
     &   9.50500000D0, 9.51000000D0, 9.51500000D0, 9.52000000D0,
     &   9.52500000D0, 9.53000000D0, 9.54000000D0, 9.55000000D0,
     &   9.60000000D0, 9.70000000D0, 9.80000000D0, 9.90000000D0/
       DATA  (ESA  (I), I=1501,1600) /
     &   9.95000000D0, 9.97500000D0, 9.99000000D0,10.00000000D0,
     &  10.01000000D0,10.01100000D0,10.01200000D0,10.01226000D0,
     &  10.01281000D0,10.01336000D0,10.01391000D0,10.01446000D0,
     &  10.01501000D0,10.01556000D0,10.01611000D0,10.01666000D0,
     &  10.01721000D0,10.01776000D0,10.01831000D0,10.01886000D0,
     &  10.01941000D0,10.01996000D0,10.02051000D0,10.02106000D0,
     &  10.02161000D0,10.02216000D0,10.02250000D0,10.02253750D0,
     &  10.02257500D0,10.02261250D0,10.02265000D0,10.02268750D0,
     &  10.02272500D0,10.02276250D0,10.02280000D0,10.02283750D0,
     &  10.02287500D0,10.02291250D0,10.02295000D0,10.02298750D0,
     &  10.02302500D0,10.02306250D0,10.02310000D0,10.02313750D0,
     &  10.02317500D0,10.02321250D0,10.02322000D0,10.02322500D0,
     &  10.02323000D0,10.02323400D0,10.02323700D0,10.02324000D0,
     &  10.02324200D0,10.02324400D0,10.02324600D0,10.02324800D0,
     &  10.02324930D0,10.02324950D0,10.02324960D0,10.02324980D0,
     &  10.02324988D0,10.02324994D0,10.02325000D0,10.02325060D0,
     &  10.02325150D0,10.02325250D0,10.02325340D0,10.02325440D0,
     &  10.02325540D0,10.02325630D0,10.02325680D0,10.02325730D0,
     &  10.02325780D0,10.02325850D0,10.02325900D0,10.02325950D0,
     &  10.02325980D0,10.02325990D0,10.02325995D0,10.02326000D0,
     &  10.02326005D0,10.02326010D0,10.02326050D0,10.02326100D0,
     &  10.02326150D0,10.02326390D0,10.02326490D0,10.02326680D0,
     &  10.02326770D0,10.02326870D0,10.02326970D0,10.02327060D0,
     &  10.02327160D0,10.02327250D0,10.02327350D0,10.02327440D0,
     &  10.02327540D0,10.02327630D0,10.02327730D0,10.02327820D0/
       DATA  (ESA  (I), I=1601,1700) /
     &  10.02328010D0,10.02328110D0,10.02328210D0,10.02328300D0,
     &  10.02328490D0,10.02328590D0,10.02328750D0,10.02329000D0,
     &  10.02330000D0,10.02331000D0,10.02332000D0,10.02333000D0,
     &  10.02334000D0,10.02335000D0,10.02336250D0,10.02339000D0,
     &  10.02340000D0,10.02341000D0,10.02342000D0,10.02343750D0,
     &  10.02347500D0,10.02351250D0,10.02355000D0,10.02358750D0,
     &  10.02362500D0,10.02366250D0,10.02370000D0,10.02373750D0,
     &  10.02377500D0,10.02381250D0,10.02385000D0,10.02388750D0,
     &  10.02392500D0,10.02396250D0,10.02400000D0,10.02436000D0,
     &  10.02491000D0,10.02546000D0,10.02656000D0,10.02766000D0,
     &  10.02876000D0,10.02986000D0,10.03096000D0,10.03206000D0,
     &  10.03316000D0,10.03426000D0,10.03500000D0,10.03600000D0,
     &  10.03700000D0,10.03800000D0,10.03900000D0,10.04000000D0,
     &  10.04500000D0,10.05000000D0,10.05500000D0,10.06000000D0,
     &  10.06500000D0,10.07000000D0,10.07500000D0,10.08000000D0,
     &  10.20000000D0,10.25000000D0,10.26000000D0,10.27000000D0,
     &  10.28000000D0,10.29000000D0,10.29500000D0,10.30000000D0,
     &  10.31000000D0,10.32000000D0,10.33000000D0,10.34000000D0,
     &  10.34420000D0,10.34493333D0,10.34566667D0,10.34640000D0,
     &  10.34713333D0,10.34786667D0,10.34860000D0,10.34933333D0,
     &  10.35006667D0,10.35080000D0,10.35153333D0,10.35226667D0,
     &  10.35300000D0,10.35309167D0,10.35318333D0,10.35327500D0,
     &  10.35336667D0,10.35345833D0,10.35355000D0,10.35364167D0,
     &  10.35373333D0,10.35382500D0,10.35391667D0,10.35400833D0,
     &  10.35410000D0,10.35419167D0,10.35428333D0,10.35437500D0/
       DATA  (ESA  (I), I=1701,1800) /
     &  10.35440000D0,10.35446667D0,10.35455833D0,10.35465000D0,
     &  10.35474167D0,10.35483334D0,10.35492500D0,10.35501667D0,
     &  10.35510834D0,10.35512330D0,10.35514660D0,10.35515710D0,
     &  10.35516340D0,10.35516780D0,10.35517110D0,10.35517370D0,
     &  10.35517580D0,10.35517760D0,10.35517920D0,10.35518060D0,
     &  10.35518180D0,10.35518290D0,10.35518390D0,10.35518480D0,
     &  10.35518570D0,10.35518650D0,10.35518720D0,10.35518790D0,
     &  10.35518860D0,10.35518930D0,10.35518990D0,10.35519050D0,
     &  10.35519110D0,10.35519170D0,10.35519230D0,10.35519280D0,
     &  10.35519340D0,10.35519400D0,10.35519460D0,10.35519530D0,
     &  10.35519600D0,10.35519680D0,10.35519770D0,10.35519970D0,
     &  10.35520000D0,10.35520100D0,10.35520230D0,10.35520320D0,
     &  10.35520400D0,10.35520470D0,10.35520540D0,10.35520600D0,
     &  10.35520660D0,10.35520720D0,10.35520770D0,10.35520830D0,
     &  10.35520890D0,10.35520950D0,10.35521010D0,10.35521070D0,
     &  10.35521140D0,10.35521210D0,10.35521280D0,10.35521350D0,
     &  10.35521430D0,10.35521520D0,10.35521610D0,10.35521710D0,
     &  10.35521820D0,10.35521940D0,10.35522080D0,10.35522240D0,
     &  10.35522420D0,10.35522630D0,10.35522890D0,10.35523220D0,
     &  10.35523660D0,10.35524290D0,10.35525340D0,10.35527670D0,
     &  10.35529000D0,10.35529300D0,10.35529700D0,10.35531000D0,
     &  10.35532500D0,10.35538334D0,10.35547500D0,10.35556667D0,
     &  10.35565834D0,10.35575000D0,10.35584167D0,10.35593334D0,
     &  10.35602500D0,10.35611667D0,10.35620834D0,10.35630000D0,
     &  10.35639167D0,10.35648334D0,10.35657500D0,10.35666667D0/
       DATA  (ESA  (I), I=1801,1900) /
     &  10.35740000D0,10.35813333D0,10.35886667D0,10.35960000D0,
     &  10.36033333D0,10.36106667D0,10.36180000D0,10.36326667D0,
     &  10.36473333D0,10.36546667D0,10.36620000D0,10.37000000D0,
     &  10.37500000D0,10.38000000D0,10.38500000D0,10.39000000D0,
     &  10.39500000D0,10.40000000D0,10.40500000D0,10.41000000D0,
     &  10.41500000D0,10.42000000D0,10.42500000D0,10.43000000D0,
     &  10.43500000D0,10.44000000D0,10.44500000D0,10.45000000D0,
     &  10.45500000D0,10.46000000D0,10.46500000D0,10.47000000D0,
     &  10.47300000D0,10.52897000D0,10.54217000D0,10.54889000D0,
     &  10.55317000D0,10.55622000D0,10.55855000D0,10.56042000D0,
     &  10.56197000D0,10.56328000D0,10.56442000D0,10.56543000D0,
     &  10.56633000D0,10.56714000D0,10.56788000D0,10.56857000D0,
     &  10.56921000D0,10.56980000D0,10.57036000D0,10.57090000D0,
     &  10.57141000D0,10.57189000D0,10.57237000D0,10.57282000D0,
     &  10.57327000D0,10.57371000D0,10.57415000D0,10.57459000D0,
     &  10.57503000D0,10.57547000D0,10.57594000D0,10.57643000D0,
     &  10.57695000D0,10.57755000D0,10.57829000D0,10.58000000D0,
     &  10.58171000D0,10.58245000D0,10.58305000D0,10.58357000D0,
     &  10.58406000D0,10.58453000D0,10.58497000D0,10.58541000D0,
     &  10.58585000D0,10.58629000D0,10.58673000D0,10.58718000D0,
     &  10.58763000D0,10.58811000D0,10.58859000D0,10.58910000D0,
     &  10.58964000D0,10.59020000D0,10.59079000D0,10.59143000D0,
     &  10.59212000D0,10.59286000D0,10.59367000D0,10.59457000D0,
     &  10.59558000D0,10.59671000D0,10.59803000D0,10.59958000D0,
     &  10.60145000D0,10.60378000D0,10.60683000D0,10.61111000D0/
       DATA  (ESA  (I), I=1901,2000) /
     &  10.61783000D0,10.63103000D0,10.68700000D0,10.69000000D0,
     &  10.71309000D0,10.72975000D0,10.74256000D0,10.75286000D0,
     &  10.76141000D0,10.76869000D0,10.77500000D0,10.78057000D0,
     &  10.78554000D0,10.79004000D0,10.79414000D0,10.79791000D0,
     &  10.80141000D0,10.80468000D0,10.80775000D0,10.81065000D0,
     &  10.81341000D0,10.81604000D0,10.81858000D0,10.82102000D0,
     &  10.82339000D0,10.82570000D0,10.82796000D0,10.83019000D0,
     &  10.83240000D0,10.83460000D0,10.83681000D0,10.83906000D0,
     &  10.84135000D0,10.84374000D0,10.84626000D0,10.84900000D0,
     &  10.85212000D0,10.85601000D0,10.86500000D0,10.87288000D0,
     &  10.87627000D0,10.87895000D0,10.88128000D0,10.88340000D0,
     &  10.88539000D0,10.88728000D0,10.88910000D0,10.89088000D0,
     &  10.89262000D0,10.89434000D0,10.89605000D0,10.89775000D0,
     &  10.89946000D0,10.90119000D0,10.90292000D0,10.90468000D0,
     &  10.90648000D0,10.90830000D0,10.91017000D0,10.91208000D0,
     &  10.91406000D0,10.91609000D0,10.91820000D0,10.92038000D0,
     &  10.92266000D0,10.92504000D0,10.92754000D0,10.93017000D0,
     &  10.93295000D0,10.93590000D0,10.93905000D0,10.94242000D0,
     &  10.94606000D0,10.95000000D0,10.97500000D0,10.97638000D0,
     &  10.97771000D0,10.97900000D0,10.98025000D0,10.98146000D0,
     &  10.98263000D0,10.98377000D0,10.98489000D0,10.98598000D0,
     &  10.98705000D0,10.98810000D0,10.98913000D0,10.99014000D0,
     &  10.99114000D0,10.99213000D0,10.99310000D0,10.99407000D0,
     &  10.99504000D0,10.99600000D0,10.99697000D0,10.99793000D0,
     &  10.99890000D0,10.99988000D0,11.00087000D0,11.00188000D0/
       DATA  (ESA  (I), I=2001,2100) /
     &  11.00290000D0,11.00396000D0,11.00506000D0,11.00621000D0,
     &  11.00742000D0,11.00873000D0,11.01018000D0,11.01186000D0,
     &  11.01399000D0,11.01900000D0,11.02401000D0,11.02614000D0,
     &  11.02782000D0,11.02927000D0,11.03058000D0,11.03179000D0,
     &  11.03294000D0,11.03404000D0,11.03510000D0,11.03612000D0,
     &  11.03713000D0,11.03812000D0,11.03910000D0,11.04007000D0,
     &  11.04103000D0,11.04200000D0,11.04296000D0,11.04392000D0,
     &  11.04490000D0,11.04587000D0,11.04686000D0,11.04786000D0,
     &  11.04887000D0,11.04990000D0,11.05095000D0,11.05202000D0,
     &  11.05311000D0,11.05423000D0,11.05537000D0,11.05654000D0,
     &  11.05775000D0,11.05900000D0,11.06029000D0,11.06162000D0,
     &  11.06300000D0,11.07000000D0,11.09200000D0,11.11500000D0,
     &  11.13700000D0,11.16000000D0,11.18200000D0,11.20500000D0,
     &  11.22700000D0,11.25000000D0,11.27300000D0,11.29500000D0,
     &  11.31800000D0,11.34000000D0,11.50000000D0,11.65500000D0,
     &  11.67700000D0,11.70000000D0,11.72200000D0,11.74500000D0,
     &  11.76700000D0,11.79000000D0,11.81200000D0,11.83500000D0,
     &  11.85800000D0,11.88000000D0,11.90300000D0,11.92500000D0,
     &  11.94800000D0,11.97000000D0,11.99300000D0,12.01500000D0,
     &  12.03800000D0,12.06000000D0,12.08300000D0,12.10500000D0,
     &  12.12700000D0,12.15000000D0,12.17200000D0,12.19500000D0,
     &  12.21700000D0,12.24000000D0,12.26200000D0,12.28500000D0,
     &  12.30700000D0,12.33000000D0,12.35200000D0,12.37500000D0,
     &  12.39800000D0,12.42000000D0,12.44300000D0,12.46500000D0,
     &  12.48800000D0,12.51000000D0,12.53300000D0,12.55500000D0/
       DATA  (ESA  (I), I=2101,2174) /
     &  12.57800000D0,12.60000000D0,12.62300000D0,12.64500000D0,
     &  12.66700000D0,12.69000000D0,12.71200000D0,12.73500000D0,
     &  12.75700000D0,12.78000000D0,12.80200000D0,12.82500000D0,
     &  12.84700000D0,12.87000000D0,12.89200000D0,12.91500000D0,
     &  12.93800000D0,12.96000000D0,12.98300000D0,13.00500000D0,
     &  13.02800000D0,13.05000000D0,13.07300000D0,13.09500000D0,
     &  13.11800000D0,13.14000000D0,13.16300000D0,13.18500000D0,
     &  13.20800000D0,13.23000000D0,13.25200000D0,13.27500000D0,
     &  13.29700000D0,13.32000000D0,13.34200000D0,13.36500000D0,
     &  13.38700000D0,13.41000000D0,13.43200000D0,13.45500000D0,
     &  13.47700000D0,13.50000000D0,13.75000000D0,14.00000000D0,
     &  14.04000000D0,16.00000000D0,17.00000000D0,20.00000000D0,
     &  21.95000000D0,22.05000000D0,25.00000000D0,25.01000000D0,
     &  27.50000000D0,27.60000000D0,27.66000000D0,29.00000000D0,
     &  29.93000000D0,30.10000000D0,30.38000000D0,30.80000000D0,
     &  31.10000000D0,31.29000000D0,33.20000000D0,33.30000000D0,
     &  33.89000000D0,34.00000000D0,34.50000000D0,34.70000000D0,
     &  34.86000000D0,35.01000000D0,35.45000000D0,36.10000000D0,
     &  36.38000000D0,38.29000000D0/
  
         DATA ((DAS  (I,J), I=   1, 100), J=1,1) /
     &  -9.24290391E-04,-9.82925597E-04,-1.03948542E-03,-1.09691913E-03,
     &  -1.15650038E-03,-1.18616347E-03,-1.23683683E-03,-1.32920976E-03,
     &  -1.36715733E-03,-1.40522098E-03,-1.46304876E-03,-1.51947541E-03,
     &  -1.58330491E-03,-1.62530042E-03,-1.67658861E-03,-1.72857702E-03,
     &  -1.78073571E-03,-1.83287508E-03,-1.87573760E-03,-1.93135465E-03,
     &  -1.97679841E-03,-2.03309973E-03,-2.07794798E-03,-2.13669104E-03,
     &  -2.18531295E-03,-2.23330975E-03,-2.29219674E-03,-2.32638420E-03,
     &  -2.34178952E-03,-2.39278988E-03,-2.44450397E-03,-2.49625573E-03,
     &  -2.54865997E-03,-2.60211872E-03,-2.65816086E-03,-2.71647334E-03,
     &  -2.77484866E-03,-2.83509575E-03,-2.89738866E-03,-2.96211134E-03,
     &  -3.01286359E-03,-3.07552223E-03,-3.14278373E-03,-3.19295078E-03,
     &  -3.26162042E-03,-3.33163708E-03,-3.38634446E-03,-3.46227954E-03,
     &  -3.52006215E-03,-3.60070734E-03,-4.04602956E-03,-4.52512839E-03,
     &  -5.20830640E-03,-6.08322735E-03,-6.37865368E-03,-6.45834760E-03,
     &  -6.69620653E-03,-7.01094094E-03,-7.34109338E-03,-7.67943236E-03,
     &  -8.03353696E-03,-8.15738166E-03,-8.37356042E-03,-8.72811878E-03,
     &  -9.02447043E-03,-9.33247834E-03,-9.58513216E-03,-9.81335929E-03,
     &  -9.84800651E-03,-9.92347614E-03,-9.95285139E-03,-1.02852829E-02,
     &  -9.87202853E-03,-9.63001962E-03,-9.19077933E-03,-8.63522557E-03,
     &  -7.85501484E-03,-6.95077756E-03,-6.12337414E-03,-5.87986731E-03,
     &  -5.47235873E-03,-5.02261022E-03,-4.71215478E-03,-4.54125909E-03,
     &  -4.43268139E-03,-4.65798226E-03,-5.03842070E-03,-5.37075394E-03,
     &  -5.64951505E-03,-5.95186946E-03,-6.20087716E-03,-6.38159975E-03,
     &  -6.53776104E-03,-6.55666009E-03,-6.52040936E-03,-6.46693501E-03,
     &  -6.38976326E-03,-6.31143393E-03,-6.20262176E-03,-6.05592335E-03/
  
         DATA ((DAS  (I,J), I= 101, 200), J=1,1) /
     &  -5.76676009E-03,-5.49600610E-03,-5.19266687E-03,-4.84470522E-03,
     &  -4.48466799E-03,-4.00747144E-03,-3.53977135E-03,-3.08156769E-03,
     &  -2.50683215E-03,-1.84633206E-03,-1.14725311E-03,-2.58508344E-04,
     &   6.57442892E-04, 1.62327266E-03, 2.86149461E-03, 4.34672824E-03,
     &   6.37232590E-03, 1.13753866E-02, 1.61193314E-02, 1.79074014E-02,
     &   1.91811409E-02, 2.01786038E-02, 2.10055015E-02, 2.16586856E-02,
     &   2.22204815E-02, 2.26794083E-02, 2.30558244E-02, 2.33674846E-02,
     &   2.35896976E-02, 2.37390380E-02, 2.38726802E-02, 2.46066708E-02,
     &   2.40004567E-02, 2.40191399E-02, 2.39861858E-02, 2.39067702E-02,
     &   2.38201350E-02, 2.36647048E-02, 2.35483316E-02, 2.32794365E-02,
     &   2.31168781E-02, 2.28108417E-02, 2.25406400E-02, 2.21419338E-02,
     &   2.17376837E-02, 2.12157769E-02, 2.06331736E-02, 1.99888760E-02,
     &   1.92475821E-02, 1.84158567E-02, 1.75310975E-02, 1.65218178E-02,
     &   1.63087098E-02, 1.57535619E-02, 1.51984139E-02, 1.47513653E-02,
     &   1.44656810E-02, 1.41483085E-02, 1.36410913E-02, 1.35329797E-02,
     &   1.33633888E-02, 1.32192751E-02, 1.31219449E-02, 1.29934250E-02,
     &   1.29050039E-02, 1.27984781E-02, 1.26988173E-02, 1.26278238E-02,
     &   1.22870873E-02, 1.19500424E-02, 1.15992115E-02, 1.13057180E-02,
     &   1.09585048E-02, 1.06027317E-02, 1.02313791E-02, 9.92334155E-03,
     &   9.52727133E-03, 9.13815597E-03, 8.81336337E-03, 8.62884300E-03,
     &   8.27704498E-03, 8.12677292E-03, 7.75261651E-03, 7.43581506E-03,
     &   7.05050192E-03, 6.69732678E-03, 6.26974840E-03, 5.89351690E-03,
     &   5.49053267E-03, 4.98656823E-03, 4.72197971E-03, 4.53912392E-03,
     &   4.16097138E-03, 3.96011009E-03, 3.73775323E-03, 3.50468161E-03,
     &   3.25383883E-03, 3.00928660E-03, 2.74858154E-03, 2.19324259E-03/
  
         DATA ((DAS  (I,J), I= 201, 300), J=1,1) /
     &   1.57172016E-03, 1.20383425E-03, 1.06557671E-03, 9.26311881E-04,
     &   7.79940706E-04, 6.31094491E-04, 4.91296572E-04, 3.13748232E-04,
     &   1.33489078E-04,-2.12921239E-05,-2.00914399E-04,-3.99020265E-04,
     &  -5.73716931E-04,-7.69561404E-04,-9.75159145E-04,-1.18694051E-03,
     &  -1.40858395E-03,-1.63809704E-03,-1.87342275E-03,-2.11423762E-03,
     &  -2.37592077E-03,-2.57138824E-03,-2.90611654E-03,-3.23695513E-03,
     &  -3.55396970E-03,-3.89328282E-03,-4.25070806E-03,-4.64195638E-03,
     &  -4.98581454E-03,-5.48797199E-03,-5.66167672E-03,-5.91890670E-03,
     &  -5.97577607E-03,-6.59421875E-03,-7.17520298E-03,-7.77544106E-03,
     &  -8.43725630E-03,-9.13281064E-03,-9.96182107E-03,-1.06922206E-02,
     &  -1.15685471E-02,-1.25332288E-02,-1.34176499E-02,-1.47561987E-02,
     &  -1.60947475E-02,-1.75295174E-02,-1.91649332E-02,-2.10475080E-02,
     &  -2.31558179E-02,-2.55775318E-02,-2.83883876E-02,-3.16256074E-02,
     &  -3.53866315E-02,-3.90060789E-02,-4.09841470E-02,-4.23336193E-02,
     &  -4.41963985E-02,-4.51008378E-02,-4.45560359E-02,-4.78611025E-02,
     &  -4.92023765E-02,-5.03959020E-02,-5.14672421E-02,-5.23172038E-02,
     &  -5.28552827E-02,-5.29651364E-02,-5.20352722E-02,-5.03644829E-02,
     &  -4.91827871E-02,-4.59422100E-02,-4.13947579E-02,-3.53920072E-02,
     &  -2.55571558E-02,-1.89727072E-02,-8.92666383E-03, 1.85515657E-03,
     &   1.28240063E-02, 2.34302357E-02, 3.31581345E-02, 4.16287856E-02,
     &   4.86635256E-02, 5.42168243E-02, 5.83518468E-02, 6.12412556E-02,
     &   6.30824714E-02, 6.40569138E-02, 6.43621785E-02, 6.41485722E-02,
     &   6.35438190E-02, 6.26486204E-02, 6.09943019E-02, 6.05142150E-02,
     &   5.81733108E-02, 5.75914338E-02, 5.63349977E-02, 5.49650407E-02,
     &   5.36185519E-02, 5.23010825E-02, 5.09963899E-02, 4.97554919E-02/
  
         DATA ((DAS  (I,J), I= 301, 400), J=1,1) /
     &   4.95775338E-02, 4.73811321E-02, 4.62599029E-02, 4.51888900E-02,
     &   4.17208961E-02, 3.87849226E-02, 3.61786239E-02, 3.39263398E-02,
     &   3.19650663E-02, 2.98882182E-02, 2.87199610E-02, 2.73645848E-02,
     &   2.61536371E-02, 2.50680402E-02, 2.40808160E-02, 2.31815060E-02,
     &   2.24076864E-02, 2.16486418E-02, 2.09681798E-02, 2.03229853E-02,
     &   1.98250307E-02, 1.92893243E-02, 1.92750914E-02, 1.83186797E-02,
     &   1.79099856E-02, 1.77804846E-02, 1.80046463E-02, 1.76254044E-02,
     &   1.71040704E-02, 1.67424232E-02, 1.63987719E-02, 1.61062110E-02,
     &   1.58232676E-02, 1.55504219E-02, 1.52923846E-02, 1.50505834E-02,
     &   1.48204497E-02, 1.46010365E-02, 1.43969989E-02, 1.41945615E-02,
     &   1.40064011E-02, 1.38207702E-02, 1.36446836E-02, 1.34981488E-02,
     &   1.33138174E-02, 1.31642902E-02, 1.30210086E-02, 1.28549252E-02,
     &   1.27013065E-02, 1.25799245E-02, 1.24597769E-02, 1.23334914E-02,
     &   1.22105702E-02, 1.20921080E-02, 1.19703624E-02, 1.18522804E-02,
     &   1.15374302E-02, 1.08549370E-02, 9.77341206E-03, 8.97380949E-03,
     &   8.36239441E-03, 7.85255198E-03, 7.40940967E-03, 7.02988036E-03,
     &   6.69278877E-03, 6.66123695E-03, 6.25981329E-03, 5.98597130E-03,
     &   5.89584908E-03, 5.66265876E-03, 5.44325103E-03, 5.44219692E-03,
     &   5.24107778E-03, 5.04948688E-03, 4.95790569E-03, 4.86251961E-03,
     &   4.70842985E-03, 4.55284294E-03, 4.41882801E-03, 4.28962111E-03,
     &   4.22215965E-03, 4.16878725E-03, 4.05097770E-03, 3.93005182E-03,
     &   3.91412783E-03, 3.82105065E-03, 3.72823377E-03, 3.68755751E-03,
     &   3.64425929E-03, 3.55971636E-03, 3.46088197E-03, 3.35896951E-03,
     &   3.32422036E-03, 3.26435169E-03, 3.21787757E-03, 3.18576499E-03,
     &   3.12953007E-03, 3.06321857E-03, 3.05925393E-03, 3.00729694E-03/
  
         DATA ((DAS  (I,J), I= 401, 500), J=1,1) /
     &   2.93705611E-03, 2.92824807E-03, 2.93992683E-03, 2.97850346E-03,
     &   2.93923457E-03, 2.97583012E-03, 2.97870649E-03, 2.98426595E-03,
     &   2.99846249E-03, 3.03502108E-03, 3.08629505E-03, 3.14481056E-03,
     &   3.15205002E-03, 3.21895537E-03, 3.22658588E-03, 3.26267110E-03,
     &   3.29001083E-03, 3.36135970E-03, 3.36865816E-03, 3.39360877E-03,
     &   3.39493400E-03, 3.39645512E-03, 3.40663791E-03, 3.42657995E-03,
     &   3.43128094E-03, 3.46197572E-03, 3.46470793E-03, 3.47642747E-03,
     &   3.47908746E-03, 3.49727240E-03, 3.50983526E-03, 3.54698895E-03,
     &   3.55482461E-03, 3.63433616E-03, 3.71101934E-03, 3.75523897E-03,
     &   3.76379757E-03, 3.91591535E-03, 3.94410286E-03, 4.11169004E-03,
     &   4.25694545E-03, 4.31765377E-03, 4.35976536E-03, 4.38055715E-03,
     &   4.59148075E-03, 4.63446612E-03, 4.75009135E-03, 4.85468995E-03,
     &   4.90233614E-03, 5.03781773E-03, 5.13513780E-03, 5.15403919E-03,
     &   5.16438191E-03, 5.22468318E-03, 5.24975650E-03, 5.27372586E-03,
     &   5.37688988E-03, 5.38951373E-03, 5.41103336E-03, 5.41523765E-03,
     &   5.41064827E-03, 5.40986303E-03, 5.40261794E-03, 5.39566997E-03,
     &   5.39180329E-03, 5.36430514E-03, 5.32798459E-03, 5.28556297E-03,
     &   5.21304328E-03, 5.12881402E-03, 5.12094515E-03, 4.98580061E-03,
     &   4.88305405E-03, 4.78389844E-03, 4.76536166E-03, 4.64616719E-03,
     &   4.63827947E-03, 4.61602870E-03, 4.57469060E-03, 4.58618579E-03,
     &   4.61415434E-03, 4.65840750E-03, 4.66996469E-03, 4.67564862E-03,
     &   4.68377580E-03, 4.66454192E-03, 4.64584846E-03, 4.62631653E-03,
     &   4.58837183E-03, 4.57825009E-03, 4.55062448E-03, 4.54439354E-03,
     &   4.52117240E-03, 4.49414135E-03, 4.46877228E-03, 4.45852495E-03,
     &   4.40866565E-03, 4.31439377E-03, 4.39541501E-03, 4.45620421E-03/
  
         DATA ((DAS  (I,J), I= 501, 600), J=1,1) /
     &   4.54898637E-03, 4.66576580E-03, 4.82869758E-03, 4.81577665E-03,
     &   4.78997432E-03, 4.68781025E-03, 4.59494798E-03, 4.46760052E-03,
     &   4.31420060E-03, 4.14371497E-03, 3.92877511E-03, 3.65306884E-03,
     &   3.28038256E-03, 2.75175565E-03, 1.99483323E-03, 8.55114258E-04,
     &   5.56888117E-04, 2.25950088E-04,-1.43807593E-04,-5.59825238E-04,
     &  -1.03139105E-03,-1.57055203E-03,-2.19355597E-03,-2.32995349E-03,
     &  -2.47067689E-03,-2.61626628E-03,-2.76641212E-03,-2.92173998E-03,
     &  -3.08240355E-03,-3.24882701E-03,-3.42098499E-03,-3.59948469E-03,
     &  -3.78464966E-03,-4.71830091E-03,-5.43576573E-03,-5.82970093E-03,
     &  -6.10782954E-03,-6.39921823E-03,-6.70470658E-03,-7.02525358E-03,
     &  -7.36188420E-03,-7.71593313E-03,-7.89989518E-03,-8.08876027E-03,
     &  -8.28271163E-03,-8.48195426E-03,-8.68677709E-03,-8.89726551E-03,
     &  -9.11366469E-03,-9.33645408E-03,-9.56580169E-03,-9.80200190E-03,
     &  -1.00453616E-02,-1.02962114E-02,-1.05549042E-02,-1.08218074E-02,
     &  -1.10973236E-02,-1.13818420E-02,-1.16759736E-02,-1.19799607E-02,
     &  -1.22944684E-02,-1.26200171E-02,-1.29571973E-02,-1.33066457E-02,
     &  -1.36690439E-02,-1.40451271E-02,-1.44356818E-02,-1.48415452E-02,
     &  -1.52637038E-02,-1.57031082E-02,-1.61609111E-02,-1.66382193E-02,
     &  -1.71362957E-02,-1.76565276E-02,-1.82004742E-02,-1.87698029E-02,
     &  -1.93662134E-02,-1.99918381E-02,-2.06487254E-02,-2.13393463E-02,
     &  -2.20663673E-02,-2.28327840E-02,-2.32317978E-02,-2.36419115E-02,
     &  -2.40635954E-02,-2.44973487E-02,-2.49436938E-02,-2.54031888E-02,
     &  -2.58763562E-02,-2.63640331E-02,-2.68666616E-02,-2.73849631E-02,
     &  -2.79199098E-02,-2.84717956E-02,-2.90420306E-02,-2.96314623E-02,
     &  -3.02408441E-02,-3.08712901E-02,-3.15239125E-02,-3.21999034E-02/
  
         DATA ((DAS  (I,J), I= 601, 700), J=1,1) /
     &  -3.29005684E-02,-3.36272548E-02,-3.43814563E-02,-3.51647548E-02,
     &  -3.59788642E-02,-3.68256428E-02,-3.77071049E-02,-3.86254180E-02,
     &  -3.95829444E-02,-4.05822520E-02,-4.16264479E-02,-4.27180179E-02,
     &  -4.38605202E-02,-4.50576555E-02,-4.63134498E-02,-4.76322616E-02,
     &  -4.90190754E-02,-5.04792357E-02,-5.20187218E-02,-5.36441915E-02,
     &  -5.60784791E-02,-5.71836025E-02,-5.91151458E-02,-6.11681909E-02,
     &  -6.33545603E-02,-6.56876777E-02,-6.81828468E-02,-7.08575803E-02,
     &  -7.37320056E-02,-7.68293798E-02,-8.01767207E-02,-8.38056791E-02,
     &  -8.77532482E-02,-9.09050971E-02,-1.00728059E-01,-1.12766736E-01,
     &  -1.27869795E-01,-1.47384555E-01,-1.73596732E-01,-2.10770435E-01,
     &  -2.69970555E-01,-3.61321349E-01,-5.53199628E-01,-1.16865786E+00,
     &  -1.23607696E+00,-1.31169150E+00,-1.39721647E+00,-1.49423697E+00,
     &  -1.60579565E+00,-1.73517989E+00,-1.88699998E+00,-2.06759146E+00,
     &  -2.28589337E+00,-2.55491853E+00,-2.89447731E+00,-3.32145953E+00,
     &  -3.92891454E+00,-3.99970795E+00,-5.58488637E+00,-6.74022643E+00,
     &  -7.66851933E+00,-4.78259898E+00,-9.10032032E+00,-9.29781190E+00,
     &  -1.00727109E+01,-1.05094712E+01,-1.08127719E+01,-1.10928166E+01,
     &  -1.12873881E+01,-1.14439784E+01,-1.15294593E+01,-1.15903254E+01,
     &  -1.15936890E+01,-1.15583795E+01,-1.14661198E+01,-1.13674221E+01,
     &  -1.11539612E+01,-1.09618770E+01,-1.07248135E+01,-1.02319974E+01,
     &  -9.74960454E+00,-9.21934295E+00,-8.64428796E+00,-8.72242790E+00,
     &  -8.13809946E+00,-7.49014679E+00,-6.78010087E+00,-5.60549911E+00,
     &  -4.75634619E+00,-3.43345429E+00,-1.96702321E+00, 1.98010396E+00,
     &   5.61478554E+00, 6.78771224E+00, 7.82826697E+00, 8.44392485E+00,
     &   9.24841481E+00, 9.24624634E+00, 9.77033780E+00, 1.02456531E+01/
  
         DATA ((DAS  (I,J), I= 701, 800), J=1,1) /
     &   1.06696590E+01, 1.09722290E+01, 1.12017030E+01, 1.13188021E+01,
     &   1.14352743E+01, 1.15191605E+01, 1.15740473E+01, 1.16089934E+01,
     &   8.99901993E+00, 9.52139089E+00, 1.14861564E+01, 1.14179060E+01,
     &   1.12487952E+01, 1.10994818E+01, 1.08792183E+01, 1.06431499E+01,
     &   1.03364394E+01, 1.00887224E+01, 9.35410054E+00, 9.16897255E+00,
     &   8.65187255E+00, 8.06914649E+00, 7.31966725E+00, 6.39416796E+00,
     &   5.38756521E+00, 4.44046416E+00, 3.70478347E+00, 3.17393779E+00,
     &   2.77423842E+00, 2.46301614E+00, 2.21409767E+00, 2.01061858E+00,
     &   1.84130623E+00, 1.69813772E+00, 1.57563103E+00, 1.46959858E+00,
     &   1.37694011E+00, 1.29528186E+00, 1.22278026E+00, 1.15798078E+00,
     &   1.09972067E+00, 1.04705976E+00, 9.99229307E-01, 5.26718946E-01,
     &   3.58959049E-01, 2.73204632E-01, 2.22444091E-01, 1.85275892E-01,
     &   1.59693889E-01, 1.40577845E-01, 1.25715948E-01, 1.13821404E-01,
     &   1.04083221E-01, 1.02930434E-01, 9.48960405E-02, 8.80939803E-02,
     &   8.22605198E-02, 7.72023277E-02, 7.27742843E-02, 6.88654403E-02,
     &   6.53893549E-02, 6.22780159E-02, 5.94768605E-02, 5.69414949E-02,
     &   5.46358593E-02, 5.25300319E-02, 5.05990768E-02, 4.88220706E-02,
     &   4.71812921E-02, 4.56615094E-02, 4.42501439E-02, 4.29355404E-02,
     &   4.17085211E-02, 4.05602602E-02, 3.94834923E-02, 3.84717365E-02,
     &   3.75192711E-02, 3.66210241E-02, 3.57724891E-02, 3.49697466E-02,
     &   3.42090057E-02, 3.34871196E-02, 3.28010661E-02, 3.21484251E-02,
     &   3.15267286E-02, 3.09338212E-02, 3.03677444E-02, 2.98267300E-02,
     &   2.93091299E-02, 2.88134594E-02, 2.83381915E-02, 2.78826329E-02,
     &   2.74449515E-02, 2.70242247E-02, 2.66197525E-02, 2.62304718E-02,
     &   2.58555527E-02, 2.54942016E-02, 2.51457007E-02, 2.48093745E-02/
  
         DATA ((DAS  (I,J), I= 801, 900), J=1,1) /
     &   2.44844836E-02, 2.41709301E-02, 2.38675318E-02, 2.35738978E-02,
     &   2.32898478E-02, 2.30148002E-02, 2.27483333E-02, 2.24900512E-02,
     &   2.22395892E-02, 2.19966036E-02, 2.17607720E-02, 2.15317929E-02,
     &   2.13093254E-02, 2.10932792E-02, 2.08832313E-02, 2.06790080E-02,
     &   2.04803757E-02, 2.02871308E-02, 2.00990790E-02, 1.99160392E-02,
     &   1.97378317E-02, 1.95643225E-02, 1.93954572E-02, 1.92307927E-02,
     &   1.90705425E-02, 1.89144911E-02, 1.87625401E-02, 1.86146254E-02,
     &   1.84707013E-02, 1.83307435E-02, 1.81947585E-02, 1.80628540E-02,
     &   1.79349917E-02, 1.78113553E-02, 1.76923150E-02, 1.75782187E-02,
     &   1.72942739E-02, 1.71715141E-02, 1.70512398E-02, 1.69333731E-02,
     &   1.68178390E-02, 1.67046626E-02, 1.65935757E-02, 1.64845082E-02,
     &   1.63776253E-02, 1.62831098E-02, 1.61697677E-02, 1.60687205E-02,
     &   1.59695105E-02, 1.58720884E-02, 1.57764750E-02, 1.56824620E-02,
     &   1.55900915E-02, 1.54991517E-02, 1.54100377E-02, 1.53223349E-02,
     &   1.26850471E-02, 1.08085690E-02, 9.13165844E-03, 7.62613128E-03,
     &   6.63308141E-03, 6.17175645E-03, 5.63697233E-03, 4.98970123E-03,
     &   4.39118831E-03, 3.64215569E-03, 3.34872493E-03, 2.67524632E-03,
     &   2.29891828E-03, 1.86843772E-03, 1.36730020E-03, 7.84065057E-04,
     &   1.01642794E-04,-7.06904694E-04,-1.67964541E-03,-2.87499851E-03,
     &  -4.38372615E-03,-5.10602983E-03,-5.91526679E-03,-6.82880253E-03,
     &  -7.86894887E-03,-9.06485906E-03,-1.04553839E-02,-1.12394342E-02,
     &  -1.20934458E-02,-1.30273196E-02,-1.40530284E-02,-1.51850550E-02,
     &  -1.64408575E-02,-1.78423943E-02,-1.94168080E-02,-2.11985172E-02,
     &  -2.32317265E-02,-2.55743649E-02,-2.83031381E-02,-3.13831175E-02,
     &  -3.33992810E-02,-3.56365411E-02,-3.81335855E-02,-4.09387071E-02/
  
         DATA ((DAS  (I,J), I= 901,1000), J=1,1) /
     &  -4.41129897E-02,-4.77348548E-02,-5.19067035E-02,-5.67648763E-02,
     &  -6.24950320E-02,-6.93569335E-02,-7.77254645E-02,-8.81635919E-02,
     &  -1.01558325E-01,-1.19400321E-01,-1.44422217E-01,-1.82369074E-01,
     &  -2.49490824E-01,-3.68212219E-01,-5.38199413E-01,-6.36777915E-01,
     &  -7.44674710E-01,-1.01078516E+00,-1.10697238E+00,-1.13766274E+00,
     &  -1.25301200E+00,-1.29728778E+00,-1.35644878E+00,-1.39642044E+00,
     &  -1.40541123E+00,-1.43141106E+00,-1.47273714E+00,-1.48691359E+00,
     &  -1.49529960E+00,-1.49828685E+00,-1.49605696E+00,-1.49010187E+00,
     &  -1.47808302E+00,-1.46240683E+00,-1.44319098E+00,-1.41686785E+00,
     &  -1.38576770E+00,-1.34590503E+00,-1.30554449E+00,-1.25918928E+00,
     &  -1.20651660E+00,-1.13676063E+00,-1.06966290E+00,-9.82762411E-01,
     &  -9.00942118E-01,-7.81654335E-01,-6.51472916E-01,-4.57043876E-01,
     &  -2.87568750E-01,-9.23582273E-02, 6.52013282E-03, 1.05399619E-01,
     &   2.03641257E-01, 4.70110978E-01, 6.64568540E-01, 7.94775609E-01,
     &   9.14092325E-01, 9.95935901E-01, 1.08286498E+00, 1.14998782E+00,
     &   1.21977363E+00, 1.27247191E+00, 1.31885255E+00, 1.35924156E+00,
     &   1.39913250E+00, 1.43022352E+00, 1.45657323E+00, 1.47584616E+00,
     &   1.49154610E+00, 1.50359065E+00, 1.50956707E+00, 1.51182269E+00,
     &   1.50885944E+00, 1.50049815E+00, 1.48634680E+00, 1.44486197E+00,
     &   1.41889598E+00, 1.41010283E+00, 1.37015576E+00, 1.31088759E+00,
     &   1.26677050E+00, 1.15193395E+00, 1.12077013E+00, 1.02460449E+00,
     &   9.08339313E-01, 9.71460097E-01, 8.32704636E-01, 7.47353145E-01,
     &   6.95801415E-01, 5.89244144E-01, 5.52087335E-01, 4.75120854E-01,
     &   5.77021274E-01, 2.22317767E-01, 1.74047694E-01, 1.43943699E-01,
     &   1.23159840E-01, 1.07895097E-01, 9.61894745E-02, 8.69191578E-02/
  
         DATA ((DAS  (I,J), I=1001,1100), J=1,1) /
     &   7.93901569E-02, 7.31493570E-02, 6.78865874E-02, 6.33742326E-02,
     &   5.94860581E-02, 5.61487968E-02, 5.31907015E-02, 5.05613409E-02,
     &   4.82125454E-02, 4.61030053E-02, 4.27514165E-02, 3.85679834E-02,
     &   3.63254317E-02, 3.26517563E-02, 2.97676600E-02, 2.69228812E-02,
     &   2.28669878E-02, 1.82831659E-02, 1.54160618E-02, 1.40828650E-02,
     &   1.33907712E-02, 1.28790421E-02, 1.25015994E-02, 1.21954657E-02,
     &   1.19697738E-02, 1.17722413E-02, 1.16055229E-02, 1.14632471E-02,
     &   1.13399984E-02, 1.12597035E-02, 1.11378732E-02, 1.10548373E-02,
     &   1.09816505E-02, 1.09171771E-02, 1.08606875E-02, 1.08111524E-02,
     &   1.07680589E-02, 1.07309825E-02, 1.06995311E-02, 1.06735429E-02,
     &   1.06182999E-02, 1.06374911E-02, 1.06275290E-02, 1.06232813E-02,
     &   1.06239208E-02, 1.06329795E-02, 1.06513489E-02, 1.06780164E-02,
     &   1.07176062E-02, 1.07762575E-02, 1.08706178E-02, 1.11722285E-02,
     &   1.15690074E-02, 1.17576960E-02, 1.19108660E-02, 1.20446768E-02,
     &   1.21655807E-02, 1.22760762E-02, 1.23785138E-02, 1.24735515E-02,
     &   1.25620982E-02, 1.26453007E-02, 1.27204619E-02, 1.27909955E-02,
     &   1.28153831E-02, 1.28808328E-02, 1.29335038E-02, 1.29882441E-02,
     &   1.30257863E-02, 1.30647557E-02, 1.30793003E-02, 1.30851762E-02,
     &   1.30808771E-02, 1.30653624E-02, 1.30374830E-02, 1.29957489E-02,
     &   1.29313445E-02, 1.28534977E-02, 1.27647096E-02, 1.26506086E-02,
     &   1.25083561E-02, 1.23292376E-02, 1.21054175E-02, 1.18195516E-02,
     &   1.14340734E-02, 1.08792973E-02, 1.07136291E-02, 1.02736212E-02,
     &   9.61249515E-03, 9.54434070E-03, 9.08686034E-03, 8.90074710E-03,
     &   8.75258072E-03, 8.62660305E-03, 8.43083818E-03, 8.22291263E-03,
     &   8.17777693E-03, 8.17138197E-03, 8.13547218E-03, 8.07080170E-03/
  
         DATA ((DAS  (I,J), I=1101,1200), J=1,1) /
     &   8.03518308E-03, 8.04509847E-03, 8.18006042E-03, 8.16447503E-03,
     &   8.01485981E-03, 7.95401879E-03, 7.83701295E-03, 7.73642772E-03,
     &   7.63584250E-03, 7.53525727E-03, 7.46369565E-03, 7.28792723E-03,
     &   7.02491347E-03, 6.66314301E-03, 6.43235176E-03, 6.07859513E-03,
     &   5.84672767E-03, 5.96607504E-03, 6.51710790E-03, 6.89427630E-03,
     &   7.74415995E-03, 8.10240637E-03, 8.39520212E-03, 8.72147700E-03,
     &   8.97422416E-03, 8.92134984E-03, 8.85420022E-03, 8.98434650E-03,
     &   9.36577161E-03, 9.08465478E-03, 8.73369173E-03, 8.79438208E-03,
     &   8.91194582E-03, 8.99551842E-03, 9.11661504E-03, 9.13108812E-03,
     &   9.04700507E-03, 8.86859223E-03, 8.76216858E-03, 8.55830367E-03,
     &   8.53240139E-03, 8.66772261E-03, 8.82068953E-03, 9.01172707E-03,
     &   9.09601863E-03, 9.27457019E-03, 9.34955491E-03, 9.24557095E-03,
     &   9.34374760E-03, 9.56619494E-03, 9.80252485E-03, 1.00418409E-02,
     &   1.01839543E-02, 1.03044618E-02, 1.04535273E-02, 1.05672325E-02,
     &   1.06491162E-02, 1.07362230E-02, 1.08601261E-02, 1.09668842E-02,
     &   1.10603905E-02, 1.11568259E-02, 1.09989186E-02, 1.05089974E-02,
     &   1.04013774E-02, 1.04771150E-02, 1.06366596E-02, 1.04469064E-02,
     &   1.04437667E-02, 1.05780643E-02, 1.06631263E-02, 9.92417453E-03,
     &   9.13903305E-03, 8.87591638E-03, 8.68685315E-03, 8.98320500E-03,
     &   8.98904888E-03, 8.86276564E-03, 8.75199484E-03, 8.68752504E-03,
     &   8.59602290E-03, 8.47416284E-03, 8.13519291E-03, 8.15781159E-03,
     &   8.18536759E-03, 8.12296463E-03, 8.10031957E-03, 8.08551314E-03,
     &   8.13533407E-03, 8.16051581E-03, 8.17435438E-03, 8.21178011E-03,
     &   8.19864753E-03, 8.23938637E-03, 8.61786272E-03, 9.02196402E-03,
     &   9.13543983E-03, 9.16894384E-03, 9.18861189E-03, 9.05779574E-03/
  
         DATA ((DAS  (I,J), I=1201,1300), J=1,1) /
     &   9.32437074E-03, 9.65380834E-03, 9.77961799E-03, 9.83177284E-03,
     &   9.92170613E-03, 9.93492527E-03, 9.84347620E-03, 9.68284996E-03,
     &   9.62642172E-03, 9.73578186E-03, 9.73457312E-03, 9.40657233E-03,
     &   9.42048337E-03, 9.58496341E-03, 9.54496218E-03, 9.36801499E-03,
     &   9.27828621E-03, 9.30900882E-03, 9.40861438E-03, 9.41352285E-03,
     &   9.63490738E-03, 9.73335545E-03, 9.95763647E-03, 1.01959351E-02,
     &   1.02055947E-02, 1.02141178E-02, 1.02169589E-02, 1.03428984E-02,
     &   1.05322667E-02, 1.06119316E-02, 1.06857819E-02, 1.08212753E-02,
     &   1.09451973E-02, 1.10038680E-02, 1.10607036E-02, 1.11159012E-02,
     &   1.11696194E-02, 1.12219880E-02, 1.12731150E-02, 1.13230915E-02,
     &   1.13719947E-02, 1.14198910E-02, 1.14668379E-02, 1.15128854E-02,
     &   1.15580772E-02, 1.16024517E-02, 1.16460428E-02, 1.16888809E-02,
     &   1.17309921E-02, 1.17724001E-02, 1.18131260E-02, 1.18531880E-02,
     &   1.18926027E-02, 1.19313844E-02, 1.19695458E-02, 1.20070978E-02,
     &   1.20440496E-02, 1.20804091E-02, 1.21161828E-02, 1.21513757E-02,
     &   1.21859915E-02, 1.22200325E-02, 1.22534999E-02, 1.22863933E-02,
     &   1.23187110E-02, 1.23504499E-02, 1.23816057E-02, 1.24061061E-02,
     &   1.24421406E-02, 1.25002461E-02, 1.25558212E-02, 1.26087273E-02,
     &   1.26587789E-02, 1.27057314E-02, 1.27492608E-02, 1.27889370E-02,
     &   1.28241824E-02, 1.28542064E-02, 1.28779020E-02, 1.28936687E-02,
     &   1.28991093E-02, 1.28904268E-02, 1.28612273E-02, 1.28567981E-02,
     &   1.27997329E-02, 1.26813856E-02, 1.24443860E-02, 1.20405828E-02,
     &   1.18731342E-02, 1.11798957E-02, 9.89815724E-03, 9.30806129E-03,
     &   8.48058265E-03, 7.92842380E-03, 7.23795651E-03, 6.54741717E-03,
     &   5.68441979E-03, 5.16682081E-03, 4.57553458E-03, 3.89368897E-03/
  
         DATA ((DAS  (I,J), I=1301,1400), J=1,1) /
     &   3.09884154E-03, 2.16047322E-03, 1.03599275E-03, 3.85802056E-04,
     &  -3.35898965E-04,-1.14157778E-03,-2.04678801E-03,-3.07119686E-03,
     &  -4.24006473E-03,-5.58645172E-03,-7.15471274E-03,-9.00700006E-03,
     &  -9.78221890E-03,-1.02710994E-02,-1.07849727E-02,-1.13392946E-02,
     &  -1.18718408E-02,-1.24244176E-02,-1.11382676E-02,-1.36301359E-02,
     &  -1.42798302E-02,-1.49625564E-02,-1.56804552E-02,-1.64360435E-02,
     &  -1.72321879E-02,-1.80721132E-02,-1.89593369E-02,-1.98982006E-02,
     &  -2.08929588E-02,-2.19488185E-02,-2.30715415E-02,-2.42676463E-02,
     &  -2.55445337E-02,-2.69106396E-02,-2.83756211E-02,-2.99505707E-02,
     &  -3.16483711E-02,-3.34838982E-02,-3.54746080E-02,-3.76410191E-02,
     &  -4.00074346E-02,-4.26028541E-02,-4.54621533E-02,-4.86275762E-02,
     &  -5.21506151E-02,-5.60981160E-02,-6.05480274E-02,-6.56043391E-02,
     &  -7.13998429E-02,-7.81093882E-02,-8.59676180E-02,-9.52969977E-02,
     &  -1.06553116E-01,-1.20401303E-01,-1.37852913E-01, 5.97587469E-05,
     &  -1.91166701E-01,-2.34877359E-01,-3.02268065E-01,-4.19678161E-01,
     &  -6.75168129E-01,-8.33565281E-01,-1.60032506E+00,-2.23181464E+00,
     &  -2.69036132E+00,-3.04399371E+00,-3.19106213E-03,-3.58972501E+00,
     &  -3.82636254E+00,-3.99105276E+00,-4.15824286E+00,-4.32297301E+00,
     &  -4.40238628E+00,-4.51368038E+00,-4.58108776E+00,-4.66463628E+00,
     &  -4.68477701E+00,-4.72176124E+00,-4.72997183E+00,-4.71995571E+00,
     &  -4.70468807E+00,-4.68164535E+00,-5.22570190E-02,-5.09931673E-02,
     &  -4.49472013E+00,-4.33282742E+00,-4.23232386E+00,-4.11902736E+00,
     &  -3.98840415E+00,-3.67782597E+00,-3.49674568E+00,-3.30050859E+00,
     &  -2.85444563E+00,-2.60752774E+00,-7.92189865E-01,-1.46727228E+00,
     &   1.71686578E-01, 1.47371622E+00, 2.07346458E+00, 2.61604143E+00/
  
         DATA ((DAS  (I,J), I=1401,1500), J=1,1) /
     &   3.09818368E+00, 3.31492119E+00, 3.51223329E+00, 3.69251668E+00,
     &   4.00460803E+00, 4.13574940E+00, 4.25287488E+00, 4.36074843E+00,
     &   4.51910305E+00, 4.58082960E+00, 4.63324188E+00, 4.70706402E+00,
     &   4.73090041E+00, 4.75524520E+00, 4.75743558E+00, 4.74483482E+00,
     &   4.71365677E+00, 4.73396708E+00, 4.69231354E+00, 4.54443643E+00,
     &   4.43581145E+00, 4.35606863E+00, 4.18833674E+00, 4.02127541E+00,
     &   3.85648236E+00, 3.61973627E+00, 3.36501634E+00, 3.07339896E+00,
     &   2.71875341E+00, 2.26042596E+00, 1.61890124E+00, 8.89790133E-01,
     &   5.14824704E-01, 3.64323502E-01, 2.83294341E-01, 2.32676245E-01,
     &   1.98059767E-01, 1.72939679E-01, 1.53776775E-01, 1.38759892E-01,
     &   1.26652999E-01, 1.16685088E-01, 1.08335462E-01, 1.01239753E-01,
     &   9.51353229E-02, 8.98281132E-02, 3.82654198E-02, 8.10550567E-02,
     &   7.73831288E-02, 7.40959323E-02, 7.11314448E-02, 6.84452899E-02,
     &   6.60001359E-02, 6.37649827E-02, 6.17139380E-02, 5.98251998E-02,
     &   5.80802816E-02, 1.76190703E-02, 5.49610221E-02, 5.35614361E-02,
     &   5.22544961E-02, 5.10313518E-02, 4.98842531E-02, 4.88063869E-02,
     &   4.77917433E-02, 4.68350058E-02, 4.59314615E-02, 4.50769304E-02,
     &   4.42677141E-02, 4.35005666E-02, 4.27727143E-02, 4.20819795E-02,
     &   4.14273113E-02, 4.08119256E-02, 4.02328312E-02, 3.96136122E-02,
     &   3.90462118E-02, 3.85081498E-02, 3.79948643E-02, 3.75038988E-02,
     &   3.70334822E-02, 3.35046567E-02, 3.13549633E-02, 2.93058945E-02,
     &   2.70433879E-02, 2.49861574E-02, 2.31770245E-02, 2.27342595E-02,
     &   2.10804755E-02, 1.85931800E-02, 1.70035947E-02, 1.69298664E-02,
     &   1.67715775E-02, 1.65961761E-02, 1.62623496E-02, 1.59753372E-02,
     &   1.50613658E-02, 1.42542792E-02, 1.37803436E-02, 1.31483586E-02/
  
         DATA ((DAS  (I,J), I=1501,1600), J=1,1) /
     &   1.24013991E-02, 1.15413819E-02, 1.04366926E-02, 8.92372498E-03,
     &   5.14463734E-03, 4.42853098E-03, 3.58535126E-03, 3.34103230E-03,
     &   2.78416828E-03, 2.16546204E-03, 1.47399272E-03, 6.96105698E-04,
     &  -1.85500253E-04,-1.19307804E-03,-2.35574143E-03,-3.71233221E-03,
     &  -5.31585814E-03,-7.24060843E-03,-9.59404771E-03,-1.25377212E-02,
     &  -1.63263526E-02,-2.13870652E-02,-2.84992015E-02,-3.93236457E-02,
     &  -5.69787430E-02,-9.22597209E-02,-1.39654986E-01,-1.47611746E-01,
     &  -1.56438585E-01,-1.66286319E-01,-1.77342723E-01,-1.89844370E-01,
     &  -2.04095317E-01,-2.20487826E-01,-2.39544605E-01,-2.61971129E-01,
     &  -2.88746070E-01,-3.21266785E-01,-3.61599378E-01,-4.12931450E-01,
     &  -4.80449375E-01,-5.73175668E-01,-7.08295275E-01,-9.22819484E-01,
     &  -1.31213098E+00,-2.19288464E+00,-2.50152214E+00,-2.63581754E+00,
     &  -3.01379782E+00,-3.24385050E+00,-3.41045980E+00,-2.95907442E+00,
     &  -2.59669731E+00,-3.91408478E+00,-3.78250162E+00,-2.55814115E-01,
     &  -1.35634011E+00,-1.32471653E+00,-1.30894482E+00,-3.13351027E+00,
     &  -3.11477459E+00,-3.10060362E+00,-3.08633143E+00,-2.93823235E+00,
     &  -2.69919427E+00,-2.41313528E+00,-2.14056773E+00,-2.25603623E+00,
     &  -1.91304294E+00,-1.57411127E+00,-1.37503046E+00,-1.18432846E+00,
     &  -9.71625304E-01,-6.64819744E-01,-4.40812718E-01, 4.03413525E-02,
     &   4.04445262E-02, 4.04788928E-02, 4.04960715E-02, 4.05132471E-02,
     &   4.05304196E-02, 4.05475890E-02, 4.06848331E-02, 4.08561092E-02,
     &   4.10270740E-02, 1.69390583E+00, 2.04552609E+00, 2.64191245E+00,
     &   2.87270374E+00, 3.08906084E+00, 3.25009979E+00, 3.16478498E+00,
     &   3.36736296E+00, 3.55499474E+00, 3.61119615E+00, 3.64297780E+00,
     &   3.65298887E+00, 3.65233095E+00, 3.64083171E+00, 3.62268585E+00/
  
         DATA ((DAS  (I,J), I=1601,1700), J=1,1) /
     &   2.63439116E+00, 3.52691373E+00, 3.48332139E+00, 3.44022681E+00,
     &   3.33208457E+00, 3.27610068E+00, 3.18517507E+00, 3.03980691E+00,
     &   2.52930192E+00, 2.13152098E+00, 1.82977648E+00, 1.59826840E+00,
     &   1.41652809E+00, 1.24440210E+00, 1.08048117E+00, 8.98145521E-01,
     &   8.36671576E-01, 7.83063791E-01, 7.35834037E-01, 6.66011885E-01,
     &   5.53648623E-01, 4.74178972E-01, 4.15043439E-01, 3.69341452E-01,
     &   3.32967018E-01, 3.03336124E-01, 2.78734112E-01, 2.57981884E-01,
     &   2.40243146E-01, 2.24905668E-01, 2.11513245E-01, 1.99718518E-01,
     &   1.89251553E-01, 1.79899667E-01, 1.71495495E-01, 1.19944270E-01,
     &   8.46105269E-02, 6.69507848E-02, 4.93195683E-02, 4.03623791E-02,
     &   3.50462505E-02, 3.15099886E-02, 2.89863737E-02, 2.70944173E-02,
     &   2.56230948E-02, 2.44460041E-02, 2.37781759E-02, 2.29988334E-02,
     &   2.23327657E-02, 2.17568972E-02, 2.12540218E-02, 2.08110479E-02,
     &   1.92052022E-02, 1.81965674E-02, 1.75026483E-02, 1.69946380E-02,
     &   1.66049368E-02, 1.62917309E-02, 1.60421855E-02, 1.58345676E-02,
     &   1.40635915E-02, 1.35714920E-02, 1.34475693E-02, 1.33041584E-02,
     &   1.31335185E-02, 1.29217835E-02, 1.27941461E-02, 1.26472153E-02,
     &   1.22695078E-02, 1.17013158E-02, 1.07140163E-02, 8.47542797E-03,
     &   6.33995782E-03, 5.78904832E-03, 5.15370326E-03, 4.41280997E-03,
     &   3.53753397E-03, 2.48747746E-03, 1.20428710E-03,-3.99739706E-04,
     &  -2.46274090E-03,-5.21585134E-03,-9.08047933E-03,-1.49012037E-02,
     &  -2.44804341E-02,-2.61505613E-02,-2.79725892E-02,-2.99686112E-02,
     &  -3.21649795E-02,-3.46001429E-02,-3.72881288E-02,-4.03024333E-02,
     &  -4.36932288E-02,-4.75365912E-02,-5.19290388E-02,-5.69966463E-02,
     &  -6.29093789E-02,-6.98969405E-02,-7.82807679E-02,-8.85272070E-02/
  
         DATA ((DAS  (I,J), I=1701,1800), J=1,1) /
     &  -9.17264241E-02,-1.01335951E-01,-1.17799042E-01,-1.39747320E-01,
     &  -1.70464379E-01,-2.16508620E-01,-2.93150336E-01,-4.45935696E-01,
     &  -8.97517306E-01,-1.06966895E+00,-1.51447486E+00,-1.73266398E+00,
     &  -2.13151297E+00,-2.37431525E+00,-2.59075495E+00,-2.78692273E+00,
     &  -2.95565971E+00,-3.19360160E+00,-3.26465023E+00, 3.18652931E-02,
     &  -3.53991789E+00,-3.65460517E+00,-3.75204734E+00,-3.83272332E+00,
     &  -2.65845275E+00,-3.96761037E+00,-4.01705441E+00,-4.06234250E+00,
     &  -4.10178046E+00,-4.13232589E+00,-4.20148476E+00,-4.13879016E+00,
     &  -4.11192183E+00,-3.85223505E+00,-3.63282845E+00, 8.67971739E-02,
     &  -3.82148667E+00,-3.65344312E+00,-3.44392298E+00,-3.14611507E+00,
     &  -2.79217652E+00,-2.32405683E+00,-1.77844603E+00, 8.19426639E-01,
     &   1.39424222E-02, 8.25141249E-01, 1.80643144E+00, 2.35400905E+00,
     &   2.82763717E+00, 3.18506603E+00, 2.68975083E+00, 2.98404308E+00,
     &   3.26783545E+00, 3.53740206E+00, 3.74821370E+00, 3.98085459E+00,
     &   4.18723952E+00, 1.58820055E+00, 1.72856659E+00, 1.87473408E+00,
     &   2.98424989E-01, 2.24045735E+00, 2.43702784E+00, 2.64284394E+00,
     &   2.88887014E+00, 3.17768644E+00, 3.47563890E+00, 3.81013753E+00,
     &   3.61021566E+00, 3.33768713E+00, 3.06325170E+00, 2.81905493E+00,
     &   2.63609937E+00, 1.03205041E+00, 2.62694855E+00, 2.39841184E+00,
     &   2.16101592E+00, 1.88016781E+00, 1.54241101E+00, 1.09760992E+00,
     &   9.41851827E-01, 9.12637996E-01, 6.13866814E-01, 7.76302009E-01,
     &   6.86118583E-01, 4.73852038E-01, 3.21091894E-01, 2.44447017E-01,
     &   1.98401758E-01, 1.67688647E-01, 1.45740182E-01, 1.29275363E-01,
     &   1.16468820E-01, 1.06221348E-01, 9.78364734E-02, 9.08494215E-02,
     &   8.49369621E-02, 7.98675481E-02, 7.54755441E-02, 7.16317461E-02/
  
         DATA ((DAS  (I,J), I=1801,1900), J=1,1) /
     &   5.24124637E-02, 4.28026409E-02, 3.70377829E-02, 3.32002611E-02,
     &   3.04469220E-02, 2.83711482E-02, 2.67626264E-02, 2.44255769E-02,
     &   2.28077608E-02, 2.21719139E-02, 2.16206241E-02, 1.96356502E-02,
     &   1.81775746E-02, 1.73006058E-02, 1.67120145E-02, 1.62872984E-02,
     &   1.59644403E-02, 1.57089895E-02, 1.55001395E-02, 1.53240336E-02,
     &   1.50345886E-02, 1.50474264E-02, 1.49367443E-02, 1.48364243E-02,
     &   1.47445999E-02, 1.46598172E-02, 1.45802300E-02, 1.45045489E-02,
     &   1.44314065E-02, 1.43591869E-02, 1.42855051E-02, 1.42040115E-02,
     &   1.41496426E-02, 1.31353013E-02, 1.28960785E-02, 1.25982685E-02,
     &   1.23619589E-02, 1.21667582E-02, 1.21445801E-02, 1.18734862E-02,
     &   1.17468224E-02, 1.16478258E-02, 1.15646134E-02, 1.14956385E-02,
     &   1.14701796E-02, 1.13983522E-02, 1.13684572E-02, 1.13501486E-02,
     &   1.13434279E-02, 1.13477727E-02, 1.13629024E-02, 1.13892284E-02,
     &   1.14192229E-02, 1.14729427E-02, 1.15327058E-02, 1.16015098E-02,
     &   1.16841767E-02, 1.17790844E-02, 1.18887163E-02, 1.20137289E-02,
     &   1.21545892E-02, 1.23115242E-02, 1.24968389E-02, 1.27089446E-02,
     &   1.29538933E-02, 1.32591984E-02, 1.36627317E-02, 1.46489649E-02,
     &   1.55812499E-02, 1.59330108E-02, 1.61879028E-02, 1.63852214E-02,
     &   1.65506708E-02, 1.66908077E-02, 1.68059410E-02, 1.69061509E-02,
     &   1.69921900E-02, 1.70651666E-02, 1.71304240E-02, 1.71752565E-02,
     &   1.72142917E-02, 1.72451646E-02, 1.72659893E-02, 1.72784695E-02,
     &   1.72822104E-02, 1.72772504E-02, 1.72641523E-02, 1.72415336E-02,
     &   1.72096330E-02, 1.71687078E-02, 1.71180392E-02, 1.70398757E-02,
     &   1.69521588E-02, 1.68540202E-02, 1.68005289E-02, 1.66862831E-02,
     &   1.65541102E-02, 1.63970795E-02, 1.62156465E-02, 1.59948435E-02/
  
         DATA ((DAS  (I,J), I=1901,2000), J=1,1) /
     &   1.57172932E-02, 1.53417498E-02, 1.46863469E-02, 1.46512172E-02,
     &   1.44621891E-02, 1.44097206E-02, 1.42949905E-02, 1.42426112E-02,
     &   1.42006516E-02, 1.41658514E-02, 1.41365413E-02, 1.41115346E-02,
     &   1.40776469E-02, 1.40717251E-02, 1.40560152E-02, 1.40427603E-02,
     &   1.40299922E-02, 1.40223974E-02, 1.40152368E-02, 1.40098566E-02,
     &   1.40061742E-02, 1.40041579E-02, 1.39815509E-02, 1.39845182E-02,
     &   1.40080266E-02, 1.40123867E-02, 1.40194104E-02, 1.40280621E-02,
     &   1.40386422E-02, 1.40513777E-02, 1.40664980E-02, 1.40843607E-02,
     &   1.41052365E-02, 1.41299446E-02, 1.41592234E-02, 1.41918046E-02,
     &   1.42395191E-02, 1.43009942E-02, 1.44592593E-02, 1.45787447E-02,
     &   1.46563670E-02, 1.46979844E-02, 1.47317362E-02, 1.47602547E-02,
     &   1.47850166E-02, 1.48066770E-02, 1.48258009E-02, 1.48428566E-02,
     &   1.48579685E-02, 1.48714198E-02, 1.48833663E-02, 1.48938756E-02,
     &   1.49031228E-02, 1.49111847E-02, 1.49180086E-02, 1.49237478E-02,
     &   1.49284357E-02, 1.49320375E-02, 1.49375116E-02, 1.49364528E-02,
     &   1.49368993E-02, 1.49363407E-02, 1.49348824E-02, 1.49324047E-02,
     &   1.49288716E-02, 1.49242685E-02, 1.49184647E-02, 1.49116360E-02,
     &   1.49036097E-02, 1.49050248E-02, 1.48960005E-02, 1.48851655E-02,
     &   1.48720547E-02, 1.48431408E-02, 1.47262356E-02, 1.47518625E-02,
     &   1.47489951E-02, 1.47465362E-02, 1.47444859E-02, 1.47428407E-02,
     &   1.47415946E-02, 1.47407320E-02, 1.47402478E-02, 1.47401361E-02,
     &   1.47381529E-02, 1.47385566E-02, 1.47399608E-02, 1.46959423E-02,
     &   1.46978979E-02, 1.47003781E-02, 1.47476553E-02, 1.47506579E-02,
     &   1.47541198E-02, 1.47580623E-02, 1.47625582E-02, 1.47675299E-02,
     &   1.47730945E-02, 1.47792808E-02, 1.47861161E-02, 1.47937039E-02/
  
         DATA ((DAS  (I,J), I=2001,2100), J=1,1) /
     &   1.48020013E-02, 1.48113006E-02, 1.48216757E-02, 1.48333005E-02,
     &   1.48463691E-02, 1.48614480E-02, 1.48792005E-02, 1.49010400E-02,
     &   1.49304117E-02, 1.50047186E-02, 1.50791300E-02, 1.51093858E-02,
     &   1.51438784E-02, 1.51655369E-02, 1.51842273E-02, 1.51746830E-02,
     &   1.51875300E-02, 1.51992271E-02, 1.52099434E-02, 1.52197385E-02,
     &   1.52289404E-02, 1.52374861E-02, 1.52454926E-02, 1.52529854E-02,
     &   1.52599609E-02, 1.52665529E-02, 1.52726735E-02, 1.52783293E-02,
     &   1.52840259E-02, 1.52888735E-02, 1.52931771E-02, 1.52974358E-02,
     &   1.53013601E-02, 1.53049911E-02, 1.53083273E-02, 1.53113682E-02,
     &   1.53141126E-02, 1.53165851E-02, 1.53187632E-02, 1.53206671E-02,
     &   1.53234718E-02, 1.53244960E-02, 1.53252545E-02, 1.53257096E-02,
     &   1.53257947E-02, 1.53218366E-02, 1.52809855E-02, 1.52246019E-02,
     &   1.52215558E-02, 1.51965241E-02, 1.51774904E-02, 1.51585676E-02,
     &   1.51432548E-02, 1.51281382E-02, 1.51140115E-02, 1.50983527E-02,
     &   1.50817543E-02, 1.50646735E-02, 1.50431456E-02, 1.50216178E-02,
     &   1.50453952E-02, 1.50682623E-02, 1.50886890E-02, 1.51088673E-02,
     &   1.51272679E-02, 1.51457395E-02, 1.51628006E-02, 1.51801043E-02,
     &   1.51969445E-02, 1.52126794E-02, 1.52287902E-02, 1.52439152E-02,
     &   1.52594634E-02, 1.52741097E-02, 1.52892093E-02, 1.53034683E-02,
     &   1.53182001E-02, 1.53321375E-02, 1.53465605E-02, 1.53602251E-02,
     &   1.53737703E-02, 1.53878119E-02, 1.54011359E-02, 1.54149602E-02,
     &   1.54280883E-02, 1.54417188E-02, 1.54546709E-02, 1.54681264E-02,
     &   1.54809189E-02, 1.54942147E-02, 1.55068607E-02, 1.55200095E-02,
     &   1.55330872E-02, 1.55455323E-02, 1.55584784E-02, 1.55708016E-02,
     &   1.55836241E-02, 1.55958326E-02, 1.56085388E-02, 1.56206391E-02/
  
         DATA ((DAS  (I,J), I=2101,2174), J=1,1) /
     &   1.56332350E-02, 1.56452326E-02, 1.56577238E-02, 1.56696236E-02,
     &   1.56814772E-02, 1.56938212E-02, 1.57055833E-02, 1.57178338E-02,
     &   1.57295082E-02, 1.57393529E-02, 1.57509976E-02, 1.57631331E-02,
     &   1.57747047E-02, 1.57867650E-02, 1.57982660E-02, 1.58102537E-02,
     &   1.58222051E-02, 1.58336035E-02, 1.58454856E-02, 1.58568186E-02,
     &   1.58686333E-02, 1.58799027E-02, 1.58916518E-02, 1.59029574E-02,
     &   1.59147360E-02, 1.59258845E-02, 1.59375083E-02, 1.59485970E-02,
     &   1.59601589E-02, 1.59711890E-02, 1.59821909E-02, 1.59936630E-02,
     &   1.60046081E-02, 1.60160215E-02, 1.60269110E-02, 1.60382668E-02,
     &   1.60491016E-02, 1.60966440E-02, 1.61074122E-02, 1.61186210E-02,
     &   1.61292958E-02, 1.61404076E-02, 1.62242345E-02, 1.63411372E-02,
     &   1.63595795E-02, 1.71893383E-02, 1.75670011E-02, 1.85659833E-02,
     &   1.92394093E-02, 1.91580348E-02, 1.99157980E-02, 1.99182044E-02,
     &   2.04880116E-02, 2.05098023E-02, 2.05228576E-02, 2.08062233E-02,
     &   2.09950439E-02, 2.10289377E-02, 2.10843385E-02, 2.11664632E-02,
     &   2.12244168E-02, 2.12608202E-02, 2.16142247E-02, 2.16321632E-02,
     &   2.17401329E-02, 2.17594478E-02, 2.20562266E-02, 2.18777215E-02,
     &   2.19373185E-02, 2.19633398E-02, 2.20051461E-02, 2.21133652E-02,
     &   2.21593726E-02, 2.24639157E-02/
  
         DATA ((DAS  (I,J), I=   1, 100), J=2,2) /
     &   1.67216354E-06, 1.86570031E-06, 2.02615587E-06, 2.19574314E-06,
     &   2.40460182E-06, 2.37139013E-06, 3.75012645E-06, 3.04635015E-06,
     &   3.42628355E-06, 3.89938062E-06, 3.67277646E-06, 3.61590809E-06,
     &   3.45809909E-06, 3.68898344E-06, 3.96356384E-06, 4.27553711E-06,
     &   4.39217044E-06, 4.39076693E-06, 4.36731089E-06, 4.43189686E-06,
     &   4.53982192E-06, 4.63766895E-06, 4.69625525E-06, 4.73024466E-06,
     &   4.79418219E-06, 4.97478275E-06, 5.25112814E-06, 5.36539511E-06,
     &   5.41306828E-06, 5.52680487E-06, 5.65322002E-06, 5.68371802E-06,
     &   5.84288513E-06, 6.00946977E-06, 6.19578859E-06, 6.40887247E-06,
     &   6.63990283E-06, 6.97007461E-06, 7.26779185E-06, 7.57396805E-06,
     &   7.90029557E-06, 8.30486762E-06, 8.77511392E-06, 9.22137929E-06,
     &   9.95765951E-06, 1.10669559E-05, 1.19533401E-05, 1.22775445E-05,
     &   1.22749738E-05, 1.20775904E-05, 1.47631422E-05, 1.78427229E-05,
     &   2.10312091E-05, 2.10701562E-05, 2.37819944E-05, 2.40798873E-05,
     &   2.13358372E-05, 1.91696504E-05, 1.82088025E-05, 1.82517464E-05,
     &   1.88875848E-05, 1.88659464E-05, 1.93119094E-05, 1.93138022E-05,
     &   2.01329592E-05, 2.08402770E-05, 2.17848042E-05, 2.30902779E-05,
     &   2.38638668E-05, 2.44565707E-05, 2.63116132E-05, 2.52337497E-05,
     &   2.59203578E-05, 2.70121645E-05, 2.90114954E-05, 3.00254465E-05,
     &   3.06145589E-05, 3.31078489E-05, 3.66377810E-05, 6.75718014E-05,
     &   6.36030335E-05, 6.68489283E-05, 6.76155743E-05, 6.86360097E-05,
     &   7.03444868E-05, 7.94847908E-05, 8.83424421E-05, 9.38584202E-05,
     &   9.97018100E-05, 1.04799790E-04, 1.08646462E-04, 1.13099125E-04,
     &   1.16946644E-04, 1.20963227E-04, 1.26304544E-04, 1.34183651E-04,
     &   1.32822713E-04, 1.31441360E-04, 1.29522437E-04, 1.28159386E-04/
  
         DATA ((DAS  (I,J), I= 101, 200), J=2,2) /
     &   1.26791220E-04, 1.26099786E-04, 1.25790795E-04, 1.25943285E-04,
     &   1.26356675E-04, 1.25807188E-04, 1.25268637E-04, 1.24741020E-04,
     &   1.23280883E-04, 1.21399138E-04, 1.18967766E-04, 1.14211178E-04,
     &   1.09308980E-04, 1.04139830E-04, 9.63738240E-05, 8.59689102E-05,
     &   7.12867910E-05, 4.03869051E-05, 5.29537322E-05, 6.79210937E-05,
     &   7.97760182E-05, 8.92435734E-05, 9.69233685E-05, 1.03209558E-04,
     &   1.08169980E-04, 1.11620022E-04, 1.14289618E-04, 1.16398493E-04,
     &   1.18196438E-04, 1.19631117E-04, 1.21140307E-04, 1.28013732E-04,
     &   1.25096452E-04, 1.27687190E-04, 1.30150546E-04, 1.31293450E-04,
     &   1.30504152E-04, 1.29223515E-04, 1.28087752E-04, 1.25762939E-04,
     &   1.24183671E-04, 1.21581376E-04, 1.18842403E-04, 1.15984333E-04,
     &   1.13062722E-04, 1.09420285E-04, 1.05290330E-04, 1.00989661E-04,
     &   9.55682945E-05, 8.94420541E-05, 8.19198726E-05, 7.45889076E-05,
     &   7.28347827E-05, 6.55342111E-05, 5.82336394E-05, 5.40669029E-05,
     &   5.09363036E-05, 4.86218257E-05, 4.31098834E-05, 3.94067406E-05,
     &   3.75088948E-05, 3.62456017E-05, 3.57127398E-05, 3.40225440E-05,
     &   3.23609632E-05, 3.08133494E-05, 2.98396377E-05, 2.92404944E-05,
     &   2.70691343E-05, 2.57904912E-05, 2.48044475E-05, 2.38436355E-05,
     &   2.37709467E-05, 2.34510410E-05, 2.34243042E-05, 2.32760405E-05,
     &   2.28310983E-05, 2.23302464E-05, 2.22546612E-05, 2.21341463E-05,
     &   2.21290057E-05, 2.21706475E-05, 2.23508353E-05, 2.25986310E-05,
     &   2.34227842E-05, 2.40588775E-05, 2.50427942E-05, 2.56862244E-05,
     &   2.66601554E-05, 2.80471092E-05, 2.90975191E-05, 2.98918874E-05,
     &   3.17656590E-05, 3.27246320E-05, 3.36072666E-05, 3.48586750E-05,
     &   3.65195994E-05, 3.88202945E-05, 4.07140873E-05, 4.28879768E-05/
  
         DATA ((DAS  (I,J), I= 201, 300), J=2,2) /
     &   4.53057957E-05, 4.75148260E-05, 4.84110874E-05, 4.93690731E-05,
     &   5.03861397E-05, 5.14632214E-05, 5.25975232E-05, 5.37352932E-05,
     &   5.48408767E-05, 5.60050172E-05, 5.72297685E-05, 5.85246918E-05,
     &   5.98885908E-05, 6.12676681E-05, 6.27070623E-05, 6.42660776E-05,
     &   6.59117448E-05, 6.76669688E-05, 6.95595830E-05, 7.16041418E-05,
     &   7.38177243E-05, 7.62211628E-05, 7.88368598E-05, 8.16924745E-05,
     &   8.48313082E-05, 8.82869211E-05, 9.21111309E-05, 9.64401806E-05,
     &   1.01486010E-04, 1.07997614E-04, 1.14231104E-04, 1.22438263E-04,
     &   1.12958232E-04, 1.13378536E-04, 1.15986867E-04, 1.19431671E-04,
     &   1.25070524E-04, 1.29908573E-04, 1.35680009E-04, 1.41208713E-04,
     &   1.47760518E-04, 1.55009444E-04, 1.61666164E-04, 1.71845953E-04,
     &   1.82025742E-04, 1.93275552E-04, 2.05981221E-04, 2.20413346E-04,
     &   2.36902924E-04, 2.55849689E-04, 2.77699384E-04, 3.02934524E-04,
     &   3.32514137E-04, 3.61296907E-04, 3.77086962E-04, 3.87862327E-04,
     &   4.02527795E-04, 4.09699708E-04, 4.05522551E-04, 4.31757030E-04,
     &   4.42143130E-04, 4.51596142E-04, 4.60007670E-04, 4.66708720E-04,
     &   4.70914959E-04, 4.71709990E-04, 4.64254706E-04, 4.50922057E-04,
     &   4.41425441E-04, 4.15577461E-04, 3.79345314E-04, 3.31622808E-04,
     &   2.53852883E-04, 2.02222763E-04, 1.24738400E-04, 5.31707593E-05,
     &   7.19560211E-05, 1.48720173E-04, 2.24352062E-04, 2.91273093E-04,
     &   3.47093185E-04, 3.91346098E-04, 4.24302595E-04, 4.47423426E-04,
     &   4.62201744E-04, 4.70103966E-04, 4.72592143E-04, 4.70995729E-04,
     &   4.66355051E-04, 4.59465356E-04, 4.46491427E-04, 4.43020541E-04,
     &   4.24662860E-04, 4.20139156E-04, 4.10440232E-04, 3.99955640E-04,
     &   3.89716360E-04, 3.79911498E-04, 3.70087726E-04, 3.59923977E-04/
  
         DATA ((DAS  (I,J), I= 301, 400), J=2,2) /
     &   3.58591544E-04, 3.41847871E-04, 3.32915308E-04, 3.24327177E-04,
     &   2.97775878E-04, 2.75316062E-04, 2.56984228E-04, 2.40885926E-04,
     &   2.26862164E-04, 2.11798364E-04, 2.03957653E-04, 1.94589566E-04,
     &   1.86345660E-04, 1.79068500E-04, 1.72628966E-04, 1.66924495E-04,
     &   1.61874077E-04, 1.57372664E-04, 1.53333443E-04, 1.49680219E-04,
     &   1.22108720E-04, 1.18425091E-04, 1.19079584E-04, 1.13061625E-04,
     &   1.13246158E-04, 1.22964093E-04, 1.22814828E-04, 1.09173819E-04,
     &   1.04177200E-04, 1.01076556E-04, 9.84518250E-05, 9.63464617E-05,
     &   9.44409328E-05, 9.26188943E-05, 9.09007537E-05, 8.89446525E-05,
     &   8.71903912E-05, 8.54325697E-05, 8.37136813E-05, 8.19879457E-05,
     &   8.04759220E-05, 7.84630040E-05, 7.66453642E-05, 7.49979346E-05,
     &   7.34014421E-05, 7.18157596E-05, 7.03031198E-05, 6.88637905E-05,
     &   6.74990997E-05, 6.62153843E-05, 6.50198059E-05, 6.38535790E-05,
     &   6.25953848E-05, 6.13880254E-05, 6.02302081E-05, 5.91317425E-05,
     &   5.62469074E-05, 5.02379579E-05, 4.18693287E-05, 3.78465403E-05,
     &   3.47105624E-05, 3.23031239E-05, 3.04767247E-05, 2.91057070E-05,
     &   2.72556022E-05, 2.68991231E-05, 2.47131750E-05, 2.52967038E-05,
     &   2.50573874E-05, 2.40641467E-05, 2.37109052E-05, 2.33481980E-05,
     &   2.30680402E-05, 2.31374025E-05, 2.23837956E-05, 2.34173967E-05,
     &   2.22768546E-05, 2.19318527E-05, 2.23531152E-05, 2.26157469E-05,
     &   2.14374584E-05, 2.20890640E-05, 2.09657875E-05, 2.15553557E-05,
     &   2.12377927E-05, 2.13234483E-05, 2.17555477E-05, 2.11122933E-05,
     &   2.21490506E-05, 2.17664520E-05, 2.14525562E-05, 2.22990908E-05,
     &   2.19671336E-05, 2.36442001E-05, 2.28034014E-05, 2.39983702E-05,
     &   2.36924621E-05, 2.52242294E-05, 2.49092267E-05, 2.50447140E-05/
  
         DATA ((DAS  (I,J), I= 401, 500), J=2,2) /
     &   2.60869542E-05, 2.78513810E-05, 2.92799279E-05, 2.78031612E-05,
     &   2.72396483E-05, 2.80339332E-05, 2.95459034E-05, 3.07917020E-05,
     &   3.09578019E-05, 2.99028557E-05, 3.08769846E-05, 3.08242361E-05,
     &   3.15075243E-05, 3.41880201E-05, 3.34302854E-05, 3.16002943E-05,
     &   3.24271464E-05, 3.08326866E-05, 3.11020223E-05, 3.34067478E-05,
     &   3.37997771E-05, 3.44992278E-05, 3.56651758E-05, 3.47149241E-05,
     &   3.37141633E-05, 3.50579234E-05, 3.51184014E-05, 3.83083941E-05,
     &   3.84017048E-05, 3.78752270E-05, 3.95460055E-05, 3.80022508E-05,
     &   3.87279367E-05, 3.99392997E-05, 4.20491950E-05, 3.96644316E-05,
     &   3.97680784E-05, 3.89683891E-05, 4.04535169E-05, 4.39594265E-05,
     &   4.32910958E-05, 4.41395892E-05, 4.29234203E-05, 4.31092001E-05,
     &   4.22480601E-05, 4.18054668E-05, 4.60381185E-05, 4.34891062E-05,
     &   4.51799115E-05, 4.23081548E-05, 4.70519863E-05, 4.69136127E-05,
     &   4.70701520E-05, 4.76531326E-05, 4.52781637E-05, 4.28515888E-05,
     &   4.23373804E-05, 4.36225718E-05, 4.67063270E-05, 4.72609055E-05,
     &   4.73940121E-05, 4.69470887E-05, 4.72675337E-05, 4.65519884E-05,
     &   4.71851769E-05, 4.75649431E-05, 4.69363846E-05, 4.86222374E-05,
     &   5.18682680E-05, 5.23955366E-05, 5.32434847E-05, 5.70167403E-05,
     &   6.26897916E-05, 6.91408683E-05, 7.05680783E-05, 8.01693547E-05,
     &   8.31580261E-05, 7.82766186E-05, 7.65793249E-05, 7.84192350E-05,
     &   7.81223789E-05, 9.37626844E-05, 1.01708913E-04, 1.01545728E-04,
     &   8.68215562E-05, 9.17482311E-05, 9.61895566E-05, 1.00584186E-04,
     &   9.07854699E-05, 9.18837197E-05, 9.07827825E-05, 9.12826584E-05,
     &   9.35344673E-05, 9.19401119E-05, 8.45915995E-05, 8.16210107E-05,
     &   8.61507506E-05, 9.55930062E-05, 8.79734184E-05, 9.69254525E-05/
  
         DATA ((DAS  (I,J), I= 501, 600), J=2,2) /
     &   1.00456780E-04, 1.03270132E-04, 1.07195348E-04, 1.06457329E-04,
     &   1.11072321E-04, 1.14699179E-04, 1.07525323E-04, 1.06667264E-04,
     &   1.11437261E-04, 1.20362272E-04, 1.32568999E-04, 1.48521444E-04,
     &   1.69598508E-04, 1.98642153E-04, 2.40437800E-04, 3.03785984E-04,
     &   3.21296724E-04, 3.39681937E-04, 3.60907989E-04, 3.85066197E-04,
     &   4.12616539E-04, 4.44182840E-04, 4.81010103E-04, 4.89040687E-04,
     &   4.97377452E-04, 5.06018760E-04, 5.14971540E-04, 5.24248811E-04,
     &   5.33696022E-04, 5.43506450E-04, 5.53697188E-04, 5.64291714E-04,
     &   5.75284087E-04, 6.30355756E-04, 6.73168462E-04, 6.96780469E-04,
     &   7.13396344E-04, 7.30791712E-04, 7.49047063E-04, 7.68194756E-04,
     &   7.88313907E-04, 8.09476668E-04, 8.20476570E-04, 8.31776462E-04,
     &   8.43378764E-04, 8.55305299E-04, 8.67560076E-04, 8.80166220E-04,
     &   8.93129513E-04, 9.06474592E-04, 9.20209222E-04, 9.34359792E-04,
     &   9.48936335E-04, 9.63963425E-04, 9.79462075E-04, 9.95454668E-04,
     &   1.01196507E-03, 1.02901872E-03, 1.04664277E-03, 1.06486623E-03,
     &   1.08372011E-03, 1.10323763E-03, 1.12345437E-03, 1.14440851E-03,
     &   1.16614106E-03, 1.18869615E-03, 1.21212129E-03, 1.23646775E-03,
     &   1.26179087E-03, 1.28815055E-03, 1.31561168E-03, 1.34424465E-03,
     &   1.37412706E-03, 1.40534140E-03, 1.43797867E-03, 1.47213836E-03,
     &   1.50792941E-03, 1.54547146E-03, 1.58489612E-03, 1.62634852E-03,
     &   1.66998910E-03, 1.71599572E-03, 1.73994685E-03, 1.76456599E-03,
     &   1.78988004E-03, 1.81592022E-03, 1.84271683E-03, 1.87030467E-03,
     &   1.89871791E-03, 1.92799551E-03, 1.95817615E-03, 1.98930356E-03,
     &   2.02142169E-03, 2.05457984E-03, 2.08882809E-03, 2.12422230E-03,
     &   2.16081972E-03, 2.19868394E-03, 2.23788067E-03, 2.27848266E-03/
  
         DATA ((DAS  (I,J), I= 601, 700), J=2,2) /
     &   2.32056544E-03, 2.36421324E-03, 2.40951334E-03, 2.45656209E-03,
     &   2.50546269E-03, 2.55632663E-03, 2.60927452E-03, 2.66443707E-03,
     &   2.72195613E-03, 2.78198596E-03, 2.84469457E-03, 2.91026529E-03,
     &   2.97889861E-03, 3.05081403E-03, 3.12625257E-03, 3.20548008E-03,
     &   3.28878875E-03, 3.37650273E-03, 3.46898031E-03, 3.56662084E-03,
     &   3.71284704E-03, 3.77922086E-03, 3.89523535E-03, 4.01854031E-03,
     &   4.14984455E-03, 4.28995303E-03, 4.43978125E-03, 4.60037741E-03,
     &   4.77294486E-03, 4.95887434E-03, 5.15977956E-03, 5.37754609E-03,
     &   5.61438876E-03, 5.80345697E-03, 6.39245070E-03, 7.11373916E-03,
     &   8.01752784E-03, 9.18310489E-03, 1.07434612E-02, 1.29400229E-02,
     &   1.62614430E-02, 2.18688495E-02, 3.33583675E-02, 7.01439942E-02,
     &   7.41730724E-02, 7.86913853E-02, 8.37934447E-02, 8.95996671E-02,
     &   9.62658524E-02, 1.03997123E-01, 1.13068961E-01, 1.23859905E-01,
     &   1.36904108E-01, 1.52979146E-01, 1.73259433E-01, 1.99598364E-01,
     &   2.35077878E-01, 2.39307962E-01, 3.34024927E-01, 4.03061249E-01,
     &   4.58527947E-01, 5.06766968E-01, 5.43938993E-01, 5.76417932E-01,
     &   6.02447538E-01, 6.28378790E-01, 6.46192023E-01, 6.62685604E-01,
     &   6.74324067E-01, 6.83918670E-01, 6.89310363E-01, 6.93334907E-01,
     &   6.93677132E-01, 6.91651665E-01, 6.86034722E-01, 6.79964133E-01,
     &   6.66833368E-01, 6.55068310E-01, 6.40626813E-01, 6.23281718E-01,
     &   6.02815114E-01, 5.79026600E-01, 5.51742899E-01, 5.20828626E-01,
     &   4.86197802E-01, 4.47825557E-01, 4.05759223E-01, 3.36039791E-01,
     &   2.85497986E-01, 2.04480273E-01, 1.18637847E-01, 1.18555986E-01,
     &   3.35968108E-01, 4.05693300E-01, 4.67418718E-01, 5.03925940E-01,
     &   5.51694925E-01, 5.78983329E-01, 6.02776520E-01, 6.23247733E-01/
  
         DATA ((DAS  (I,J), I= 701, 800), J=2,2) /
     &   6.40597336E-01, 6.55043210E-01, 6.66812498E-01, 6.76134761E-01,
     &   6.83236547E-01, 6.88337231E-01, 6.91645994E-01, 6.93676422E-01,
     &   6.93337286E-01, 6.90694983E-01, 6.85921069E-01, 6.81764406E-01,
     &   6.71596941E-01, 6.62706229E-01, 6.49645833E-01, 6.35642608E-01,
     &   6.17372851E-01, 5.98747853E-01, 5.72776192E-01, 5.47507852E-01,
     &   5.16636025E-01, 4.81817605E-01, 4.37032797E-01, 3.85693131E-01,
     &   3.21587662E-01, 2.64997101E-01, 2.21038934E-01, 1.89320158E-01,
     &   1.65437366E-01, 1.46841166E-01, 1.31967682E-01, 1.19809249E-01,
     &   1.09689287E-01, 1.01137502E-01, 9.38172457E-02, 8.74814005E-02,
     &   8.19445838E-02, 7.70650663E-02, 7.27326740E-02, 6.88604921E-02,
     &   6.53790486E-02, 6.22321566E-02, 5.93738896E-02, 3.11337564E-02,
     &   2.11009172E-02, 1.59614621E-02, 1.28375098E-02, 1.07378837E-02,
     &   9.22976592E-03, 8.09407023E-03, 7.20801312E-03, 6.49743939E-03,
     &   5.91491796E-03, 5.84592509E-03, 5.36484136E-03, 4.95730017E-03,
     &   4.60763726E-03, 4.30434199E-03, 4.03876623E-03, 3.80428661E-03,
     &   3.59574473E-03, 3.40906336E-03, 3.24097726E-03, 3.08884068E-03,
     &   2.95048709E-03, 2.82412530E-03, 2.70826165E-03, 2.60164064E-03,
     &   2.50319933E-03, 2.41203173E-03, 2.32736091E-03, 2.24851680E-03,
     &   2.17491839E-03, 2.10605948E-03, 2.04149693E-03, 1.98084123E-03,
     &   1.92374854E-03, 1.86991424E-03, 1.81906748E-03, 1.77096663E-03,
     &   1.72539542E-03, 1.68215973E-03, 1.64108482E-03, 1.60201293E-03,
     &   1.56480134E-03, 1.52932055E-03, 1.49545282E-03, 1.46309085E-03,
     &   1.43213668E-03, 1.40250065E-03, 1.37410056E-03, 1.34686092E-03,
     &   1.32071226E-03, 1.29559057E-03, 1.27143672E-03, 1.24819608E-03,
     &   1.22581804E-03, 1.20425567E-03, 1.18346538E-03, 1.16340664E-03/
  
         DATA ((DAS  (I,J), I= 801, 900), J=2,2) /
     &   1.14404174E-03, 1.12533548E-03, 1.10725503E-03, 1.08976972E-03,
     &   1.07285084E-03, 1.05647150E-03, 1.04060652E-03, 1.02523225E-03,
     &   1.01032646E-03, 9.95868275E-04, 9.81838039E-04, 9.68217237E-04,
     &   9.54988417E-04, 9.42135111E-04, 9.29641772E-04, 9.17493709E-04,
     &   9.05677028E-04, 8.94178583E-04, 8.82985926E-04, 8.72087264E-04,
     &   8.61471413E-04, 8.51127770E-04, 8.41046267E-04, 8.31217348E-04,
     &   8.21631937E-04, 8.12281409E-04, 8.03157568E-04, 7.94252623E-04,
     &   7.85559171E-04, 7.77070175E-04, 7.68778949E-04, 7.60679146E-04,
     &   7.52764745E-04, 7.45030040E-04, 7.37469639E-04, 7.30078455E-04,
     &   7.22851730E-04, 7.15785007E-04, 7.08874159E-04, 7.02115408E-04,
     &   6.95505358E-04, 6.89041051E-04, 6.82720039E-04, 6.76540494E-04,
     &   6.70501385E-04, 6.65185372E-04, 6.58678071E-04, 6.52868146E-04,
     &   6.47169752E-04, 6.41579815E-04, 6.36095380E-04, 6.30713597E-04,
     &   6.25431729E-04, 6.20247146E-04, 6.15157314E-04, 6.10158826E-04,
     &   4.67880975E-04, 3.74589338E-04, 3.14758796E-04, 3.05306808E-04,
     &   3.34339416E-04, 3.58293302E-04, 3.92917126E-04, 4.42765455E-04,
     &   4.94468930E-04, 5.64648648E-04, 5.93761160E-04, 6.63380663E-04,
     &   7.05371300E-04, 7.53626336E-04, 8.09381124E-04, 8.74580750E-04,
     &   9.51713082E-04, 1.04425724E-03, 1.15720753E-03, 1.29802186E-03,
     &   1.47824169E-03, 1.56523506E-03, 1.66315004E-03, 1.77414561E-03,
     &   1.90101889E-03, 2.04742540E-03, 2.21821223E-03, 2.31473161E-03,
     &   2.42001300E-03, 2.53529895E-03, 2.66208641E-03, 2.80217876E-03,
     &   2.95778468E-03, 3.13162364E-03, 3.32709661E-03, 3.54850031E-03,
     &   3.80135568E-03, 4.09286509E-03, 4.43261590E-03, 4.81622419E-03,
     &   5.06736687E-03, 5.34604901E-03, 5.65705899E-03, 6.00636385E-03/
  
         DATA ((DAS  (I,J), I= 901,1000), J=2,2) /
     &   6.40149453E-03, 6.85209471E-03, 7.37071667E-03, 7.97400682E-03,
     &   8.68452229E-03, 9.53360715E-03, 1.05661293E-02, 1.18486457E-02,
     &   1.34842883E-02, 1.56418301E-02, 1.86176132E-02, 2.29835078E-02,
     &   3.00009129E-02, 4.30841380E-02, 6.36615369E-02, 7.53733660E-02,
     &   8.81480097E-02, 1.19579599E-01, 1.30903650E-01, 1.40249638E-01,
     &   1.48186548E-01, 1.54869878E-01, 1.60353207E-01, 1.65074645E-01,
     &   1.68940583E-01, 1.71707439E-01, 1.74058001E-01, 1.75721989E-01,
     &   1.76708933E-01, 1.77065388E-01, 1.76812258E-01, 1.76120585E-01,
     &   1.74716849E-01, 1.72879993E-01, 1.70404012E-01, 1.67218352E-01,
     &   1.63868607E-01, 1.59175386E-01, 1.54430440E-01, 1.48976804E-01,
     &   1.42779476E-01, 1.34571688E-01, 1.26676364E-01, 1.16450558E-01,
     &   1.06822370E-01, 9.27849345E-02, 7.74652562E-02, 5.45843348E-02,
     &   3.46397700E-02, 1.16669403E-02, 1.63039422E-04, 1.16086782E-02,
     &   2.31698166E-02, 5.45291051E-02, 7.74133903E-02, 9.27361034E-02,
     &   1.06776960E-01, 1.16407908E-01, 1.26637084E-01, 1.34535381E-01,
     &   1.42746689E-01, 1.48947041E-01, 1.54403682E-01, 1.59151591E-01,
     &   1.63848190E-01, 1.67200748E-01, 1.70389577E-01, 1.72868595E-01,
     &   1.74708349E-01, 1.76115219E-01, 1.76809479E-01, 1.77065726E-01,
     &   1.76712160E-01, 1.75728169E-01, 1.74067138E-01, 1.71719483E-01,
     &   1.68955234E-01, 1.65092178E-01, 1.60373571E-01, 1.54892939E-01,
     &   1.48212336E-01, 1.40278117E-01, 1.30934757E-01, 1.19613323E-01,
     &   1.05888162E-01, 1.13339671E-01, 9.69555294E-02, 8.68639052E-02,
     &   8.07628423E-02, 6.81242445E-02, 6.37028756E-02, 5.41851379E-02,
     &   3.50851396E-02, 2.58871290E-02, 2.04989443E-02, 1.69644172E-02,
     &   1.44688091E-02, 1.26132830E-02, 1.11798047E-02, 1.00391968E-02/
  
         DATA ((DAS  (I,J), I=1001,1100), J=2,2) /
     &   9.11008631E-03, 8.33867514E-03, 7.68797665E-03, 7.13172840E-03,
     &   6.65076846E-03, 6.23078801E-03, 5.86088739E-03, 5.53261854E-03,
     &   5.23933194E-03, 4.97572266E-03, 4.55901808E-03, 4.03887527E-03,
     &   3.76068755E-03, 3.30611068E-03, 2.95039193E-03, 2.60159237E-03,
     &   2.10643719E-03, 1.56183203E-03, 1.24009641E-03, 1.10637877E-03,
     &   1.03171258E-03, 9.83100309E-04, 9.48786115E-04, 9.22917795E-04,
     &   9.02620793E-04, 8.86148713E-04, 8.72374656E-04, 8.60627000E-04,
     &   8.50397482E-04, 8.41337458E-04, 8.33201178E-04, 8.25776143E-04,
     &   8.18935914E-04, 8.12544657E-04, 8.06493649E-04, 8.00753813E-04,
     &   7.95220979E-04, 7.89839317E-04, 7.84577949E-04, 7.79390935E-04,
     &   7.74226780E-04, 7.69038878E-04, 7.63781363E-04, 7.58415531E-04,
     &   7.52874227E-04, 7.47085005E-04, 7.40942223E-04, 7.34322618E-04,
     &   7.26992769E-04, 7.18521929E-04, 7.07835535E-04, 6.83810875E-04,
     &   6.63338889E-04, 6.56362352E-04, 6.51752466E-04, 6.48423138E-04,
     &   6.45929366E-04, 6.44037705E-04, 6.42599346E-04, 6.41494702E-04,
     &   6.40646291E-04, 6.39981882E-04, 6.39439451E-04, 6.38948233E-04,
     &   6.38477139E-04, 6.37965140E-04, 6.37252285E-04, 6.36511424E-04,
     &   6.35456053E-04, 6.34153645E-04, 6.32490117E-04, 6.30408754E-04,
     &   6.27860630E-04, 6.24708161E-04, 6.20912334E-04, 6.16366057E-04,
     &   6.10891561E-04, 6.04276885E-04, 5.96732520E-04, 5.87603905E-04,
     &   5.76781275E-04, 5.63672662E-04, 5.47990464E-04, 5.27877709E-04,
     &   5.02462062E-04, 4.67074737E-04, 4.56982800E-04, 4.26550331E-04,
     &   3.84221485E-04, 3.80213982E-04, 3.53424124E-04, 3.44868621E-04,
     &   3.38009812E-04, 3.28429750E-04, 3.20256351E-04, 3.12708128E-04,
     &   3.08384038E-04, 3.05745230E-04, 2.99258710E-04, 2.92692243E-04/
  
         DATA ((DAS  (I,J), I=1101,1200), J=2,2) /
     &   2.87104384E-04, 2.81783975E-04, 2.76962642E-04, 2.72600042E-04,
     &   2.68449775E-04, 2.64876495E-04, 2.61450956E-04, 2.57312276E-04,
     &   2.53173597E-04, 2.49034918E-04, 2.45556751E-04, 2.41837673E-04,
     &   2.39706409E-04, 2.36914566E-04, 2.37033396E-04, 2.34785224E-04,
     &   2.32366895E-04, 2.30348030E-04, 2.31381661E-04, 2.30907903E-04,
     &   2.30950089E-04, 2.31045496E-04, 2.30143657E-04, 2.36983200E-04,
     &   2.43046282E-04, 2.81443278E-04, 3.23330997E-04, 2.98973678E-04,
     &   2.29619787E-04, 2.36392220E-04, 2.34687255E-04, 2.54928924E-04,
     &   2.48194260E-04, 2.35768254E-04, 2.21976143E-04, 2.16910499E-04,
     &   2.11934842E-04, 2.09239393E-04, 2.08796468E-04, 2.05294309E-04,
     &   2.02796765E-04, 2.02649349E-04, 2.03130585E-04, 2.02321130E-04,
     &   2.02048173E-04, 2.00638900E-04, 1.99739866E-04, 1.98646596E-04,
     &   1.97895314E-04, 1.99906368E-04, 1.99760845E-04, 2.02443844E-04,
     &   2.02101889E-04, 2.26769776E-04, 2.43132001E-04, 2.40265402E-04,
     &   2.28474315E-04, 2.22329161E-04, 2.05186087E-04, 1.98369439E-04,
     &   2.18170870E-04, 2.46469222E-04, 2.46274193E-04, 2.01386350E-04,
     &   2.00703703E-04, 1.98269048E-04, 2.01415049E-04, 1.93020118E-04,
     &   1.91034316E-04, 1.92636812E-04, 1.90868382E-04, 1.86428969E-04,
     &   1.85690985E-04, 1.85255512E-04, 1.88297972E-04, 1.85409773E-04,
     &   1.81686858E-04, 1.81367407E-04, 1.94539473E-04, 1.98432829E-04,
     &   1.97328852E-04, 2.01429512E-04, 1.78245918E-04, 1.86036486E-04,
     &   2.01377343E-04, 1.96979145E-04, 1.95976097E-04, 1.99375524E-04,
     &   2.01654755E-04, 2.06220220E-04, 2.03953921E-04, 1.84184717E-04,
     &   2.05538262E-04, 2.83544055E-04, 2.41294183E-04, 1.87885076E-04,
     &   1.84244511E-04, 1.80797644E-04, 1.76481358E-04, 1.71757515E-04/
  
         DATA ((DAS  (I,J), I=1201,1300), J=2,2) /
     &   1.73409963E-04, 1.74436569E-04, 1.79726833E-04, 1.77316167E-04,
     &   1.78063955E-04, 1.81590125E-04, 1.77708302E-04, 1.84649872E-04,
     &   1.98089390E-04, 2.35716058E-04, 2.26407612E-04, 2.25047539E-04,
     &   2.51058390E-04, 2.03768375E-04, 1.95891563E-04, 2.00429648E-04,
     &   2.33179820E-04, 2.31337952E-04, 2.67311730E-04, 2.69861851E-04,
     &   3.38227196E-04, 4.24743353E-04, 5.68547088E-04, 7.21338556E-04,
     &   4.83632441E-04, 2.73891751E-04, 2.03978188E-04, 1.58418775E-04,
     &   1.23586110E-04, 1.14799246E-04, 1.08436517E-04, 9.97347838E-05,
     &   9.39536458E-05, 9.17030642E-05, 8.97493770E-05, 8.80303670E-05,
     &   8.65005675E-05, 8.51259705E-05, 8.38763886E-05, 8.27398621E-05,
     &   8.16964772E-05, 8.07334688E-05, 7.98404777E-05, 7.90089989E-05,
     &   7.82319753E-05, 7.75034945E-05, 7.68185594E-05, 7.61729125E-05,
     &   7.55629000E-05, 7.49853647E-05, 7.44375623E-05, 7.39170937E-05,
     &   7.34218513E-05, 7.29499749E-05, 7.24998160E-05, 7.20699087E-05,
     &   7.16589451E-05, 7.12657554E-05, 7.08892910E-05, 7.05286104E-05,
     &   7.01828677E-05, 6.98513026E-05, 6.95332320E-05, 6.92280432E-05,
     &   6.89351883E-05, 6.86541795E-05, 6.83845850E-05, 6.81768717E-05,
     &   6.78781767E-05, 6.74135429E-05, 6.69890550E-05, 6.66038930E-05,
     &   6.62581191E-05, 6.59528224E-05, 6.56903652E-05, 6.54747800E-05,
     &   6.53124064E-05, 6.52129308E-05, 6.51911333E-05, 6.52703985E-05,
     &   6.54863944E-05, 6.59017776E-05, 6.66289897E-05, 6.67259445E-05,
     &   6.78932937E-05, 7.02161568E-05, 7.50992728E-05, 8.44936431E-05,
     &   8.87610762E-05, 1.08211306E-04, 1.48806087E-04, 1.68587101E-04,
     &   1.96960275E-04, 2.16174409E-04, 2.40420330E-04, 2.64846611E-04,
     &   2.95551648E-04, 3.14038429E-04, 3.35206892E-04, 3.59670029E-04/
  
         DATA ((DAS  (I,J), I=1301,1400), J=2,2) /
     &   3.88242627E-04, 4.22031759E-04, 4.62580762E-04, 4.86047427E-04,
     &   5.12107633E-04, 5.41211340E-04, 5.73918924E-04, 6.10937262E-04,
     &   6.53170954E-04, 7.01796654E-04, 7.58373658E-04, 8.25013208E-04,
     &   8.52773252E-04, 8.70191889E-04, 8.88343717E-04, 9.07275856E-04,
     &   9.27039553E-04, 9.47690643E-04, 9.69290072E-04, 9.91904498E-04,
     &   1.01560698E-03, 1.04047775E-03, 1.06660513E-03, 1.09408659E-03,
     &   1.12302993E-03, 1.15355470E-03, 1.18579387E-03, 1.21989573E-03,
     &   1.25602618E-03, 1.29437144E-03, 1.33514121E-03, 1.37857256E-03,
     &   1.42493449E-03, 1.47453350E-03, 1.52772039E-03, 1.58489854E-03,
     &   1.64653416E-03, 1.71316899E-03, 1.78543627E-03, 1.86408090E-03,
     &   1.94998520E-03, 2.04420206E-03, 2.14799837E-03, 2.26291219E-03,
     &   2.39082945E-03, 2.53408819E-03, 2.69562266E-03, 2.87916627E-03,
     &   3.08954356E-03, 3.33310014E-03, 3.61835343E-03, 3.95700854E-03,
     &   4.36560321E-03, 4.86828837E-03, 5.50177757E-03, 6.32473316E-03,
     &   7.43704190E-03, 9.02371503E-03, 1.14699891E-02, 1.57318679E-02,
     &   2.50059776E-02, 3.07560462E-02, 5.85808557E-02, 8.15111374E-02,
     &   9.81320913E-02, 1.10992660E-01, 1.21559190E-01, 1.30806064E-01,
     &   1.39385874E-01, 1.45358808E-01, 1.51438794E-01, 1.57418406E-01,
     &   1.60301457E-01, 1.64341997E-01, 1.66763042E-01, 1.69768199E-01,
     &   1.70551358E-01, 1.71709751E-01, 1.72191155E-01, 1.71828337E-01,
     &   1.71274731E-01, 1.70438941E-01, 1.67792148E-01, 1.65936062E-01,
     &   1.63654844E-01, 1.57777258E-01, 1.54128266E-01, 1.49957879E-01,
     &   1.45186345E-01, 1.33998039E-01, 1.27427291E-01, 1.20304010E-01,
     &   1.04112197E-01, 9.51492396E-02, 7.54249008E-02, 5.37102599E-02,
     &   5.73466401E-03, 5.29970606E-02, 7.47674190E-02, 9.44624944E-02/
  
         DATA ((DAS  (I,J), I=1401,1500), J=2,2) /
     &   1.11962894E-01, 1.19830561E-01, 1.26993188E-01, 1.33537706E-01,
     &   1.44866936E-01, 1.49627382E-01, 1.53878951E-01, 1.57560203E-01,
     &   1.63496875E-01, 1.65782920E-01, 1.67685334E-01, 1.70364941E-01,
     &   1.71230204E-01, 1.72114000E-01, 1.72193561E-01, 1.71736231E-01,
     &   1.70604503E-01, 1.68929211E-01, 1.66835279E-01, 1.64422970E-01,
     &   1.60391257E-01, 1.57527222E-01, 1.51535717E-01, 1.45471512E-01,
     &   1.39480472E-01, 1.30895110E-01, 1.21640454E-01, 1.11063898E-01,
     &   9.81906522E-02, 8.15539479E-02, 5.82670592E-02, 3.18016141E-02,
     &   1.81898592E-02, 1.27267619E-02, 9.78544835E-03, 7.94803355E-03,
     &   6.69146540E-03, 5.77798364E-03, 5.08398756E-03, 4.53887325E-03,
     &   4.09938269E-03, 3.73753463E-03, 3.43442850E-03, 3.17683745E-03,
     &   2.95522817E-03, 2.76255581E-03, 2.59350183E-03, 2.44397579E-03,
     &   2.31078019E-03, 2.19137947E-03, 2.08373713E-03, 1.98619872E-03,
     &   1.89740627E-03, 1.81623469E-03, 1.74174396E-03, 1.67314254E-03,
     &   1.60975917E-03, 1.55102089E-03, 1.49643563E-03, 1.44557849E-03,
     &   1.39808058E-03, 1.35362016E-03, 1.31191529E-03, 1.27271786E-03,
     &   1.23580872E-03, 1.20099350E-03, 1.16809925E-03, 1.13697155E-03,
     &   1.10747212E-03, 1.07947672E-03, 1.05287345E-03, 1.02756125E-03,
     &   1.00344858E-03, 9.80452399E-04, 9.58497121E-04, 9.37513850E-04,
     &   9.17439638E-04, 8.98216855E-04, 8.79792644E-04, 8.62118433E-04,
     &   8.45149513E-04, 7.17198152E-04, 6.38799605E-04, 5.63658264E-04,
     &   4.79810927E-04, 4.01449120E-04, 3.24251592E-04, 2.81040054E-04,
     &   2.24706553E-04, 2.05707410E-04, 1.90676716E-04, 1.79099789E-04,
     &   1.69136362E-04, 1.61740726E-04, 1.51859310E-04, 1.42121605E-04,
     &   1.31556297E-04, 1.35515665E-04, 1.48174774E-04, 1.94565955E-04/
  
         DATA ((DAS  (I,J), I=1501,1600), J=2,2) /
     &   2.86571697E-04, 4.19112827E-04, 6.00846188E-04, 8.54726645E-04,
     &   1.49540818E-03, 1.61714669E-03, 1.76056409E-03, 1.80213240E-03,
     &   1.89689256E-03, 2.00219686E-03, 2.11990505E-03, 2.25234167E-03,
     &   2.40245231E-03, 2.57402376E-03, 2.77200757E-03, 3.00300817E-03,
     &   3.27602811E-03, 3.60367423E-03, 4.00415316E-03, 4.50477735E-03,
     &   5.14846268E-03, 6.00673557E-03, 7.20832928E-03, 9.01070539E-03,
     &   1.20144834E-02, 1.80207887E-02, 2.60778320E-02, 2.74301971E-02,
     &   2.89304025E-02, 3.06040767E-02, 3.24831313E-02, 3.46078095E-02,
     &   3.70295932E-02, 3.98154161E-02, 4.30539235E-02, 4.68650380E-02,
     &   5.14150627E-02, 5.69414494E-02, 6.37952864E-02, 7.25182389E-02,
     &   8.39914335E-02, 9.97485818E-02, 1.22709356E-01, 1.59163213E-01,
     &   2.25318242E-01, 3.74979139E-01, 4.27443258E-01, 4.68736501E-01,
     &   5.14761422E-01, 5.53387382E-01, 5.81243636E-01, 6.04869007E-01,
     &   6.15754650E-01, 6.20076573E-01, 6.14640647E-01, 5.95378742E-01,
     &   5.73201564E-01, 5.69005081E-01, 5.66823419E-01, 5.62290223E-01,
     &   5.60412677E-01, 5.58980136E-01, 5.57526554E-01, 5.41806365E-01,
     &   5.14000194E-01, 4.76793199E-01, 4.37371724E-01, 3.86876818E-01,
     &   3.29501237E-01, 2.72384144E-01, 2.38632336E-01, 2.03605366E-01,
     &   1.67461590E-01, 1.15326165E-01, 7.72598802E-02, 3.87452104E-02,
     &   1.55134227E-02, 7.76002222E-03, 3.88294713E-03, 9.35570323E-05,
     &   3.87503579E-03, 7.75210967E-03, 3.87373140E-02, 7.72520359E-02,
     &   1.15318406E-01, 2.85489469E-01, 3.47407233E-01, 4.46620026E-01,
     &   4.84778291E-01, 5.20628711E-01, 5.49935274E-01, 5.71128080E-01,
     &   5.89452940E-01, 6.01741177E-01, 6.11297218E-01, 6.16690843E-01,
     &   6.19638596E-01, 6.19962469E-01, 6.18159540E-01, 6.14917119E-01/
  
         DATA ((DAS  (I,J), I=1601,1700), J=2,2) /
     &   6.04199695E-01, 5.96976251E-01, 5.88967567E-01, 5.81245928E-01,
     &   5.63863290E-01, 5.54349920E-01, 5.38898945E-01, 5.14764976E-01,
     &   4.27447755E-01, 3.59805743E-01, 3.08587154E-01, 2.69240477E-01,
     &   2.38356226E-01, 2.13594632E-01, 1.88870516E-01, 1.50268421E-01,
     &   1.39822238E-01, 1.30717908E-01, 1.22715193E-01, 1.10822250E-01,
     &   9.17284378E-02, 7.82241767E-02, 6.81752514E-02, 6.04088100E-02,
     &   5.42278835E-02, 4.91926282E-02, 4.50119177E-02, 4.14854558E-02,
     &   3.84709491E-02, 3.58645457E-02, 3.35886837E-02, 3.15842731E-02,
     &   2.98055082E-02, 2.82163355E-02, 2.67879903E-02, 1.80267206E-02,
     &   1.20204152E-02, 9.01663543E-03, 6.01266013E-03, 4.51070987E-03,
     &   3.60962069E-03, 3.00897478E-03, 2.58000244E-03, 2.25833347E-03,
     &   2.00820446E-03, 1.80815896E-03, 1.69471001E-03, 1.56235310E-03,
     &   1.44930138E-03, 1.35162780E-03, 1.26640583E-03, 1.19141008E-03,
     &   9.20264852E-04, 7.51139198E-04, 6.36065767E-04, 5.53075292E-04,
     &   4.90983155E-04, 4.43790801E-04, 4.04282214E-04, 3.71935693E-04,
     &   1.84721240E-04, 1.77823691E-04, 1.85340216E-04, 1.89574273E-04,
     &   2.00167578E-04, 2.18878041E-04, 2.30016540E-04, 2.46006234E-04,
     &   2.87592129E-04, 3.57783440E-04, 4.87651241E-04, 7.96667987E-04,
     &   1.09672547E-03, 1.17449679E-03, 1.26428920E-03, 1.36910292E-03,
     &   1.49303291E-03, 1.64181698E-03, 1.82373435E-03, 2.05121178E-03,
     &   2.34377643E-03, 2.73394662E-03, 3.28032967E-03, 4.10008461E-03,
     &   5.46652783E-03, 5.70419240E-03, 5.96343637E-03, 6.24740275E-03,
     &   6.55976835E-03, 6.90497744E-03, 7.28858476E-03, 7.71732356E-03,
     &   8.19959893E-03, 8.74623179E-03, 9.37095029E-03, 1.00916855E-02,
     &   1.09326113E-02, 1.19264033E-02, 1.31187603E-02, 1.45761398E-02/
  
         DATA ((DAS  (I,J), I=1701,1800), J=2,2) /
     &   1.50315311E-02, 1.63977015E-02, 1.87391076E-02, 2.18606283E-02,
     &   2.62292657E-02, 3.27782266E-02, 4.36779304E-02, 6.54074019E-02,
     &   1.29632629E-01, 1.54116378E-01, 2.17377834E-01, 2.65486894E-01,
     &   3.05126786E-01, 3.39724893E-01, 3.70420431E-01, 3.97957299E-01,
     &   4.22554532E-01, 4.45353643E-01, 4.66884662E-01, 4.86561627E-01,
     &   5.03869824E-01, 5.19880106E-01, 5.34315247E-01, 5.46958690E-01,
     &   5.58970946E-01, 5.68810452E-01, 5.76494128E-01, 5.83017783E-01,
     &   5.88039041E-01, 5.91149543E-01, 5.91932102E-01, 5.90609884E-01,
     &   5.86791515E-01, 5.80044584E-01, 5.69900858E-01, 5.58496927E-01,
     &   5.40834506E-01, 5.18365679E-01, 4.90633624E-01, 4.51125436E-01,
     &   4.03548239E-01, 3.39227746E-01, 2.54942608E-01, 3.49292528E-02,
     &   1.03672603E-04, 1.15403881E-01, 2.54938465E-01, 3.39224024E-01,
     &   4.03544953E-01, 4.51122561E-01, 4.90631168E-01, 5.18363581E-01,
     &   5.40832758E-01, 5.58495516E-01, 5.69899717E-01, 5.80043750E-01,
     &   5.86790970E-01, 5.90609608E-01, 5.91932078E-01, 5.91149752E-01,
     &   5.88039499E-01, 5.83018469E-01, 5.76495021E-01, 5.68811533E-01,
     &   5.58972221E-01, 5.46960160E-01, 5.34316889E-01, 5.19881917E-01,
     &   5.03871798E-01, 4.86563754E-01, 4.66886941E-01, 4.45356069E-01,
     &   4.22557094E-01, 3.97959990E-01, 3.70423249E-01, 3.39727833E-01,
     &   3.05129844E-01, 2.65490064E-01, 2.17381113E-01, 1.54119762E-01,
     &   1.31967443E-01, 1.27812577E-01, 1.22658883E-01, 1.08424723E-01,
     &   9.55964063E-02, 6.54073228E-02, 4.36814069E-02, 3.27808136E-02,
     &   2.62321748E-02, 2.18641095E-02, 1.87425888E-02, 1.64009589E-02,
     &   1.45796203E-02, 1.31222402E-02, 1.19297641E-02, 1.09360896E-02,
     &   1.00951630E-02, 9.37435367E-03, 8.74970704E-03, 8.20307295E-03/
  
         DATA ((DAS  (I,J), I=1801,1900), J=2,2) /
     &   5.46998934E-03, 4.10352870E-03, 3.28375072E-03, 2.73734008E-03,
     &   2.34712997E-03, 2.05453706E-03, 1.82703323E-03, 1.49627903E-03,
     &   1.26748655E-03, 1.17765819E-03, 1.09983834E-03, 8.20604623E-04,
     &   6.17323607E-04, 4.96819980E-04, 4.17425473E-04, 3.61355479E-04,
     &   3.19816260E-04, 2.87936847E-04, 2.62807421E-04, 2.42583841E-04,
     &   2.26049800E-04, 2.12369091E-04, 2.00946281E-04, 1.91355154E-04,
     &   1.83289352E-04, 1.76533784E-04, 1.70951345E-04, 1.66485850E-04,
     &   1.63192620E-04, 1.61339485E-04, 1.59939315E-04, 1.56491527E-04,
     &   1.57912362E-04, 1.84420406E-04, 1.90672080E-04, 2.10696119E-04,
     &   2.28681908E-04, 2.44007625E-04, 2.57560690E-04, 2.69134271E-04,
     &   2.79171894E-04, 2.87722975E-04, 2.94858981E-04, 3.00803417E-04,
     &   3.05544345E-04, 3.09091476E-04, 3.11578570E-04, 3.13038513E-04,
     &   3.13423079E-04, 3.12834680E-04, 3.11262094E-04, 3.08639105E-04,
     &   3.05058649E-04, 3.00588411E-04, 2.94916288E-04, 2.88426429E-04,
     &   2.80724257E-04, 2.71935287E-04, 2.61873223E-04, 2.50507576E-04,
     &   2.37843631E-04, 2.23944361E-04, 2.07843359E-04, 1.89945184E-04,
     &   1.70173278E-04, 1.47430544E-04, 1.22447484E-04, 1.09218263E-04,
     &   1.62869623E-04, 1.90944905E-04, 2.12551553E-04, 2.29800937E-04,
     &   2.44540907E-04, 2.57202178E-04, 2.67703168E-04, 2.76922363E-04,
     &   2.84890249E-04, 2.91668910E-04, 2.97336073E-04, 3.02047315E-04,
     &   3.05769811E-04, 3.08747624E-04, 3.10790610E-04, 3.12077470E-04,
     &   3.12576764E-04, 3.12253864E-04, 3.11152887E-04, 3.09253603E-04,
     &   3.06479881E-04, 3.02897358E-04, 2.98458453E-04, 2.92766370E-04,
     &   2.86378588E-04, 2.79231861E-04, 2.70518468E-04, 2.60570847E-04,
     &   2.49261918E-04, 2.36091956E-04, 2.21255047E-04, 2.03682979E-04/
  
         DATA ((DAS  (I,J), I=1901,2000), J=2,2) /
     &   1.83793066E-04, 1.58325103E-04, 1.28046541E-04, 1.26423606E-04,
     &   1.16402662E-04, 1.13363487E-04, 1.12634065E-04, 1.12199176E-04,
     &   1.11152948E-04, 1.10656073E-04, 1.10699866E-04, 1.10886843E-04,
     &   1.11132205E-04, 1.11274732E-04, 1.11313766E-04, 1.11410861E-04,
     &   1.11430597E-04, 1.11481601E-04, 1.11473629E-04, 1.11278906E-04,
     &   1.11058705E-04, 1.10724578E-04, 1.10338791E-04, 1.09893315E-04,
     &   1.09368132E-04, 1.08671422E-04, 1.07895553E-04, 1.07035194E-04,
     &   1.06083475E-04, 1.05046610E-04, 1.03932496E-04, 1.02764233E-04,
     &   1.01361998E-04, 9.98858977E-05, 9.85717158E-05, 9.57515577E-05,
     &   9.29562050E-05, 9.06750098E-05, 8.66656725E-05, 8.98601562E-05,
     &   9.21953544E-05, 9.39743182E-05, 9.61412038E-05, 9.80224214E-05,
     &   9.92228315E-05, 1.00460321E-04, 1.01729679E-04, 1.02855257E-04,
     &   1.03937390E-04, 1.04989700E-04, 1.05997527E-04, 1.06952749E-04,
     &   1.07857614E-04, 1.08717308E-04, 1.09518770E-04, 1.10280364E-04,
     &   1.11005908E-04, 1.11694332E-04, 1.12310396E-04, 1.12873431E-04,
     &   1.13427077E-04, 1.13974729E-04, 1.14537647E-04, 1.15087402E-04,
     &   1.15579636E-04, 1.16074981E-04, 1.16673904E-04, 1.17436182E-04,
     &   1.18386100E-04, 1.19633126E-04, 1.21386225E-04, 1.21469868E-04,
     &   1.20212780E-04, 1.18740520E-04, 1.19392455E-04, 1.19897533E-04,
     &   1.20370700E-04, 1.20811255E-04, 1.21203665E-04, 1.21544570E-04,
     &   1.21847192E-04, 1.22111976E-04, 1.22339643E-04, 1.21237075E-04,
     &   1.20127896E-04, 1.19123529E-04, 1.18196818E-04, 1.17310086E-04,
     &   1.16438158E-04, 1.15588102E-04, 1.14759326E-04, 1.13928900E-04,
     &   1.13090973E-04, 1.12232035E-04, 1.11339371E-04, 1.10442524E-04,
     &   1.09536550E-04, 1.08582269E-04, 1.07580383E-04, 1.06620816E-04/
  
         DATA ((DAS  (I,J), I=2001,2100), J=2,2) /
     &   1.05517791E-04, 1.04522527E-04, 1.03019053E-04, 1.01497106E-04,
     &   1.00045625E-04, 9.87405108E-05, 9.69104639E-05, 9.49288829E-05,
     &   9.31287942E-05, 9.08211190E-05, 9.20486502E-05, 9.34383792E-05,
     &   9.51312808E-05, 9.67355215E-05, 9.78425626E-05, 9.91299953E-05,
     &   1.00511136E-04, 1.01890474E-04, 1.02755714E-04, 1.03744738E-04,
     &   1.04589864E-04, 1.05474931E-04, 1.06325391E-04, 1.07128064E-04,
     &   1.07923009E-04, 1.08711025E-04, 1.09462351E-04, 1.10177479E-04,
     &   1.10895743E-04, 1.11596166E-04, 1.12304949E-04, 1.13021002E-04,
     &   1.13730635E-04, 1.14451371E-04, 1.15215315E-04, 1.16038442E-04,
     &   1.16875320E-04, 1.17135879E-04, 1.17495367E-04, 1.17999285E-04,
     &   1.18720590E-04, 1.19743687E-04, 1.20726246E-04, 1.20185836E-04,
     &   1.19615943E-04, 1.16716540E-04, 1.17544123E-04, 1.18472637E-04,
     &   1.19136510E-04, 1.20537203E-04, 1.22436228E-04, 1.24898191E-04,
     &   1.27648125E-04, 1.30604126E-04, 1.33699101E-04, 1.36620189E-04,
     &   1.39845700E-04, 1.42925034E-04, 1.05701919E-04, 6.84788032E-05,
     &   6.75087129E-05, 6.66997205E-05, 6.60647793E-05, 6.55071476E-05,
     &   6.50506996E-05, 6.46357876E-05, 6.42862376E-05, 6.39607070E-05,
     &   6.36686371E-05, 6.34153090E-05, 6.31734052E-05, 6.29607562E-05,
     &   6.27552959E-05, 6.25727932E-05, 6.23948248E-05, 6.22354307E-05,
     &   6.20788423E-05, 6.19376565E-05, 6.17981158E-05, 6.16716074E-05,
     &   6.15512774E-05, 6.14314961E-05, 6.13221866E-05, 6.12129523E-05,
     &   6.11129092E-05, 6.10126023E-05, 6.09204512E-05, 6.08277914E-05,
     &   6.07424371E-05, 6.06563961E-05, 6.05769523E-05, 6.04966926E-05,
     &   6.04191132E-05, 6.03472634E-05, 6.02744672E-05, 6.02069297E-05,
     &   6.01383895E-05, 6.00747009E-05, 6.00099707E-05, 5.99497372E-05/
  
         DATA ((DAS  (I,J), I=2101,2174), J=2,2) /
     &   5.98884361E-05, 5.98313204E-05, 5.97731212E-05, 5.97188321E-05,
     &   5.96658308E-05, 5.96117359E-05, 5.95611965E-05, 5.95095636E-05,
     &   5.94612789E-05, 5.94119048E-05, 5.93656920E-05, 5.93183969E-05,
     &   5.92740944E-05, 5.92287191E-05, 5.91861831E-05, 5.91425856E-05,
     &   5.90998468E-05, 5.90597408E-05, 5.90185929E-05, 5.89688666E-05,
     &   5.89291740E-05, 5.88918844E-05, 5.88535842E-05, 5.88175822E-05,
     &   5.87805840E-05, 5.87457873E-05, 5.87100094E-05, 5.86763435E-05,
     &   5.86417114E-05, 5.86091083E-05, 5.85770019E-05, 5.85439517E-05,
     &   5.85128175E-05, 5.84807547E-05, 5.84505384E-05, 5.84194084E-05,
     &   5.83900597E-05, 5.83598122E-05, 5.83312852E-05, 5.83018740E-05,
     &   5.82741260E-05, 5.82455083E-05, 5.79576638E-05, 5.77054783E-05,
     &   5.76679048E-05, 5.63870335E-05, 5.59749108E-05, 5.51697605E-05,
     &   5.48397311E-05, 5.48254196E-05, 5.44841639E-05, 5.44832254E-05,
     &   5.42824750E-05, 5.42755991E-05, 5.42715115E-05, 5.41870880E-05,
     &   5.41353761E-05, 5.41264633E-05, 5.41121236E-05, 5.40913766E-05,
     &   5.40770922E-05, 5.40682666E-05, 5.39881194E-05, 5.39843135E-05,
     &   5.39625649E-05, 5.39586393E-05, 5.39412827E-05, 5.39345565E-05,
     &   5.39292615E-05, 5.39243654E-05, 5.39103720E-05, 5.38906579E-05,
     &   5.38824994E-05, 5.38316673E-05/
  
         DATA ((DAS  (I,J), I=   1, 100), J=3,3) /
     &   4.28714003E-06, 4.54208633E-06, 4.82341499E-06, 5.13327535E-06,
     &   5.48179450E-06, 5.66557967E-06, 6.18493195E-06, 6.62203337E-06,
     &   6.92946733E-06, 7.26822574E-06, 7.18104030E-06, 7.08225282E-06,
     &   7.03086911E-06, 7.02662730E-06, 7.06957574E-06, 7.15869873E-06,
     &   7.33980628E-06, 7.54195977E-06, 7.71868682E-06, 7.96526992E-06,
     &   8.16209187E-06, 8.38328487E-06, 8.55123156E-06, 8.79588193E-06,
     &   9.01232014E-06, 9.22293169E-06, 9.49634893E-06, 9.65054610E-06,
     &   9.72613672E-06, 9.97008837E-06, 1.02227741E-05, 1.04777442E-05,
     &   1.07395599E-05, 1.09999998E-05, 1.12634494E-05, 1.15310202E-05,
     &   1.18024261E-05, 1.20800209E-05, 1.23663596E-05, 1.26623244E-05,
     &   1.28900806E-05, 1.32003738E-05, 1.35213447E-05, 1.37695899E-05,
     &   1.41119487E-05, 1.44672665E-05, 1.47375304E-05, 1.50996961E-05,
     &   1.53786086E-05, 1.57582672E-05, 1.77622057E-05, 2.00849906E-05,
     &   2.39604746E-05, 3.02758053E-05, 3.27862297E-05, 3.34296387E-05,
     &   3.55605888E-05, 3.90828972E-05, 4.33023048E-05, 4.60168896E-05,
     &   4.86472513E-05, 4.91356840E-05, 4.86745874E-05, 4.91022678E-05,
     &   5.00734789E-05, 5.13734038E-05, 5.23927413E-05, 5.34467215E-05,
     &   5.38832337E-05, 5.47960973E-05, 5.52970963E-05, 5.52393038E-05,
     &   5.63497177E-05, 5.77243432E-05, 5.88791908E-05, 6.12947564E-05,
     &   6.42970875E-05, 7.00919846E-05, 7.87258578E-05, 8.38019095E-05,
     &   9.99928331E-05, 1.03714594E-04, 1.12117629E-04, 1.20744973E-04,
     &   1.37900732E-04, 1.65085129E-04, 1.86774334E-04, 2.04260301E-04,
     &   2.19177997E-04, 2.31872745E-04, 2.42708526E-04, 2.52778121E-04,
     &   2.61479198E-04, 2.68246209E-04, 2.74525556E-04, 2.83788375E-04,
     &   2.84508504E-04, 2.85239435E-04, 2.86254817E-04, 2.86239769E-04/
  
         DATA ((DAS  (I,J), I= 101, 200), J=3,3) /
     &   2.85511123E-04, 2.84513683E-04, 2.83033422E-04, 2.80987537E-04,
     &   2.78424001E-04, 2.73592428E-04, 2.68857006E-04, 2.64217734E-04,
     &   2.57186630E-04, 2.48895088E-04, 2.38914581E-04, 2.25154953E-04,
     &   2.10974112E-04, 1.96021047E-04, 1.75623354E-04, 1.49834723E-04,
     &   1.14911588E-04, 4.67173125E-05, 9.99584716E-05, 1.34870057E-04,
     &   1.61375751E-04, 1.82768421E-04, 2.00689175E-04, 2.15997567E-04,
     &   2.29154735E-04, 2.40506857E-04, 2.50333905E-04, 2.58920134E-04,
     &   2.66362415E-04, 2.72826652E-04, 2.78400192E-04, 2.95580949E-04,
     &   2.87228389E-04, 2.90975204E-04, 2.93440838E-04, 2.94454385E-04,
     &   2.93596437E-04, 2.91623486E-04, 2.89918453E-04, 2.85304857E-04,
     &   2.82525143E-04, 2.77783714E-04, 2.72308571E-04, 2.66095929E-04,
     &   2.59190075E-04, 2.50108675E-04, 2.39749863E-04, 2.27963008E-04,
     &   2.14636792E-04, 1.99443488E-04, 1.81795595E-04, 1.60857859E-04,
     &   1.55925082E-04, 1.42834746E-04, 1.29744411E-04, 1.20244494E-04,
     &   1.12881595E-04, 1.08136127E-04, 9.41308669E-05, 8.55908222E-05,
     &   8.00888056E-05, 7.28019477E-05, 6.99675419E-05, 6.72134052E-05,
     &   6.46795484E-05, 6.21836378E-05, 5.97464506E-05, 5.86015079E-05,
     &   5.30235878E-05, 4.92621596E-05, 4.66488281E-05, 4.51283492E-05,
     &   4.40112097E-05, 4.30897413E-05, 4.21473065E-05, 4.14102198E-05,
     &   4.06622239E-05, 4.03522586E-05, 4.04645580E-05, 4.06295625E-05,
     &   4.10834441E-05, 4.13386044E-05, 4.19761310E-05, 4.26067458E-05,
     &   4.37075309E-05, 4.49311070E-05, 4.68079195E-05, 4.86249034E-05,
     &   5.07115482E-05, 5.31173266E-05, 5.44570347E-05, 5.51897319E-05,
     &   5.71232662E-05, 5.73222148E-05, 5.69224781E-05, 5.81470475E-05,
     &   6.01995812E-05, 6.26739815E-05, 6.48667002E-05, 6.79786017E-05/
  
         DATA ((DAS  (I,J), I= 201, 300), J=3,3) /
     &   7.14688162E-05, 7.40823813E-05, 7.51394470E-05, 7.62593734E-05,
     &   7.74459102E-05, 7.87048990E-05, 8.00394359E-05, 8.14607583E-05,
     &   8.29731745E-05, 8.45762998E-05, 8.62641116E-05, 8.80309970E-05,
     &   8.98668694E-05, 9.17721750E-05, 9.37374009E-05, 9.57860055E-05,
     &   9.79458066E-05, 1.00170353E-04, 1.02488361E-04, 1.04927169E-04,
     &   1.07516969E-04, 1.10292125E-04, 1.13300800E-04, 1.16597123E-04,
     &   1.20245618E-04, 1.24331984E-04, 1.28985532E-04, 1.34447067E-04,
     &   1.41328444E-04, 1.52452808E-04, 1.65518466E-04, 1.85198180E-04,
     &   1.60528066E-04, 1.58283067E-04, 1.61456834E-04, 1.66072193E-04,
     &   1.71806284E-04, 1.78230525E-04, 1.85989831E-04, 1.93447655E-04,
     &   2.02340840E-04, 2.12211898E-04, 2.21270503E-04, 2.35208348E-04,
     &   2.49146194E-04, 2.64579393E-04, 2.82039314E-04, 3.01904906E-04,
     &   3.24642319E-04, 3.50821558E-04, 3.81101318E-04, 4.16276160E-04,
     &   4.57028814E-04, 4.96541557E-04, 5.18138399E-04, 5.32839866E-04,
     &   5.53172039E-04, 5.62983762E-04, 5.57046862E-04, 5.93225439E-04,
     &   6.07685640E-04, 6.20841895E-04, 6.32491469E-04, 6.41734887E-04,
     &   6.47554899E-04, 6.48672677E-04, 6.38427467E-04, 6.20101021E-04,
     &   6.07061030E-04, 5.71520348E-04, 5.21697705E-04, 4.56071463E-04,
     &   3.48975057E-04, 2.77953166E-04, 1.71415494E-04, 7.26028105E-05,
     &   9.83345729E-05, 2.04071795E-04, 3.08112587E-04, 4.00133119E-04,
     &   4.76868583E-04, 5.37684038E-04, 5.82952756E-04, 6.14682446E-04,
     &   6.34922941E-04, 6.45747931E-04, 6.49160988E-04, 6.46879064E-04,
     &   6.40343441E-04, 6.30731764E-04, 6.12717597E-04, 6.07650622E-04,
     &   5.82127399E-04, 5.75793389E-04, 5.62124443E-04, 5.47290117E-04,
     &   5.32679374E-04, 5.18332176E-04, 5.04340141E-04, 4.90767682E-04/
  
         DATA ((DAS  (I,J), I= 301, 400), J=3,3) /
     &   4.88940495E-04, 4.65033537E-04, 4.52896290E-04, 4.41239409E-04,
     &   4.04045060E-04, 3.71980754E-04, 3.44336461E-04, 3.20413948E-04,
     &   2.99607947E-04, 2.77317781E-04, 2.65435265E-04, 2.51329249E-04,
     &   2.38832747E-04, 2.27731246E-04, 2.17854339E-04, 2.09070390E-04,
     &   2.01285077E-04, 1.94410142E-04, 1.88392117E-04, 1.83226592E-04,
     &   1.81641883E-04, 1.78419697E-04, 1.81508683E-04, 1.78521129E-04,
     &   1.92965277E-04, 2.66534305E-04, 2.53442374E-04, 1.72842947E-04,
     &   1.54196164E-04, 1.42978017E-04, 1.35561935E-04, 1.29905647E-04,
     &   1.25532166E-04, 1.21942863E-04, 1.18901853E-04, 1.15955483E-04,
     &   1.13911165E-04, 1.11788112E-04, 1.09833026E-04, 1.08020760E-04,
     &   1.06308865E-04, 1.04641708E-04, 1.02983992E-04, 1.01431074E-04,
     &   9.99755526E-05, 9.86056450E-05, 9.73138920E-05, 9.61452449E-05,
     &   9.49690611E-05, 9.38580316E-05, 9.27902769E-05, 9.17909255E-05,
     &   9.07788553E-05, 8.98323854E-05, 8.89347956E-05, 8.80321132E-05,
     &   8.57164943E-05, 8.01308755E-05, 7.25901115E-05, 6.88932842E-05,
     &   6.74357749E-05, 6.71548157E-05, 6.78061293E-05, 6.92725423E-05,
     &   7.15833667E-05, 7.18692983E-05, 7.66236010E-05, 8.01449905E-05,
     &   8.13343649E-05, 8.45683092E-05, 8.84855634E-05, 8.88923111E-05,
     &   9.25516348E-05, 9.51514683E-05, 9.59357407E-05, 9.66024112E-05,
     &   9.86025041E-05, 1.01743786E-04, 1.05622995E-04, 1.09746877E-04,
     &   1.12360471E-04, 1.14208918E-04, 1.19280256E-04, 1.25032313E-04,
     &   1.25650005E-04, 1.31513047E-04, 1.38805754E-04, 1.42745560E-04,
     &   1.46849320E-04, 1.56189407E-04, 1.67201533E-04, 1.80433692E-04,
     &   1.84898323E-04, 1.95847293E-04, 2.04248958E-04, 2.13490322E-04,
     &   2.35973857E-04, 2.66564381E-04, 2.70552469E-04, 3.07737274E-04/
  
         DATA ((DAS  (I,J), I= 401, 500), J=3,3) /
     &   3.77916595E-04, 3.92684492E-04, 3.46636321E-04, 3.09076908E-04,
     &   2.97048283E-04, 2.59383253E-04, 2.47892108E-04, 2.41758934E-04,
     &   2.34383127E-04, 2.21177375E-04, 2.08102440E-04, 1.96036452E-04,
     &   1.94744224E-04, 1.83950972E-04, 1.82836582E-04, 1.77236866E-04,
     &   1.72688147E-04, 1.57287937E-04, 1.54705707E-04, 1.37470925E-04,
     &   1.36136134E-04, 1.34808310E-04, 1.22071126E-04, 1.11552518E-04,
     &   1.09779857E-04, 1.00151823E-04, 9.93873081E-05, 9.58362065E-05,
     &   9.51646043E-05, 9.12433154E-05, 8.90980142E-05, 8.27668991E-05,
     &   8.20974925E-05, 7.58377401E-05, 7.18991966E-05, 7.08329355E-05,
     &   7.07293453E-05, 7.24911541E-05, 7.31589849E-05, 7.72904079E-05,
     &   8.06545399E-05, 8.22705857E-05, 8.33769166E-05, 8.39324170E-05,
     &   8.98196679E-05, 9.12408376E-05, 9.59659715E-05, 1.01284405E-04,
     &   1.04201275E-04, 1.16237629E-04, 1.32204347E-04, 1.35633177E-04,
     &   1.37421355E-04, 1.49023883E-04, 1.55237810E-04, 1.61655358E-04,
     &   1.88944600E-04, 1.92843994E-04, 2.03697737E-04, 2.10246902E-04,
     &   2.18562431E-04, 2.19811999E-04, 2.23300866E-04, 2.25528858E-04,
     &   2.27747204E-04, 2.33190525E-04, 2.39410591E-04, 2.46596005E-04,
     &   2.60008549E-04, 2.75707110E-04, 2.77590529E-04, 3.04178674E-04,
     &   3.25128651E-04, 3.49979589E-04, 3.55124485E-04, 3.87917879E-04,
     &   3.88360926E-04, 3.89731089E-04, 3.93594537E-04, 3.62884541E-04,
     &   3.54687916E-04, 3.12908968E-04, 2.99805158E-04, 2.91877799E-04,
     &   2.74479600E-04, 2.60661669E-04, 2.58777090E-04, 2.58219132E-04,
     &   2.58792958E-04, 2.59209716E-04, 2.60721042E-04, 2.61102139E-04,
     &   2.62815898E-04, 2.65239640E-04, 2.67966847E-04, 2.69113599E-04,
     &   2.79880339E-04, 2.83315560E-04, 2.83912037E-04, 2.24670336E-04/
  
         DATA ((DAS  (I,J), I= 501, 600), J=3,3) /
     &   1.93536584E-04, 1.79211022E-04, 1.59223861E-04, 1.52785875E-04,
     &   1.47820960E-04, 1.40054139E-04, 1.39110706E-04, 1.38740483E-04,
     &   1.39513126E-04, 1.42183440E-04, 1.46963531E-04, 1.54427850E-04,
     &   1.65804900E-04, 1.83174554E-04, 2.09828447E-04, 2.52366262E-04,
     &   2.63795548E-04, 2.76672432E-04, 2.91270679E-04, 3.07904207E-04,
     &   3.26984246E-04, 3.49046683E-04, 3.74799216E-04, 3.80470869E-04,
     &   3.86336117E-04, 3.92404609E-04, 3.98686646E-04, 4.05193237E-04,
     &   4.11936158E-04, 4.18927987E-04, 4.26182349E-04, 4.33713660E-04,
     &   4.41537560E-04, 4.80916775E-04, 5.11538398E-04, 5.28445718E-04,
     &   5.40384587E-04, 5.52904933E-04, 5.66044247E-04, 5.79848516E-04,
     &   5.94368390E-04, 6.09659794E-04, 6.17613884E-04, 6.25784568E-04,
     &   6.34180649E-04, 6.42811438E-04, 6.51686689E-04, 6.60816861E-04,
     &   6.70212998E-04, 6.79886688E-04, 6.89850203E-04, 7.00116550E-04,
     &   7.10699524E-04, 7.21613772E-04, 7.32874856E-04, 7.44499329E-04,
     &   7.56504812E-04, 7.68910086E-04, 7.81735184E-04, 7.95001590E-04,
     &   8.08731904E-04, 8.22950878E-04, 8.37684652E-04, 8.52961368E-04,
     &   8.68811257E-04, 8.85266835E-04, 9.02363121E-04, 9.20137955E-04,
     &   9.38632188E-04, 9.57889942E-04, 9.77959025E-04, 9.98891323E-04,
     &   1.02074325E-03, 1.04357624E-03, 1.06745733E-03, 1.09245980E-03,
     &   1.11866394E-03, 1.14615787E-03, 1.17503857E-03, 1.20541295E-03,
     &   1.23739925E-03, 1.27112848E-03, 1.28869158E-03, 1.30674626E-03,
     &   1.32531337E-03, 1.34441490E-03, 1.36407417E-03, 1.38431585E-03,
     &   1.40516608E-03, 1.42665259E-03, 1.44880485E-03, 1.47165415E-03,
     &   1.49523376E-03, 1.51957913E-03, 1.54472804E-03, 1.57072078E-03,
     &   1.59760038E-03, 1.62541286E-03, 1.65420746E-03, 1.68403698E-03/
  
         DATA ((DAS  (I,J), I= 601, 700), J=3,3) /
     &   1.71495803E-03, 1.74703145E-03, 1.78032270E-03, 1.81490225E-03,
     &   1.85084617E-03, 1.88823659E-03, 1.92716238E-03, 1.96771985E-03,
     &   2.01001355E-03, 2.05415711E-03, 2.10027434E-03, 2.14850033E-03,
     &   2.19898279E-03, 2.25188356E-03, 2.30738032E-03, 2.36566860E-03,
     &   2.42696407E-03, 2.49150521E-03, 2.55955638E-03, 2.63141147E-03,
     &   2.73903023E-03, 2.78788266E-03, 2.87327611E-03, 2.96404112E-03,
     &   3.06070033E-03, 3.16384648E-03, 3.27415456E-03, 3.39239652E-03,
     &   3.51945942E-03, 3.65636765E-03, 3.80431062E-03, 3.96467733E-03,
     &   4.13910012E-03, 4.27834460E-03, 4.71215041E-03, 5.24343568E-03,
     &   5.90919422E-03, 6.76784854E-03, 7.91739201E-03, 9.53571741E-03,
     &   1.19828850E-02, 1.61144627E-02, 2.45802269E-02, 5.16852283E-02,
     &   5.46540129E-02, 5.79832864E-02, 6.17426888E-02, 6.60209483E-02,
     &   7.09328645E-02, 7.66295804E-02, 8.33140828E-02, 9.12652953E-02,
     &   1.00876804E-01, 1.12721558E-01, 1.27664918E-01, 1.47072542E-01,
     &   1.73215333E-01, 1.76332235E-01, 2.46123668E-01, 2.96992530E-01,
     &   3.37862725E-01, 3.73407264E-01, 4.00797176E-01, 4.24729024E-01,
     &   4.43908733E-01, 4.63015971E-01, 4.76141510E-01, 4.88294674E-01,
     &   4.96870384E-01, 5.03940091E-01, 5.07912918E-01, 5.10878371E-01,
     &   5.11130536E-01, 5.09638087E-01, 5.05499287E-01, 5.01026222E-01,
     &   4.91350922E-01, 4.82681932E-01, 4.72040829E-01, 4.59260233E-01,
     &   4.44179579E-01, 4.26651200E-01, 4.06547422E-01, 3.83768485E-01,
     &   3.58251038E-01, 3.29976754E-01, 2.98980511E-01, 2.47608305E-01,
     &   2.10366982E-01, 1.50669737E-01, 8.74174679E-02, 8.73571491E-02,
     &   2.47555485E-01, 2.98931936E-01, 3.44413819E-01, 3.71313875E-01,
     &   4.06512073E-01, 4.26619317E-01, 4.44151141E-01, 4.59235192E-01/
  
         DATA ((DAS  (I,J), I= 701, 800), J=3,3) /
     &   4.72019109E-01, 4.82663438E-01, 4.91335544E-01, 4.98204579E-01,
     &   5.03437474E-01, 5.07195873E-01, 5.09633909E-01, 5.11130014E-01,
     &   5.10880124E-01, 5.08933164E-01, 5.05415543E-01, 5.02352739E-01,
     &   4.94860923E-01, 4.88309872E-01, 4.78686422E-01, 4.68368258E-01,
     &   4.54906332E-01, 4.41182650E-01, 4.22045637E-01, 4.03426861E-01,
     &   3.80679201E-01, 3.55023524E-01, 3.22024195E-01, 2.84194972E-01,
     &   2.36959369E-01, 1.95261070E-01, 1.62870851E-01, 1.39499131E-01,
     &   1.21901293E-01, 1.08198840E-01, 9.72394406E-02, 8.82806053E-02,
     &   8.08238009E-02, 7.45224952E-02, 6.91286320E-02, 6.44601243E-02,
     &   6.03803744E-02, 5.67849502E-02, 5.35926710E-02, 5.07394942E-02,
     &   4.81742299E-02, 4.58554772E-02, 4.37493956E-02, 2.29410714E-02,
     &   1.55486491E-02, 1.17618792E-02, 9.46021769E-03, 7.91332383E-03,
     &   6.80227912E-03, 5.96565169E-03, 5.31296946E-03, 4.78959199E-03,
     &   4.36056992E-03, 4.30976000E-03, 3.95548501E-03, 3.65540031E-03,
     &   3.39796381E-03, 3.17469399E-03, 2.97921855E-03, 2.80665711E-03,
     &   2.65320876E-03, 2.51586922E-03, 2.39223256E-03, 2.28034927E-03,
     &   2.17862294E-03, 2.08573380E-03, 2.00058127E-03, 1.92224027E-03,
     &   1.84992755E-03, 1.78297556E-03, 1.72081191E-03, 1.66294286E-03,
     &   1.60894018E-03, 1.55843105E-03, 1.51108892E-03, 1.46662685E-03,
     &   1.42479141E-03, 1.38535822E-03, 1.34812771E-03, 1.31292186E-03,
     &   1.27958136E-03, 1.24796318E-03, 1.21793858E-03, 1.18939138E-03,
     &   1.16221642E-03, 1.13631831E-03, 1.11161035E-03, 1.08801349E-03,
     &   1.06545559E-03, 1.04387035E-03, 1.02319806E-03, 1.00338233E-03,
     &   9.84372282E-04, 9.66120618E-04, 9.48584212E-04, 9.31722650E-04,
     &   9.15498699E-04, 8.99877841E-04, 8.84828028E-04, 8.70319466E-04/
  
         DATA ((DAS  (I,J), I= 801, 900), J=3,3) /
     &   8.56324397E-04, 8.42817006E-04, 8.29773188E-04, 8.17170553E-04,
     &   8.04987828E-04, 7.93205407E-04, 7.81804834E-04, 7.70768806E-04,
     &   7.60081087E-04, 7.49726431E-04, 7.39690510E-04, 7.29959851E-04,
     &   7.20521333E-04, 7.11364366E-04, 7.02476374E-04, 6.93847224E-04,
     &   6.85466947E-04, 6.77326157E-04, 6.69416014E-04, 6.61728198E-04,
     &   6.54254132E-04, 6.46987936E-04, 6.39922008E-04, 6.33049906E-04,
     &   6.26365627E-04, 6.19863605E-04, 6.13538711E-04, 6.07386268E-04,
     &   6.01402065E-04, 5.95582393E-04, 5.89924087E-04, 5.84424602E-04,
     &   5.79082103E-04, 5.73895614E-04, 5.68865221E-04, 5.63992378E-04,
     &   5.59280384E-04, 5.54327969E-04, 5.49486563E-04, 5.44752756E-04,
     &   5.40123282E-04, 5.35595002E-04, 5.31164907E-04, 5.26829895E-04,
     &   5.22587826E-04, 5.18846671E-04, 5.14197740E-04, 5.10216346E-04,
     &   5.06317435E-04, 5.02498894E-04, 4.98758172E-04, 4.95093328E-04,
     &   4.91502320E-04, 4.87982671E-04, 4.84534011E-04, 4.81152982E-04,
     &   3.79827692E-04, 3.22202200E-04, 3.00761874E-04, 3.35822566E-04,
     &   3.99455854E-04, 4.39780230E-04, 4.93301290E-04, 5.66009338E-04,
     &   6.39255066E-04, 7.37045393E-04, 7.77404557E-04, 8.70954045E-04,
     &   9.27182597E-04, 9.91558254E-04, 1.06509809E-03, 1.15140799E-03,
     &   1.25362450E-03, 1.37627967E-03, 1.52594226E-03, 1.71241573E-03,
     &   1.95095938E-03, 2.06608185E-03, 2.19561982E-03, 2.34244618E-03,
     &   2.51025211E-03, 2.70386063E-03, 2.92969624E-03, 3.05731548E-03,
     &   3.19650995E-03, 3.34892577E-03, 3.51653674E-03, 3.70173013E-03,
     &   3.90742093E-03, 4.13720616E-03, 4.39557674E-03, 4.68821349E-03,
     &   5.02240916E-03, 5.40768375E-03, 5.85670472E-03, 6.36367657E-03,
     &   6.69557811E-03, 7.06387050E-03, 7.47488163E-03, 7.93649629E-03/
  
         DATA ((DAS  (I,J), I= 901,1000), J=3,3) /
     &   8.45866625E-03, 9.05413481E-03, 9.73948890E-03, 1.05367256E-02,
     &   1.14756525E-02, 1.25976886E-02, 1.39621234E-02, 1.56569074E-02,
     &   1.78183221E-02, 2.06693887E-02, 2.46017024E-02, 3.03709486E-02,
     &   3.96439760E-02, 5.69325505E-02, 8.41241332E-02, 9.96004852E-02,
     &   1.16481269E-01, 1.58015877E-01, 1.72979804E-01, 1.85329860E-01,
     &   1.95817921E-01, 2.04649465E-01, 2.11895294E-01, 2.18134336E-01,
     &   2.23242898E-01, 2.26899101E-01, 2.30005201E-01, 2.32204043E-01,
     &   2.33508219E-01, 2.33979248E-01, 2.33644755E-01, 2.32730758E-01,
     &   2.30875822E-01, 2.28448548E-01, 2.25176716E-01, 2.20967093E-01,
     &   2.16540643E-01, 2.10338887E-01, 2.04068779E-01, 1.96862188E-01,
     &   1.88672862E-01, 1.77826855E-01, 1.67393746E-01, 1.53881073E-01,
     &   1.41158107E-01, 1.22608636E-01, 1.02364770E-01, 7.21292530E-02,
     &   4.57739083E-02, 1.54168102E-02, 1.99234527E-04, 1.53398200E-02,
     &   3.06171479E-02, 7.20562708E-02, 1.02296233E-01, 1.22544109E-01,
     &   1.41098102E-01, 1.53824714E-01, 1.67341840E-01, 1.77778878E-01,
     &   1.88629535E-01, 1.96822859E-01, 2.04033421E-01, 2.10307443E-01,
     &   2.16513664E-01, 2.20943830E-01, 2.25157641E-01, 2.28433486E-01,
     &   2.30864589E-01, 2.32723667E-01, 2.33641083E-01, 2.33979695E-01,
     &   2.33512482E-01, 2.32212208E-01, 2.30017275E-01, 2.26915017E-01,
     &   2.23262258E-01, 2.18157506E-01, 2.11922202E-01, 2.04679939E-01,
     &   1.95851998E-01, 1.85367493E-01, 1.73020910E-01, 1.58060442E-01,
     &   1.39923618E-01, 1.49770258E-01, 1.28119781E-01, 1.14784417E-01,
     &   1.06722296E-01, 9.00212863E-02, 8.41787606E-02, 7.16017433E-02,
     &   4.63624356E-02, 3.42078977E-02, 2.70877733E-02, 2.24171255E-02,
     &   1.91193356E-02, 1.66673688E-02, 1.47731092E-02, 1.32658574E-02/
  
         DATA ((DAS  (I,J), I=1001,1100), J=3,3) /
     &   1.20380848E-02, 1.10187011E-02, 1.01588318E-02, 9.42377210E-03,
     &   8.78820097E-03, 8.23321039E-03, 7.74439836E-03, 7.31059993E-03,
     &   6.92302859E-03, 6.57467279E-03, 6.02400920E-03, 5.33665440E-03,
     &   4.96903577E-03, 4.36832933E-03, 3.89830354E-03, 3.43745946E-03,
     &   2.78311080E-03, 2.06324520E-03, 1.63743093E-03, 1.46025990E-03,
     &   1.36099013E-03, 1.29661032E-03, 1.25105402E-03, 1.21680298E-03,
     &   1.18991214E-03, 1.16807887E-03, 1.14986224E-03, 1.13429074E-03,
     &   1.12075780E-03, 1.10876446E-03, 1.09797507E-03, 1.08815710E-03,
     &   1.07909289E-03, 1.07062841E-03, 1.06263407E-03, 1.05502716E-03,
     &   1.04769397E-03, 1.04057503E-03, 1.03360167E-03, 1.02672059E-03,
     &   1.01985312E-03, 1.01296018E-03, 1.00596174E-03, 9.98817730E-04,
     &   9.91430208E-04, 9.83711810E-04, 9.75511505E-04, 9.66672762E-04,
     &   9.56878272E-04, 9.45549823E-04, 9.31247553E-04, 8.99063468E-04,
     &   8.71600756E-04, 8.62248681E-04, 8.56075713E-04, 8.51622106E-04,
     &   8.48291621E-04, 8.45775464E-04, 8.43862726E-04, 8.42403921E-04,
     &   8.41293109E-04, 8.40392052E-04, 8.39682610E-04, 8.39030969E-04,
     &   8.38356627E-04, 8.37599992E-04, 8.36731895E-04, 8.35829694E-04,
     &   8.34647447E-04, 8.33036291E-04, 8.30935849E-04, 8.28265184E-04,
     &   8.24927034E-04, 8.20808732E-04, 8.15792476E-04, 8.09743695E-04,
     &   8.02482299E-04, 7.93630298E-04, 7.83534155E-04, 7.71267796E-04,
     &   7.56645595E-04, 7.39090567E-04, 7.17703729E-04, 6.91037762E-04,
     &   6.56311054E-04, 6.07571428E-04, 5.93054518E-04, 5.53924689E-04,
     &   4.97148175E-04, 4.91609577E-04, 4.54750872E-04, 4.41736088E-04,
     &   4.31651908E-04, 4.20991476E-04, 4.10898387E-04, 4.00743557E-04,
     &   3.94188800E-04, 3.90964947E-04, 3.81913279E-04, 3.73472752E-04/
  
         DATA ((DAS  (I,J), I=1101,1200), J=3,3) /
     &   3.65565824E-04, 3.58184019E-04, 3.51484201E-04, 3.44898304E-04,
     &   3.38577314E-04, 3.34359218E-04, 3.28310420E-04, 3.21130940E-04,
     &   3.13951461E-04, 3.06771981E-04, 3.03135229E-04, 2.99019154E-04,
     &   2.94117045E-04, 2.90308999E-04, 2.89676661E-04, 2.87897720E-04,
     &   2.81832126E-04, 2.76066425E-04, 2.74526887E-04, 2.74462044E-04,
     &   2.73931349E-04, 2.72325754E-04, 2.69337606E-04, 2.69573917E-04,
     &   2.73403964E-04, 2.82209553E-04, 2.88643433E-04, 2.76555501E-04,
     &   2.49085765E-04, 2.45267297E-04, 2.43237022E-04, 2.42778164E-04,
     &   2.39611930E-04, 2.37483352E-04, 2.35044704E-04, 2.33076739E-04,
     &   2.31539420E-04, 2.29936240E-04, 2.29422528E-04, 2.28097497E-04,
     &   2.26264295E-04, 2.25296250E-04, 2.24077602E-04, 2.23081943E-04,
     &   2.22985812E-04, 2.22514590E-04, 2.21602284E-04, 2.19138039E-04,
     &   2.16970957E-04, 2.16143296E-04, 2.15459078E-04, 2.14779499E-04,
     &   2.15794411E-04, 2.19002496E-04, 2.19082056E-04, 2.16656185E-04,
     &   2.14610367E-04, 2.12158160E-04, 2.07965464E-04, 2.04274064E-04,
     &   2.02196561E-04, 2.02265457E-04, 2.01078760E-04, 1.99157982E-04,
     &   1.98869783E-04, 1.97317443E-04, 1.97334673E-04, 1.94697532E-04,
     &   1.93391914E-04, 1.93243608E-04, 1.93008330E-04, 1.91225138E-04,
     &   1.90347828E-04, 1.88956688E-04, 1.87324654E-04, 1.86223443E-04,
     &   1.85150337E-04, 1.83329812E-04, 1.83393299E-04, 1.84424707E-04,
     &   1.88606791E-04, 1.90841382E-04, 1.77267408E-04, 1.76861222E-04,
     &   1.76137569E-04, 1.74206085E-04, 1.74552813E-04, 1.78442608E-04,
     &   1.76992491E-04, 1.75808567E-04, 1.74941478E-04, 1.68758286E-04,
     &   1.71509622E-04, 1.88073193E-04, 1.83638084E-04, 1.71587439E-04,
     &   1.68998170E-04, 1.68045534E-04, 1.66594972E-04, 1.66107510E-04/
  
         DATA ((DAS  (I,J), I=1201,1300), J=3,3) /
     &   1.65469133E-04, 1.64496710E-04, 1.63360086E-04, 1.62811055E-04,
     &   1.61888513E-04, 1.61677547E-04, 1.60467239E-04, 1.59287363E-04,
     &   1.58138863E-04, 1.56884391E-04, 1.56561276E-04, 1.55599022E-04,
     &   1.57379098E-04, 1.53012086E-04, 1.48576068E-04, 1.46819085E-04,
     &   1.44798421E-04, 1.44413073E-04, 1.42682819E-04, 1.41632811E-04,
     &   1.36358682E-04, 1.36172236E-04, 1.31707606E-04, 1.26963938E-04,
     &   1.82882416E-04, 2.32222250E-04, 2.48668862E-04, 2.09550483E-04,
     &   1.76073570E-04, 1.66787281E-04, 1.59754705E-04, 1.49643737E-04,
     &   1.42589192E-04, 1.39773824E-04, 1.37302569E-04, 1.35110330E-04,
     &   1.33148192E-04, 1.31378601E-04, 1.29767781E-04, 1.28300977E-04,
     &   1.26955197E-04, 1.25715078E-04, 1.24567938E-04, 1.23503205E-04,
     &   1.22511985E-04, 1.21586737E-04, 1.20721022E-04, 1.19909302E-04,
     &   1.19146790E-04, 1.18429328E-04, 1.17753282E-04, 1.17115468E-04,
     &   1.16513085E-04, 1.15943662E-04, 1.15405012E-04, 1.14895200E-04,
     &   1.14412507E-04, 1.13955411E-04, 1.13522559E-04, 1.13112756E-04,
     &   1.12724946E-04, 1.12358199E-04, 1.12011705E-04, 1.11684762E-04,
     &   1.11376771E-04, 1.11087230E-04, 1.10815730E-04, 1.10611304E-04,
     &   1.10325676E-04, 1.09905149E-04, 1.09554160E-04, 1.09274303E-04,
     &   1.09068976E-04, 1.08943744E-04, 1.08906918E-04, 1.08970435E-04,
     &   1.09151249E-04, 1.09473552E-04, 1.09972482E-04, 1.10701681E-04,
     &   1.11740313E-04, 1.13225214E-04, 1.15398128E-04, 1.15668381E-04,
     &   1.18738912E-04, 1.24351395E-04, 1.35389785E-04, 1.55676959E-04,
     &   1.64702413E-04, 2.05084977E-04, 2.87467672E-04, 3.27169021E-04,
     &   3.83850769E-04, 4.22115804E-04, 4.70306545E-04, 5.18776795E-04,
     &   5.79624852E-04, 6.16226808E-04, 6.58114151E-04, 7.06494700E-04/
  
         DATA ((DAS  (I,J), I=1301,1400), J=3,3) /
     &   7.62973917E-04, 8.29733227E-04, 9.09813744E-04, 9.56144491E-04,
     &   1.00758604E-03, 1.06502505E-03, 1.12956577E-03, 1.20260114E-03,
     &   1.28591371E-03, 1.38182216E-03, 1.49339919E-03, 1.62480516E-03,
     &   1.67954085E-03, 1.71388487E-03, 1.74967369E-03, 1.78700018E-03,
     &   1.82596531E-03, 1.86667911E-03, 1.90926168E-03, 1.95384439E-03,
     &   2.00057118E-03, 2.04960017E-03, 2.10110542E-03, 2.15527898E-03,
     &   2.21233328E-03, 2.27250393E-03, 2.33605292E-03, 2.40327250E-03,
     &   2.47448958E-03, 2.55007111E-03, 2.63043034E-03, 2.71603443E-03,
     &   2.80741345E-03, 2.90517142E-03, 3.00999960E-03, 3.12269289E-03,
     &   3.24416999E-03, 3.37549846E-03, 3.51792615E-03, 3.67292095E-03,
     &   3.84222152E-03, 4.02790273E-03, 4.23246106E-03, 4.45892739E-03,
     &   4.71101813E-03, 4.99334059E-03, 5.31167695E-03, 5.67338424E-03,
     &   6.08796964E-03, 6.56793773E-03, 7.13007284E-03, 7.79744090E-03,
     &   8.60263101E-03, 9.59323472E-03, 1.08415993E-02, 1.24633241E-02,
     &   1.46552447E-02, 1.77819422E-02, 2.26025592E-02, 3.10009854E-02,
     &   4.92764549E-02, 6.06074782E-02, 1.15438732E-01, 1.60624879E-01,
     &   1.93377937E-01, 2.18720824E-01, 2.39543104E-01, 2.57764885E-01,
     &   2.74672159E-01, 2.86442351E-01, 2.98423500E-01, 3.10206854E-01,
     &   3.15888161E-01, 3.23850402E-01, 3.28621284E-01, 3.34543210E-01,
     &   3.36086494E-01, 3.38369210E-01, 3.39317860E-01, 3.38602894E-01,
     &   3.37511966E-01, 3.35864967E-01, 3.30649228E-01, 3.26991647E-01,
     &   3.22496305E-01, 3.10914003E-01, 3.03723343E-01, 2.95505226E-01,
     &   2.86102498E-01, 2.64054953E-01, 2.51106715E-01, 2.37069660E-01,
     &   2.05162263E-01, 1.87499964E-01, 1.48631412E-01, 1.05840792E-01,
     &   1.13005291E-02, 1.04435370E-01, 1.47335786E-01, 1.86146672E-01/
  
         DATA ((DAS  (I,J), I=1401,1500), J=3,3) /
     &   2.20632755E-01, 2.36136687E-01, 2.50251277E-01, 2.63147826E-01,
     &   2.85473074E-01, 2.94853954E-01, 3.03232045E-01, 3.10486279E-01,
     &   3.22185013E-01, 3.26689867E-01, 3.30438742E-01, 3.35719143E-01,
     &   3.37424221E-01, 3.39165820E-01, 3.39322602E-01, 3.38421392E-01,
     &   3.36191221E-01, 3.32889911E-01, 3.28763634E-01, 3.24009965E-01,
     &   3.16065119E-01, 3.10421286E-01, 2.98614497E-01, 2.86664444E-01,
     &   2.74858572E-01, 2.57940359E-01, 2.39703241E-01, 2.18861204E-01,
     &   1.93493336E-01, 1.60709241E-01, 1.14820368E-01, 6.26678627E-02,
     &   3.58446810E-02, 2.50791479E-02, 1.92830122E-02, 1.56622065E-02,
     &   1.31860103E-02, 1.13858962E-02, 1.00182981E-02, 8.94408463E-03,
     &   8.07801214E-03, 7.36494109E-03, 6.76762624E-03, 6.26000292E-03,
     &   5.82328488E-03, 5.44358965E-03, 5.11043657E-03, 4.81576506E-03,
     &   4.55327417E-03, 4.31796736E-03, 4.10583152E-03, 3.91360643E-03,
     &   3.73861604E-03, 3.57864334E-03, 3.43183587E-03, 3.29663386E-03,
     &   3.17171455E-03, 3.05594882E-03, 2.94836707E-03, 2.84813194E-03,
     &   2.75451655E-03, 2.66688685E-03, 2.58468725E-03, 2.50742887E-03,
     &   2.43467981E-03, 2.36605707E-03, 2.30121983E-03, 2.23986380E-03,
     &   2.18171648E-03, 2.12653305E-03, 2.07409301E-03, 2.02419719E-03,
     &   1.97666524E-03, 1.93133348E-03, 1.88805299E-03, 1.84668799E-03,
     &   1.80711446E-03, 1.76921881E-03, 1.73289689E-03, 1.69805299E-03,
     &   1.66459901E-03, 1.41232492E-03, 1.25772948E-03, 1.10953678E-03,
     &   9.44147134E-04, 7.89558363E-04, 6.37317512E-04, 5.52264804E-04,
     &   4.39914166E-04, 4.01472896E-04, 3.70532550E-04, 3.43529571E-04,
     &   3.21155410E-04, 3.02307578E-04, 2.72387369E-04, 2.49833926E-04,
     &   1.90861655E-04, 1.59111339E-04, 1.61593316E-04, 2.07265168E-04/
  
         DATA ((DAS  (I,J), I=1501,1600), J=3,3) /
     &   3.00420312E-04, 4.31568549E-04, 6.11708680E-04, 8.65296361E-04,
     &   1.50785118E-03, 1.63015190E-03, 1.77425425E-03, 1.81602569E-03,
     &   1.91125639E-03, 2.01709540E-03, 2.13541475E-03, 2.26855454E-03,
     &   2.41947882E-03, 2.59199855E-03, 2.79109722E-03, 3.02341949E-03,
     &   3.29802613E-03, 3.62760213E-03, 4.03047000E-03, 4.53411299E-03,
     &   5.18171800E-03, 6.04526056E-03, 7.25428940E-03, 9.06787771E-03,
     &   1.20904233E-02, 1.81343789E-02, 2.62420179E-02, 2.76028799E-02,
     &   2.91125119E-02, 3.07967039E-02, 3.26875678E-02, 3.48256002E-02,
     &   3.72626067E-02, 4.00659419E-02, 4.33248086E-02, 4.71598838E-02,
     &   5.17385165E-02, 5.72996517E-02, 6.41965860E-02, 7.29743913E-02,
     &   8.45197357E-02, 1.00375977E-01, 1.23481150E-01, 1.60164268E-01,
     &   2.26735358E-01, 3.77337510E-01, 4.30131591E-01, 4.71684539E-01,
     &   5.17998925E-01, 5.56867814E-01, 5.84899264E-01, 6.08673222E-01,
     &   6.19627328E-01, 6.23976433E-01, 6.18506319E-01, 5.99123270E-01,
     &   5.76806613E-01, 5.72583738E-01, 5.70388354E-01, 5.65826647E-01,
     &   5.63937293E-01, 5.62495742E-01, 5.61033019E-01, 5.45213961E-01,
     &   5.17232908E-01, 4.79791908E-01, 4.40122500E-01, 3.89310018E-01,
     &   3.31573586E-01, 2.74097268E-01, 2.40133188E-01, 2.04885925E-01,
     &   1.68514835E-01, 1.16051526E-01, 7.77458505E-02, 3.89890086E-02,
     &   1.56112853E-02, 7.80941484E-03, 3.90854206E-03, 1.34306732E-04,
     &   3.90058335E-03, 7.80145312E-03, 3.89810626E-02, 7.77379567E-02,
     &   1.16043718E-01, 2.87285016E-01, 3.49592197E-01, 4.49428968E-01,
     &   4.87827220E-01, 5.23903114E-01, 5.53393995E-01, 5.74720088E-01,
     &   5.93160199E-01, 6.05525720E-01, 6.15141862E-01, 6.20569409E-01,
     &   6.23535702E-01, 6.23861611E-01, 6.22047343E-01, 6.18784529E-01/
  
         DATA ((DAS  (I,J), I=1601,1700), J=3,3) /
     &   6.07999701E-01, 6.00730826E-01, 5.92671773E-01, 5.84901571E-01,
     &   5.67409608E-01, 5.57836406E-01, 5.42288255E-01, 5.18002500E-01,
     &   4.30136116E-01, 3.62068685E-01, 3.10527969E-01, 2.70933830E-01,
     &   2.39855341E-01, 2.14938016E-01, 1.90058405E-01, 1.51213536E-01,
     &   1.40701656E-01, 1.31540068E-01, 1.23487024E-01, 1.11519287E-01,
     &   9.23053959E-02, 7.87162109E-02, 6.86040935E-02, 6.07888151E-02,
     &   5.45690235E-02, 4.95021086E-02, 4.52951130E-02, 4.17464807E-02,
     &   3.87130235E-02, 3.60902361E-02, 3.38000693E-02, 3.17830609E-02,
     &   2.99931175E-02, 2.83939586E-02, 2.69566388E-02, 1.81403497E-02,
     &   1.20963957E-02, 9.07385109E-03, 6.05123597E-03, 4.54009094E-03,
     &   3.63358326E-03, 3.02940446E-03, 2.59798805E-03, 2.27454926E-03,
     &   2.02309602E-03, 1.82203290E-03, 1.70802404E-03, 1.57506185E-03,
     &   1.46151962E-03, 1.36344486E-03, 1.27788951E-03, 1.20260992E-03,
     &   9.30717609E-04, 7.61348058E-04, 6.46045674E-04, 5.62731348E-04,
     &   4.99904865E-04, 4.50989087E-04, 4.11938091E-04, 3.80142335E-04,
     &   1.89859353E-04, 1.89213649E-04, 1.92120486E-04, 1.96599196E-04,
     &   2.03254103E-04, 2.13140202E-04, 2.19842930E-04, 2.28186120E-04,
     &   2.52211659E-04, 2.93698427E-04, 3.75149740E-04, 5.79227064E-04,
     &   7.83382978E-04, 8.36721533E-04, 8.98453872E-04, 9.70679129E-04,
     &   1.05626272E-03, 1.15921657E-03, 1.28533058E-03, 1.44329481E-03,
     &   1.64676600E-03, 1.91849441E-03, 2.29944172E-03, 2.87153385E-03,
     &   3.82588751E-03, 3.99193225E-03, 4.17306624E-03, 4.37148721E-03,
     &   4.58976630E-03, 4.83101103E-03, 5.09910551E-03, 5.39875799E-03,
     &   5.73584571E-03, 6.11793517E-03, 6.55462576E-03, 7.05845579E-03,
     &   7.64632869E-03, 8.34109296E-03, 9.17470356E-03, 1.01936305E-02/
  
         DATA ((DAS  (I,J), I=1701,1800), J=3,3) /
     &   1.05120230E-02, 1.14672110E-02, 1.31042916E-02, 1.52868658E-02,
     &   1.83414839E-02, 2.29206890E-02, 3.05421430E-02, 4.57362915E-02,
     &   9.06455176E-02, 1.07765710E-01, 1.52001129E-01, 1.85641283E-01,
     &   2.13359394E-01, 2.37552049E-01, 2.59015841E-01, 2.78270940E-01,
     &   2.95470507E-01, 3.11412740E-01, 3.26468262E-01, 3.40227342E-01,
     &   3.52330065E-01, 3.63525223E-01, 3.73618967E-01, 3.82459871E-01,
     &   3.90859417E-01, 3.97739673E-01, 4.03112468E-01, 4.07674121E-01,
     &   4.11185226E-01, 4.13360239E-01, 4.13907441E-01, 4.12982883E-01,
     &   4.10312896E-01, 4.05595117E-01, 3.98502137E-01, 3.90527960E-01,
     &   3.78177547E-01, 3.62466263E-01, 3.43074678E-01, 3.15448655E-01,
     &   2.82180394E-01, 2.37204419E-01, 1.78268213E-01, 2.44247554E-02,
     &   1.78003414E-04, 8.06961109E-02, 1.78265317E-01, 2.37201817E-01,
     &   2.82178097E-01, 3.15446644E-01, 3.43072960E-01, 3.62464796E-01,
     &   3.78176324E-01, 3.90526974E-01, 3.98501339E-01, 4.05594534E-01,
     &   4.10312515E-01, 4.12982690E-01, 4.13907425E-01, 4.13360385E-01,
     &   4.11185547E-01, 4.07674601E-01, 4.03113093E-01, 3.97740428E-01,
     &   3.90860309E-01, 3.82460898E-01, 3.73620115E-01, 3.63526490E-01,
     &   3.52331445E-01, 3.40228830E-01, 3.26469857E-01, 3.11414436E-01,
     &   2.95472299E-01, 2.78272822E-01, 2.59017811E-01, 2.37554104E-01,
     &   2.13361532E-01, 1.85643499E-01, 1.52003421E-01, 1.07768077E-01,
     &   9.22781294E-02, 8.93728520E-02, 8.57691472E-02, 7.58159584E-02,
     &   6.68458052E-02, 4.57362367E-02, 3.05445748E-02, 2.29224996E-02,
     &   1.83435206E-02, 1.52893037E-02, 1.31067308E-02, 1.14694952E-02,
     &   1.01960724E-02, 9.17714700E-03, 8.34345533E-03, 7.64877547E-03,
     &   7.06090444E-03, 6.55702537E-03, 6.12038796E-03, 5.73830078E-03/
  
         DATA ((DAS  (I,J), I=1801,1900), J=3,3) /
     &   3.82836588E-03, 2.87404471E-03, 2.30199427E-03, 1.92109782E-03,
     &   1.64942940E-03, 1.44602725E-03, 1.28814106E-03, 1.05925599E-03,
     &   9.01664952E-04, 8.40054417E-04, 7.86846124E-04, 5.97788157E-04,
     &   4.63711738E-04, 3.87296278E-04, 3.39376666E-04, 3.07569762E-04,
     &   2.85679451E-04, 2.70229394E-04, 2.59186000E-04, 2.51271963E-04,
     &   2.45563000E-04, 2.41432745E-04, 2.38516154E-04, 2.36554405E-04,
     &   2.35363294E-04, 2.34811818E-04, 2.34807857E-04, 2.35288612E-04,
     &   2.36214299E-04, 2.37564305E-04, 2.39334095E-04, 2.41531425E-04,
     &   2.48030640E-04, 3.69284316E-04, 3.97880859E-04, 4.51446738E-04,
     &   4.96048621E-04, 5.33819173E-04, 5.66098213E-04, 5.93830067E-04,
     &   6.17561819E-04, 6.37599673E-04, 6.54460516E-04, 6.68391224E-04,
     &   6.79468844E-04, 6.87855117E-04, 6.93729338E-04, 6.97213943E-04,
     &   6.98298560E-04, 6.97078185E-04, 6.93588348E-04, 6.87728349E-04,
     &   6.79629006E-04, 6.69452897E-04, 6.56540064E-04, 6.41727095E-04,
     &   6.24098728E-04, 6.03980261E-04, 5.80891484E-04, 5.54763144E-04,
     &   5.25595262E-04, 4.93480755E-04, 4.56169327E-04, 4.14471581E-04,
     &   3.68089871E-04, 3.14123517E-04, 2.53635739E-04, 2.21154878E-04,
     &   3.51744902E-04, 4.17814801E-04, 4.68169253E-04, 5.08153904E-04,
     &   5.42214801E-04, 5.71389810E-04, 5.95561553E-04, 6.16742785E-04,
     &   6.35037019E-04, 6.50587805E-04, 6.63565540E-04, 6.74371383E-04,
     &   6.82889294E-04, 6.89689275E-04, 6.94373512E-04, 6.97298888E-04,
     &   6.98384585E-04, 6.97632353E-04, 6.95092314E-04, 6.90659470E-04,
     &   6.84305060E-04, 6.76076204E-04, 6.65820533E-04, 6.52689980E-04,
     &   6.37954582E-04, 6.21468444E-04, 6.01416942E-04, 5.78339753E-04,
     &   5.51780985E-04, 5.21191612E-04, 4.85630988E-04, 4.43757049E-04/
  
         DATA ((DAS  (I,J), I=1901,2000), J=3,3) /
     &   3.93419860E-04, 3.30511433E-04, 2.48263978E-04, 2.43855503E-04,
     &   2.35177935E-04, 2.32024451E-04, 2.30959101E-04, 2.30851377E-04,
     &   2.31214682E-04, 2.31801847E-04, 2.32471276E-04, 2.33138261E-04,
     &   2.33745065E-04, 2.34255279E-04, 2.34639760E-04, 2.34879029E-04,
     &   2.34958092E-04, 2.34864174E-04, 2.34587255E-04, 2.34118805E-04,
     &   2.33449598E-04, 2.32575087E-04, 2.31479315E-04, 2.30165390E-04,
     &   2.28618187E-04, 2.26830720E-04, 2.24796372E-04, 2.22497940E-04,
     &   2.19925831E-04, 2.17071739E-04, 2.13915075E-04, 2.10418988E-04,
     &   2.06598180E-04, 2.02378370E-04, 1.97753042E-04, 1.92650585E-04,
     &   1.86976544E-04, 1.80574614E-04, 1.71964098E-04, 1.74242015E-04,
     &   1.77725549E-04, 1.81187777E-04, 1.84521315E-04, 1.87693780E-04,
     &   1.90706011E-04, 1.93534630E-04, 1.96182209E-04, 1.98664249E-04,
     &   2.00962046E-04, 2.03089744E-04, 2.05050171E-04, 2.06837367E-04,
     &   2.08467458E-04, 2.09943861E-04, 2.11247638E-04, 2.12400480E-04,
     &   2.13404347E-04, 2.14247088E-04, 2.14942267E-04, 2.15485086E-04,
     &   2.15882595E-04, 2.16130247E-04, 2.16232429E-04, 2.16189576E-04,
     &   2.16002776E-04, 2.15673875E-04, 2.15203678E-04, 2.14595276E-04,
     &   2.13851111E-04, 2.12975100E-04, 2.11970257E-04, 2.10845079E-04,
     &   2.09601252E-04, 2.08249431E-04, 1.99426750E-04, 1.98798238E-04,
     &   1.98152850E-04, 1.97484099E-04, 1.96790457E-04, 1.96070990E-04,
     &   1.95325400E-04, 1.94546986E-04, 1.93727739E-04, 1.92874386E-04,
     &   1.91978739E-04, 1.91040245E-04, 1.90058821E-04, 1.89034871E-04,
     &   1.87958220E-04, 1.86828348E-04, 1.85657609E-04, 1.84422329E-04,
     &   1.83121505E-04, 1.81769138E-04, 1.80337292E-04, 1.78856475E-04,
     &   1.77297700E-04, 1.75661927E-04, 1.73899346E-04, 1.72098684E-04/
  
         DATA ((DAS  (I,J), I=2001,2100), J=3,3) /
     &   1.70231614E-04, 1.68249362E-04, 1.66159972E-04, 1.63957436E-04,
     &   1.61642434E-04, 1.59169950E-04, 1.56518979E-04, 1.53630467E-04,
     &   1.50382024E-04, 1.45417952E-04, 1.45035987E-04, 1.46162050E-04,
     &   1.47467637E-04, 1.48820531E-04, 1.50173864E-04, 1.51498267E-04,
     &   1.52795159E-04, 1.54048326E-04, 1.55250019E-04, 1.56387060E-04,
     &   1.57483056E-04, 1.58519473E-04, 1.59501321E-04, 1.60424379E-04,
     &   1.61286608E-04, 1.62103080E-04, 1.62854507E-04, 1.63548047E-04,
     &   1.64195544E-04, 1.64776185E-04, 1.65307577E-04, 1.65782729E-04,
     &   1.66201502E-04, 1.66567537E-04, 1.66879983E-04, 1.67138547E-04,
     &   1.67343477E-04, 1.67496663E-04, 1.67597308E-04, 1.67647438E-04,
     &   1.67647890E-04, 1.67599165E-04, 1.67502452E-04, 1.67356597E-04,
     &   1.67160421E-04, 1.65667627E-04, 1.60044308E-04, 1.57433771E-04,
     &   1.58522704E-04, 1.62390084E-04, 1.67855399E-04, 1.74816424E-04,
     &   1.82321904E-04, 1.90847739E-04, 1.99973334E-04, 2.09258162E-04,
     &   2.19620750E-04, 2.30312630E-04, 2.25899026E-04, 2.21485422E-04,
     &   2.12666886E-04, 2.04737475E-04, 1.98123052E-04, 1.92022688E-04,
     &   1.86827956E-04, 1.81954664E-04, 1.77744600E-04, 1.73746107E-04,
     &   1.70102889E-04, 1.66907234E-04, 1.63831285E-04, 1.61113094E-04,
     &   1.58479205E-04, 1.56137515E-04, 1.53855905E-04, 1.51817125E-04,
     &   1.49821396E-04, 1.48030376E-04, 1.46270170E-04, 1.44684628E-04,
     &   1.43187046E-04, 1.41707835E-04, 1.40369119E-04, 1.39043009E-04,
     &   1.37839579E-04, 1.36644410E-04, 1.35557155E-04, 1.34474858E-04,
     &   1.33488109E-04, 1.32503793E-04, 1.31604572E-04, 1.30705849E-04,
     &   1.29846750E-04, 1.29059786E-04, 1.28271210E-04, 1.27547677E-04,
     &   1.26821534E-04, 1.26154286E-04, 1.25483664E-04, 1.24866577E-04/
  
         DATA ((DAS  (I,J), I=2101,2174), J=3,3) /
     &   1.24245537E-04, 1.23673332E-04, 1.23096740E-04, 1.22564844E-04,
     &   1.22051173E-04, 1.21532674E-04, 1.21053570E-04, 1.20569447E-04,
     &   1.20121643E-04, 1.19668945E-04, 1.19249550E-04, 1.18824933E-04,
     &   1.18431424E-04, 1.18032658E-04, 1.17662782E-04, 1.17287647E-04,
     &   1.16923811E-04, 1.16585920E-04, 1.16242811E-04, 1.15901987E-04,
     &   1.15577818E-04, 1.15276319E-04, 1.14969724E-04, 1.14684097E-04,
     &   1.14393975E-04, 1.14123539E-04, 1.13848165E-04, 1.13591536E-04,
     &   1.13330058E-04, 1.13086231E-04, 1.12848326E-04, 1.12605712E-04,
     &   1.12379282E-04, 1.12148242E-04, 1.11932495E-04, 1.11712239E-04,
     &   1.11506453E-04, 1.11296516E-04, 1.11100078E-04, 1.10899332E-04,
     &   1.10711589E-04, 1.10519637E-04, 1.08681364E-04, 1.07206827E-04,
     &   1.06997601E-04, 1.01281988E-04, 9.99232609E-05, 9.77384325E-05,
     &   9.69950141E-05, 9.69504186E-05, 9.62374272E-05, 9.62355494E-05,
     &   9.58433835E-05, 9.58315016E-05, 9.58225904E-05, 9.56637510E-05,
     &   9.55679875E-05, 9.55516336E-05, 9.55253978E-05, 9.54875976E-05,
     &   9.54616752E-05, 9.54456988E-05, 9.53017236E-05, 9.52949692E-05,
     &   9.52581262E-05, 9.52511986E-05, 9.52509729E-05, 9.52073018E-05,
     &   9.52062052E-05, 9.51977573E-05, 9.51650870E-05, 9.51308526E-05,
     &   9.51167366E-05, 9.50294751E-05/

c      ++++ deghadslow19 ++++  

c update jun 2019 
c  
c******************************************************************************
c*                                                                            *
c*    --- intRdat1 ---                              Thu Jun 13 20:44:29 2019  *
c*                                                                            *
c***************************# FJ@HU Berlin #***********************************
c  
c  "Delta alpha"               Update version (12/06/2019) 
c  
c ISCAN:  1, Ismooth: 0, IGS: 0, DSET: WAVE, iplot: 0 itestflavorspl: 0
c IKE,Emin,Emax,NP,N,EPSREL:  1, 6.0000E-01, 1.4000E+00, 100, 10, 1.00E-02, 
c ALS(sta)(sys):  0.1184( 0.0007)( 0.0000), MZINP:   91.1876, MTOP:    173.20
c NF,IOR,ICHK: 5,4,2,ISU2: 2,NFL: 5,INAG: 1,inotail:  0, sin2W:   0.23153
c CHPTCUT,EC,ECUT: 0.3180,     5.20,    11.50
c  

         DATA ((DGS  (I,J), I=   1, 100), J=1,1) /
     &  -1.88212061E-03,-2.00245184E-03,-2.11893313E-03,-2.23813944E-03,
     &  -2.35998648E-03,-2.42321955E-03,-2.52584852E-03,-2.71206951E-03,
     &  -2.78671472E-03,-2.85999814E-03,-2.97693192E-03,-3.08884747E-03,
     &  -3.21740038E-03,-3.30243575E-03,-3.40703559E-03,-3.51323524E-03,
     &  -3.61992828E-03,-3.72649819E-03,-3.81399361E-03,-3.92678000E-03,
     &  -4.01844937E-03,-4.13106711E-03,-4.22131757E-03,-4.33850630E-03,
     &  -4.43546535E-03,-4.53122308E-03,-4.64827779E-03,-4.71679159E-03,
     &  -4.74769333E-03,-4.84932760E-03,-4.95265906E-03,-5.05609789E-03,
     &  -5.16108847E-03,-5.26838764E-03,-5.38076206E-03,-5.49771838E-03,
     &  -5.61492278E-03,-5.73586415E-03,-5.86086908E-03,-5.99075242E-03,
     &  -6.09223998E-03,-6.21984969E-03,-6.34702420E-03,-6.45124898E-03,
     &  -6.58788116E-03,-6.72712237E-03,-6.83591807E-03,-6.98669478E-03,
     &  -7.10186490E-03,-7.26268921E-03,-8.14629144E-03,-9.07965833E-03,
     &  -1.04168886E-02,-1.21264162E-02,-1.26953532E-02,-1.28489749E-02,
     &  -1.32962262E-02,-1.39087712E-02,-1.46390021E-02,-1.51887066E-02,
     &  -1.58347186E-02,-1.60558126E-02,-1.64421578E-02,-1.70757218E-02,
     &  -1.75778513E-02,-1.80693600E-02,-1.84497128E-02,-1.87518215E-02,
     &  -1.87544462E-02,-1.87122816E-02,-1.86620833E-02,-1.85473685E-02,
     &  -1.80204942E-02,-1.71218566E-02,-1.58622924E-02,-1.40110929E-02,
     &  -1.15992376E-02,-8.68859269E-03,-5.64537141E-03,-4.53545226E-03,
     &  -1.63917059E-03,-2.27816239E-04, 1.38505883E-03, 2.56438316E-03,
     &   4.33764339E-03, 6.35462084E-03, 7.51065644E-03, 8.30313155E-03,
     &   8.89999921E-03, 9.36639355E-03, 9.82123462E-03, 1.01704870E-02,
     &   1.04722739E-02, 1.07620069E-02, 1.10589609E-02, 1.14970051E-02,
     &   1.16557945E-02, 1.18169657E-02, 1.20408588E-02, 1.22097295E-02/
  
         DATA ((DGS  (I,J), I= 101, 200), J=1,1) /
     &   1.23475855E-02, 1.24627155E-02, 1.25882787E-02, 1.26770771E-02,
     &   1.27439650E-02, 1.28006363E-02, 1.28561799E-02, 1.29105957E-02,
     &   1.29554261E-02, 1.29946071E-02, 1.30344591E-02, 1.30489054E-02,
     &   1.30637940E-02, 1.30794932E-02, 1.30781858E-02, 1.30780056E-02,
     &   1.30709047E-02, 1.30668611E-02, 1.31449431E-02, 1.32202291E-02,
     &   1.33167331E-02, 1.34269909E-02, 1.35518356E-02, 1.37005685E-02,
     &   1.38526280E-02, 1.40079287E-02, 1.41696979E-02, 1.43523066E-02,
     &   1.45522552E-02, 1.47516653E-02, 1.49615481E-02, 1.51834592E-02,
     &   1.53921569E-02, 1.55893161E-02, 1.58375579E-02, 1.60156309E-02,
     &   1.61544430E-02, 1.62279740E-02, 1.61848990E-02, 1.62214555E-02,
     &   1.63652224E-02, 1.65473004E-02, 1.67445928E-02, 1.68899702E-02,
     &   1.70593370E-02, 1.72249220E-02, 1.73889621E-02, 1.75996533E-02,
     &   1.77612482E-02, 1.79814310E-02, 1.82941106E-02, 1.87749201E-02,
     &   1.89113006E-02, 1.93559749E-02, 1.98006492E-02, 2.02208766E-02,
     &   2.05289272E-02, 2.08345312E-02, 2.10250980E-02, 2.11399373E-02,
     &   2.12986821E-02, 2.14922837E-02, 2.15556319E-02, 2.15858070E-02,
     &   2.15816766E-02, 2.15705550E-02, 2.15123486E-02, 2.14487222E-02,
     &   2.12775257E-02, 2.09066483E-02, 2.04711201E-02, 2.00390581E-02,
     &   1.94662177E-02, 1.88391221E-02, 1.81699494E-02, 1.75831965E-02,
     &   1.68815845E-02, 1.60660802E-02, 1.54075542E-02, 1.50181697E-02,
     &   1.42704890E-02, 1.39493957E-02, 1.31061799E-02, 1.23830716E-02,
     &   1.14803098E-02, 1.06674381E-02, 9.65271678E-03, 8.74247733E-03,
     &   7.76563051E-03, 6.46637766E-03, 5.78696296E-03, 5.29921212E-03,
     &   4.27277834E-03, 3.71427855E-03, 3.12479342E-03, 2.49836357E-03,
     &   1.82125661E-03, 1.11163112E-03, 3.79642339E-04,-1.20664718E-03/
  
         DATA ((DGS  (I,J), I= 201, 300), J=1,1) /
     &  -2.98450943E-03,-4.03520452E-03,-4.42327364E-03,-4.83402813E-03,
     &  -5.25930907E-03,-5.69420741E-03,-6.15056419E-03,-6.62968991E-03,
     &  -7.17548165E-03,-7.63404443E-03,-8.17700074E-03,-8.71676958E-03,
     &  -9.33362875E-03,-9.93942601E-03,-1.05859251E-02,-1.12597843E-02,
     &  -1.19784823E-02,-1.27207945E-02,-1.34933311E-02,-1.43009814E-02,
     &  -1.51612259E-02,-1.60670162E-02,-1.70297284E-02,-1.80537767E-02,
     &  -1.91418124E-02,-2.02992236E-02,-2.15389680E-02,-2.28651089E-02,
     &  -2.43188310E-02,-2.58541573E-02,-2.64754411E-02,-2.73504164E-02,
     &  -2.86892212E-02,-2.98300675E-02,-3.18509832E-02,-3.38802617E-02,
     &  -3.61159080E-02,-3.84346637E-02,-4.11899734E-02,-4.36106003E-02,
     &  -4.65430534E-02,-4.96854652E-02,-5.26057617E-02,-5.69542234E-02,
     &  -6.13026851E-02,-6.60363206E-02,-7.13620032E-02,-7.74921041E-02,
     &  -8.43621419E-02,-9.22296961E-02,-1.01365667E-01,-1.11868330E-01,
     &  -1.24079932E-01,-1.35866175E-01,-1.42234035E-01,-1.46613804E-01,
     &  -1.52650650E-01,-1.55596643E-01,-1.53838305E-01,-1.64543072E-01,
     &  -1.68877689E-01,-1.72768302E-01,-1.76239195E-01,-1.78993165E-01,
     &  -1.80753269E-01,-1.81095461E-01,-1.78082851E-01,-1.72672666E-01,
     &  -1.68862291E-01,-1.58353171E-01,-1.43619555E-01,-1.24177737E-01,
     &  -9.23223754E-02,-7.10280553E-02,-3.84680869E-02,-3.53685580E-03,
     &   3.20128926E-02, 6.63467000E-02, 9.78744163E-02, 1.25315237E-01,
     &   1.48105333E-01, 1.66103448E-01, 1.79494781E-01, 1.88810222E-01,
     &   1.94804855E-01, 1.97963729E-01, 1.98967237E-01, 1.98269214E-01,
     &   1.96333556E-01, 1.93432943E-01, 1.88072513E-01, 1.86531888E-01,
     &   1.78955001E-01, 1.77067647E-01, 1.73011756E-01, 1.68580738E-01,
     &   1.64226289E-01, 1.59960389E-01, 1.55737387E-01, 1.51728800E-01/
  
         DATA ((DGS  (I,J), I= 301, 400), J=1,1) /
     &   1.51163474E-01, 1.44053145E-01, 1.40416193E-01, 1.36975743E-01,
     &   1.25762536E-01, 1.16159901E-01, 1.07832759E-01, 1.00612929E-01,
     &   9.42960592E-02, 8.75916385E-02, 8.38423800E-02, 7.94965654E-02,
     &   7.56011317E-02, 7.21101330E-02, 6.89601019E-02, 6.61137586E-02,
     &   6.35829317E-02, 6.11732217E-02, 5.90268011E-02, 5.70363897E-02,
     &   5.53838785E-02, 5.37051730E-02, 5.37124915E-02, 5.07699205E-02,
     &   4.95126354E-02, 4.91625622E-02, 4.98883278E-02, 4.86879221E-02,
     &   4.70653023E-02, 4.59785859E-02, 4.49538717E-02, 4.40492947E-02,
     &   4.31811830E-02, 4.23599931E-02, 4.15883066E-02, 4.08538203E-02,
     &   4.01605529E-02, 3.94875915E-02, 3.88739735E-02, 3.82745745E-02,
     &   3.77084707E-02, 3.71569562E-02, 3.66363711E-02, 3.61206347E-02,
     &   3.56439264E-02, 3.51878957E-02, 3.47497944E-02, 3.42794266E-02,
     &   3.38511193E-02, 3.35066136E-02, 3.31129055E-02, 3.27436937E-02,
     &   3.23785653E-02, 3.20075512E-02, 3.16681122E-02, 3.13140052E-02,
     &   3.03996258E-02, 2.83921748E-02, 2.53040203E-02, 2.30070136E-02,
     &   2.13071994E-02, 1.99126352E-02, 1.87409834E-02, 1.77344318E-02,
     &   1.68750107E-02, 1.67915951E-02, 1.58099103E-02, 1.51383049E-02,
     &   1.49241825E-02, 1.43896802E-02, 1.39248680E-02, 1.38419319E-02,
     &   1.34485343E-02, 1.30024815E-02, 1.27990458E-02, 1.26279493E-02,
     &   1.22527636E-02, 1.19250512E-02, 1.16603380E-02, 1.14161714E-02,
     &   1.12505765E-02, 1.11449821E-02, 1.09081179E-02, 1.06814017E-02,
     &   1.06591342E-02, 1.05063116E-02, 1.03465167E-02, 1.02661184E-02,
     &   1.01981290E-02, 1.00471397E-02, 9.92004906E-03, 9.79221705E-03,
     &   9.75250863E-03, 9.67038166E-03, 9.62170924E-03, 9.61649889E-03,
     &   9.59606758E-03, 9.57836402E-03, 9.58413613E-03, 9.55000401E-03/
  
         DATA ((DGS  (I,J), I= 401, 500), J=1,1) /
     &   9.38150366E-03, 9.35680034E-03, 9.37678725E-03, 9.45193997E-03,
     &   9.48355297E-03, 9.55840351E-03, 9.65780859E-03, 9.70155762E-03,
     &   9.73725750E-03, 9.79927130E-03, 9.88541735E-03, 9.98669344E-03,
     &   1.00013153E-02, 1.01278771E-02, 1.01445573E-02, 1.02198917E-02,
     &   1.02834524E-02, 1.05072868E-02, 1.05442468E-02, 1.08074418E-02,
     &   1.08302516E-02, 1.08535238E-02, 1.11045978E-02, 1.14169199E-02,
     &   1.14863321E-02, 1.19389675E-02, 1.19766531E-02, 1.21619247E-02,
     &   1.22010309E-02, 1.24171708E-02, 1.25206053E-02, 1.28128392E-02,
     &   1.28463248E-02, 1.31648487E-02, 1.34060199E-02, 1.34788820E-02,
     &   1.34838580E-02, 1.33209618E-02, 1.32601760E-02, 1.28664220E-02,
     &   1.25603112E-02, 1.24381483E-02, 1.23599575E-02, 1.23214410E-02,
     &   1.18985056E-02, 1.17914555E-02, 1.14254501E-02, 1.10664775E-02,
     &   1.08815985E-02, 1.02172058E-02, 9.72141237E-03, 9.63501573E-03,
     &   9.59106587E-03, 9.33913216E-03, 9.23694905E-03, 9.16218872E-03,
     &   8.88326785E-03, 8.85873704E-03, 8.83334699E-03, 8.84137539E-03,
     &   8.84021775E-03, 8.83973894E-03, 8.83652072E-03, 8.83229003E-03,
     &   8.83070784E-03, 8.82144190E-03, 8.79399656E-03, 8.74189983E-03,
     &   8.66932866E-03, 8.61119603E-03, 8.60864055E-03, 8.67268343E-03,
     &   8.74715918E-03, 8.77605650E-03, 8.77460147E-03, 8.71560341E-03,
     &   8.70740338E-03, 8.67583735E-03, 8.55913482E-03, 8.38053725E-03,
     &   8.35285362E-03, 8.08305665E-03, 7.95220745E-03, 7.80454554E-03,
     &   7.53562585E-03, 7.07837439E-03, 6.95310403E-03, 6.87328364E-03,
     &   6.82121099E-03, 6.80401796E-03, 6.77552087E-03, 6.76992272E-03,
     &   6.75593645E-03, 6.76076950E-03, 6.77223129E-03, 6.77496711E-03,
     &   6.53615159E-03, 6.03668400E-03, 5.65121143E-03, 5.89492877E-03/
  
         DATA ((DGS  (I,J), I= 501, 600), J=1,1) /
     &   2.99070562E-03, 4.31746466E-03, 6.16857159E-03, 6.70600530E-03,
     &   7.06543621E-03, 7.57245417E-03, 7.64903479E-03, 7.62833673E-03,
     &   7.54975169E-03, 7.43083565E-03, 7.23002580E-03, 6.91018908E-03,
     &   6.42780881E-03, 5.66264022E-03, 4.51480862E-03, 2.74638257E-03,
     &   2.27229189E-03, 1.76370746E-03, 1.17394698E-03, 5.09531864E-04,
     &  -2.21253325E-04,-1.09389598E-03,-2.08827775E-03,-2.30717955E-03,
     &  -2.52817090E-03,-2.76201067E-03,-3.00305245E-03,-3.24301750E-03,
     &  -3.50109540E-03,-3.76855391E-03,-4.04516530E-03,-4.33210316E-03,
     &  -4.62985704E-03,-6.13265143E-03,-7.28835746E-03,-7.92266482E-03,
     &  -8.37087005E-03,-8.83462733E-03,-9.32719092E-03,-9.83527361E-03,
     &  -1.03781971E-02,-1.09493469E-02,-1.12461387E-02,-1.15508749E-02,
     &  -1.18602071E-02,-1.21817250E-02,-1.25123226E-02,-1.28520467E-02,
     &  -1.32012847E-02,-1.35609168E-02,-1.39311747E-02,-1.43125376E-02,
     &  -1.47054992E-02,-1.51105946E-02,-1.55283955E-02,-1.59594973E-02,
     &  -1.64045542E-02,-1.68641729E-02,-1.73394193E-02,-1.78305869E-02,
     &  -1.83388341E-02,-1.88649670E-02,-1.94099343E-02,-1.99747689E-02,
     &  -2.05605821E-02,-2.11685633E-02,-2.17999938E-02,-2.24562105E-02,
     &  -2.31388664E-02,-2.38494632E-02,-2.45897843E-02,-2.53420293E-02,
     &  -2.61476389E-02,-2.70123966E-02,-2.78923936E-02,-2.87900945E-02,
     &  -2.97549714E-02,-3.07672242E-02,-3.18301007E-02,-3.29556096E-02,
     &  -3.41321199E-02,-3.53724682E-02,-3.60182636E-02,-3.66757687E-02,
     &  -3.73582836E-02,-3.80586453E-02,-3.87810526E-02,-3.95248286E-02,
     &  -4.02907150E-02,-4.10801813E-02,-4.18938218E-02,-4.27328127E-02,
     &  -4.35988434E-02,-4.44926648E-02,-4.54157551E-02,-4.63700341E-02,
     &  -4.73565875E-02,-4.83772585E-02,-4.94338485E-02,-5.05282883E-02/
  
         DATA ((DGS  (I,J), I= 601, 700), J=1,1) /
     &  -5.16627105E-02,-5.28392833E-02,-5.40603980E-02,-5.53286412E-02,
     &  -5.66467886E-02,-5.80178510E-02,-5.94450943E-02,-6.09320244E-02,
     &  -6.24824687E-02,-6.41005850E-02,-6.57909043E-02,-6.75584782E-02,
     &  -6.94085061E-02,-7.13470215E-02,-7.33805674E-02,-7.55161930E-02,
     &  -7.77619878E-02,-8.01265810E-02,-8.26196559E-02,-8.52519999E-02,
     &  -8.91906264E-02,-9.09803597E-02,-9.41084054E-02,-9.74332595E-02,
     &  -1.00974060E-01,-1.04748816E-01,-1.08796923E-01,-1.13128661E-01,
     &  -1.17783833E-01,-1.22800114E-01,-1.28221276E-01,-1.34098639E-01,
     &  -1.40492001E-01,-1.45596620E-01,-1.61505725E-01,-1.81004003E-01,
     &  -2.05465117E-01,-2.37071707E-01,-2.79525750E-01,-3.39733792E-01,
     &  -4.35596659E-01,-5.83553168E-01,-8.94330075E-01,-1.89116274E+00,
     &  -2.00035875E+00,-2.12282861E+00,-2.26134999E+00,-2.41849023E+00,
     &  -2.59917739E+00,-2.80873590E+00,-3.05463286E+00,-3.34712973E+00,
     &  -3.70070468E+00,-4.13643408E+00,-4.68640404E+00,-5.37797022E+00,
     &  -6.36184114E+00,-6.47650238E+00,-9.04395327E+00,-1.09152120E+01,
     &  -1.24187313E+01,-7.74451998E+00,-1.47377629E+01,-1.50576322E+01,
     &  -1.63127056E+01,-1.70201090E+01,-1.75113531E+01,-1.79649304E+01,
     &  -1.82800703E+01,-1.85336934E+01,-1.86721434E+01,-1.87707259E+01,
     &  -1.87761737E+01,-1.87189844E+01,-1.85695550E+01,-1.84096981E+01,
     &  -1.80639640E+01,-1.77528528E+01,-1.73688904E+01,-1.65706955E+01,
     &  -1.57893829E+01,-1.49305391E+01,-1.39991453E+01,-1.41257054E+01,
     &  -1.31792917E+01,-1.21298283E+01,-1.09797949E+01,-9.07733880E+00,
     &  -7.70199931E+00,-5.55936349E+00,-3.18424292E+00, 3.20876325E+00,
     &   9.09571363E+00, 1.09954567E+01, 1.26808022E+01, 1.36779589E+01,
     &   1.49809596E+01, 1.49774474E+01, 1.58262977E+01, 1.65961470E+01/
  
         DATA ((DGS  (I,J), I= 701, 800), J=1,1) /
     &   1.72828928E+01, 1.77729534E+01, 1.81446234E+01, 1.83342843E+01,
     &   1.85229297E+01, 1.86587969E+01, 1.87476948E+01, 1.88042956E+01,
     &   1.45770245E+01, 1.54230882E+01, 1.86053415E+01, 1.84947990E+01,
     &   1.82208969E+01, 1.79790599E+01, 1.76223076E+01, 1.72399571E+01,
     &   1.67431901E+01, 1.63419728E+01, 1.51521347E+01, 1.48522902E+01,
     &   1.40147637E+01, 1.30709453E+01, 1.18570434E+01, 1.03580487E+01,
     &   8.72769395E+00, 7.19371177E+00, 6.00215882E+00, 5.14236906E+00,
     &   4.49499179E+00, 3.99091738E+00, 3.58775399E+00, 3.25818697E+00,
     &   2.98395848E+00, 2.75207412E+00, 2.55365490E+00, 2.38191837E+00,
     &   2.23184314E+00, 2.09958454E+00, 1.98215660E+00, 1.87720348E+00,
     &   1.78284191E+00, 1.69754914E+00, 1.62008008E+00, 8.54774431E-01,
     &   5.83061082E-01, 4.44168774E-01, 3.61954664E-01, 3.01755523E-01,
     &   2.60322087E-01, 2.29361319E-01, 2.05290823E-01, 1.86026498E-01,
     &   1.70254690E-01, 1.68387623E-01, 1.55375351E-01, 1.44359031E-01,
     &   1.34911563E-01, 1.26719681E-01, 1.19548486E-01, 1.13218225E-01,
     &   1.07588838E-01, 1.02550267E-01, 9.80141439E-02, 9.39084588E-02,
     &   9.01748708E-02, 8.67649035E-02, 8.36381659E-02, 8.07607743E-02,
     &   7.81040285E-02, 7.56431935E-02, 7.33580999E-02, 7.12295981E-02,
     &   6.92430944E-02, 6.73840947E-02, 6.56408866E-02, 6.40029732E-02,
     &   6.24610915E-02, 6.10070133E-02, 5.96334527E-02, 5.83341166E-02,
     &   5.71027493E-02, 5.59343182E-02, 5.48238675E-02, 5.37675903E-02,
     &   5.27822035E-02, 5.18227384E-02, 5.09067350E-02, 5.00313394E-02,
     &   4.91938800E-02, 4.83919505E-02, 4.76229873E-02, 4.68861740E-02,
     &   4.61781789E-02, 4.54975624E-02, 4.48433269E-02, 4.42137084E-02,
     &   4.36073662E-02, 4.30230062E-02, 4.24594734E-02, 4.19156730E-02/
  
         DATA ((DGS  (I,J), I= 801, 900), J=1,1) /
     &   4.13903459E-02, 4.08835964E-02, 4.03931555E-02, 3.99184652E-02,
     &   3.94593957E-02, 3.90149337E-02, 3.85843956E-02, 3.81671338E-02,
     &   3.77625639E-02, 3.73701328E-02, 3.69893207E-02, 3.66196435E-02,
     &   3.62605218E-02, 3.59119092E-02, 3.55730332E-02, 3.52436505E-02,
     &   3.49233811E-02, 3.46119035E-02, 3.43089179E-02, 3.40141355E-02,
     &   3.37272664E-02, 3.34481133E-02, 3.31766513E-02, 3.29120118E-02,
     &   3.26547390E-02, 3.24044396E-02, 3.21609697E-02, 3.19242696E-02,
     &   3.16943128E-02, 3.14711139E-02, 3.12547463E-02, 3.10455022E-02,
     &   3.08433566E-02, 3.06693523E-02, 3.04832054E-02, 3.03062577E-02,
     &   2.97610841E-02, 2.95626121E-02, 2.93681628E-02, 2.91776107E-02,
     &   2.89908359E-02, 2.88079300E-02, 2.86283518E-02, 2.84519854E-02,
     &   2.82792344E-02, 2.81264904E-02, 2.79433468E-02, 2.77800792E-02,
     &   2.76197869E-02, 2.74623913E-02, 2.73079650E-02, 2.71560770E-02,
     &   2.70068425E-02, 2.68598366E-02, 2.67159417E-02, 2.65742779E-02,
     &   2.23219671E-02, 1.93356317E-02, 1.66911360E-02, 1.43105062E-02,
     &   1.27309642E-02, 1.19923617E-02, 1.11275646E-02, 1.00643655E-02,
     &   9.05228305E-03, 7.65483819E-03, 6.92929846E-03, 5.84756768E-03,
     &   5.86996317E-03, 5.54810291E-03, 4.62963563E-03, 3.62774333E-03,
     &   2.48735972E-03, 1.15455884E-03,-4.37075407E-04,-2.38468243E-03,
     &  -4.83669332E-03,-6.00926636E-03,-7.32232696E-03,-8.80403661E-03,
     &  -1.04905630E-02,-1.24291507E-02,-1.46827470E-02,-1.59532824E-02,
     &  -1.73370882E-02,-1.88502026E-02,-2.05120196E-02,-2.23459981E-02,
     &  -2.43804160E-02,-2.66508399E-02,-2.92012333E-02,-3.20873441E-02,
     &  -3.53807702E-02,-3.91753379E-02,-4.35952857E-02,-4.85840334E-02,
     &  -5.18496531E-02,-5.54733669E-02,-5.95178359E-02,-6.40612784E-02/
  
         DATA ((DGS  (I,J), I= 901,1000), J=1,1) /
     &  -6.92026294E-02,-7.50689054E-02,-8.18259614E-02,-8.96946231E-02,
     &  -9.89755947E-02,-1.10089604E-01,-1.23643836E-01,-1.40550105E-01,
     &  -1.62245066E-01,-1.91143078E-01,-2.31670086E-01,-2.93131136E-01,
     &  -4.01845605E-01,-5.94133979E-01,-8.69455536E-01,-1.02911925E+00,
     &  -1.20387543E+00,-1.63488403E+00,-1.79067467E+00,-1.84038264E+00,
     &  -2.02720928E+00,-2.09892103E+00,-2.19474175E+00,-2.25948228E+00,
     &  -2.27404431E+00,-2.31615521E+00,-2.38308943E+00,-2.40605046E+00,
     &  -2.41963295E+00,-2.42447128E+00,-2.42085962E+00,-2.41121439E+00,
     &  -2.39174795E+00,-2.36635784E+00,-2.33523467E+00,-2.29260014E+00,
     &  -2.24222846E+00,-2.17766447E+00,-2.11229409E+00,-2.03721439E+00,
     &  -1.95190253E+00,-1.83892152E+00,-1.73024598E+00,-1.58949669E+00,
     &  -1.45697559E+00,-1.26376987E+00,-1.05292017E+00,-7.38011120E-01,
     &  -4.63518944E-01,-1.47344162E-01, 1.28052172E-02, 1.72956420E-01,
     &   3.32074525E-01, 7.63665021E-01, 1.07862026E+00, 1.28951151E+00,
     &   1.48276409E+00, 1.61532290E+00, 1.75611850E+00, 1.86483471E+00,
     &   1.97786404E+00, 2.06321737E+00, 2.13833826E+00, 2.20375474E+00,
     &   2.26836453E+00, 2.31872143E+00, 2.36139902E+00, 2.39261462E+00,
     &   2.41804319E+00, 2.43755127E+00, 2.44723105E+00, 2.45088438E+00,
     &   2.44608492E+00, 2.43254247E+00, 2.40962209E+00, 2.34243075E+00,
     &   2.30037466E+00, 2.28613273E+00, 2.22143204E+00, 2.12543772E+00,
     &   2.05398302E+00, 1.86798678E+00, 1.81751197E+00, 1.66175630E+00,
     &   1.47344617E+00, 1.57568041E+00, 1.35094367E+00, 1.21270322E+00,
     &   1.12920692E+00, 9.56620314E-01, 8.96438897E-01, 7.71779328E-01,
     &   9.36823429E-01, 3.62324168E-01, 2.84143055E-01, 2.35384828E-01,
     &   2.01722062E-01, 1.76998393E-01, 1.58039296E-01, 1.43024572E-01/
  
         DATA ((DGS  (I,J), I=1001,1100), J=1,1) /
     &   1.30830193E-01, 1.20722266E-01, 1.12198420E-01, 1.04889994E-01,
     &   9.85925335E-02, 9.31873686E-02, 8.83963274E-02, 8.41377284E-02,
     &   8.03335533E-02, 7.69168941E-02, 7.14886113E-02, 6.47131271E-02,
     &   6.10811347E-02, 5.51314178E-02, 5.04605882E-02, 4.58535961E-02,
     &   3.92857428E-02, 3.18644036E-02, 2.72241404E-02, 2.50671095E-02,
     &   2.39478159E-02, 2.31202718E-02, 2.25099762E-02, 2.20150036E-02,
     &   2.16501928E-02, 2.13308949E-02, 2.10614312E-02, 2.08314980E-02,
     &   2.06323338E-02, 2.05027019E-02, 2.03057648E-02, 2.01716338E-02,
     &   2.00534325E-02, 1.99493250E-02, 1.98581325E-02, 1.97781896E-02,
     &   1.97086688E-02, 1.96488838E-02, 1.95982016E-02, 1.95563614E-02,
     &   1.94671342E-02, 1.94984616E-02, 1.94825698E-02, 1.94759333E-02,
     &   1.94772154E-02, 1.94921392E-02, 1.95221528E-02, 1.95656206E-02,
     &   1.96300418E-02, 1.97253769E-02, 1.98786333E-02, 2.03681225E-02,
     &   2.10117586E-02, 2.13178020E-02, 2.15662330E-02, 2.17832684E-02,
     &   2.19793764E-02, 2.21586119E-02, 2.23247876E-02, 2.24789733E-02,
     &   2.26226441E-02, 2.27576591E-02, 2.28796524E-02, 2.29941549E-02,
     &   2.30339221E-02, 2.31402039E-02, 2.32257983E-02, 2.33147554E-02,
     &   2.33758711E-02, 2.34393152E-02, 2.34632183E-02, 2.34731038E-02,
     &   2.34665362E-02, 2.34418359E-02, 2.33971475E-02, 2.33300658E-02,
     &   2.32263248E-02, 2.31008842E-02, 2.29578131E-02, 2.27738660E-02,
     &   2.25444863E-02, 2.22556251E-02, 2.18947032E-02, 2.14338304E-02,
     &   2.08125885E-02, 1.99192214E-02, 1.96526891E-02, 1.89455289E-02,
     &   1.78847396E-02, 1.77754712E-02, 1.70429283E-02, 1.67448675E-02,
     &   1.65077081E-02, 1.63070541E-02, 1.59933713E-02, 1.56599940E-02,
     &   1.55891510E-02, 1.55799242E-02, 1.55251550E-02, 1.54238026E-02/
  
         DATA ((DGS  (I,J), I=1101,1200), J=1,1) /
     &   1.53695030E-02, 1.53889512E-02, 1.56109297E-02, 1.55890696E-02,
     &   1.53501231E-02, 1.52549566E-02, 1.50688177E-02, 1.49092721E-02,
     &   1.47497265E-02, 1.45901809E-02, 1.44776925E-02, 1.41963374E-02,
     &   1.37737137E-02, 1.31910661E-02, 1.28183601E-02, 1.22476094E-02,
     &   1.18754236E-02, 1.20722153E-02, 1.29668842E-02, 1.35788522E-02,
     &   1.49586247E-02, 1.55399535E-02, 1.60163837E-02, 1.65481688E-02,
     &   1.69608469E-02, 1.68773828E-02, 1.67696985E-02, 1.69836840E-02,
     &   1.76046503E-02, 1.71524154E-02, 1.65872558E-02, 1.66888415E-02,
     &   1.68824907E-02, 1.70189103E-02, 1.72171390E-02, 1.72436738E-02,
     &   1.71100628E-02, 1.68231789E-02, 1.66513349E-02, 1.63227343E-02,
     &   1.62834708E-02, 1.65042709E-02, 1.67541872E-02, 1.70657359E-02,
     &   1.72027857E-02, 1.74935364E-02, 1.76165114E-02, 1.74502583E-02,
     &   1.76124977E-02, 1.79742511E-02, 1.83585112E-02, 1.87491912E-02,
     &   1.89825608E-02, 1.91809616E-02, 1.94256166E-02, 1.96112123E-02,
     &   1.97447426E-02, 1.98871123E-02, 2.00897647E-02, 2.02645264E-02,
     &   2.04174765E-02, 2.05744600E-02, 2.03218569E-02, 1.95304933E-02,
     &   1.93573517E-02, 1.94838229E-02, 1.97462443E-02, 1.94427802E-02,
     &   1.94410464E-02, 1.96596351E-02, 1.97994466E-02, 1.86055443E-02,
     &   1.73369286E-02, 1.69140202E-02, 1.66111348E-02, 1.70943230E-02,
     &   1.71067825E-02, 1.69083074E-02, 1.67331001E-02, 1.66306637E-02,
     &   1.64854077E-02, 1.62911346E-02, 1.57481744E-02, 1.57858028E-02,
     &   1.58354555E-02, 1.57393019E-02, 1.57036049E-02, 1.56854828E-02,
     &   1.57719971E-02, 1.58147151E-02, 1.58380934E-02, 1.59015979E-02,
     &   1.58812880E-02, 1.59491891E-02, 1.65650618E-02, 1.72224292E-02,
     &   1.74081237E-02, 1.74633384E-02, 1.74980369E-02, 1.72889935E-02/
  
         DATA ((DGS  (I,J), I=1201,1300), J=1,1) /
     &   1.77235802E-02, 1.82599744E-02, 1.84656167E-02, 1.85510251E-02,
     &   1.86994867E-02, 1.87218288E-02, 1.85783562E-02, 1.83237386E-02,
     &   1.82378536E-02, 1.84204573E-02, 1.84223600E-02, 1.79070624E-02,
     &   1.79340382E-02, 1.82092657E-02, 1.81575594E-02, 1.78795837E-02,
     &   1.77470305E-02, 1.78010099E-02, 1.79790181E-02, 1.79910902E-02,
     &   1.83859165E-02, 1.85839285E-02, 1.89762287E-02, 1.93930477E-02,
     &   1.94371812E-02, 1.94761226E-02, 1.94891031E-02, 1.97089543E-02,
     &   2.00463231E-02, 2.01901492E-02, 2.03242094E-02, 2.05715256E-02,
     &   2.07987628E-02, 2.09065566E-02, 2.10110513E-02, 2.11125683E-02,
     &   2.12113661E-02, 2.13076567E-02, 2.14016163E-02, 2.14933924E-02,
     &   2.15831112E-02, 2.16708799E-02, 2.17567912E-02, 2.18409253E-02,
     &   2.19233567E-02, 2.20041363E-02, 2.20833216E-02, 2.21609598E-02,
     &   2.22370897E-02, 2.23117468E-02, 2.23849612E-02, 2.24567577E-02,
     &   2.25271586E-02, 2.25961813E-02, 2.26638401E-02, 2.27301456E-02,
     &   2.27951054E-02, 2.28587239E-02, 2.29210021E-02, 2.29819383E-02,
     &   2.30415271E-02, 2.30997604E-02, 2.31566264E-02, 2.32121100E-02,
     &   2.32661926E-02, 2.33188515E-02, 2.33700603E-02, 2.34099622E-02,
     &   2.34679973E-02, 2.35596946E-02, 2.36447502E-02, 2.37226471E-02,
     &   2.37927228E-02, 2.38541274E-02, 2.39057597E-02, 2.39461787E-02,
     &   2.39734684E-02, 2.39850269E-02, 2.39772295E-02, 2.39448584E-02,
     &   2.38801086E-02, 2.37706566E-02, 2.35957597E-02, 2.35734360E-02,
     &   2.33172397E-02, 2.28555259E-02, 2.20104125E-02, 2.06411332E-02,
     &   2.00835020E-02, 1.78000260E-02, 1.36179711E-02, 1.16989669E-02,
     &   9.01101677E-03, 7.21866155E-03, 4.97828452E-03, 2.73842319E-03,
     &  -6.00825924E-05,-1.73824096E-03,-3.65509527E-03,-5.86529980E-03/
  
         DATA ((DGS  (I,J), I=1301,1400), J=1,1) /
     &  -8.44155280E-03,-1.14827152E-02,-1.51267540E-02,-1.72336728E-02,
     &  -1.95722363E-02,-2.21828307E-02,-2.51158390E-02,-2.84349697E-02,
     &  -3.22220494E-02,-3.65841702E-02,-4.16650120E-02,-4.76659060E-02,
     &  -5.01773627E-02,-5.17611666E-02,-5.34259298E-02,-5.52217196E-02,
     &  -5.69469703E-02,-5.87371070E-02,-5.45710168E-02,-6.26431411E-02,
     &  -6.47478725E-02,-6.69596048E-02,-6.92852723E-02,-7.17330282E-02,
     &  -7.43121582E-02,-7.70331086E-02,-7.99072738E-02,-8.29487174E-02,
     &  -8.61712215E-02,-8.95916525E-02,-9.32286756E-02,-9.71034058E-02,
     &  -1.01239817E-01,-1.05665235E-01,-1.10410943E-01,-1.15512873E-01,
     &  -1.21012756E-01,-1.26958780E-01,-1.33407491E-01,-1.40425355E-01,
     &  -1.48091097E-01,-1.56498657E-01,-1.65761008E-01,-1.76014991E-01,
     &  -1.87427408E-01,-2.00214793E-01,-2.14629647E-01,-2.31008827E-01,
     &  -2.49782487E-01,-2.71517021E-01,-2.96972513E-01,-3.27193532E-01,
     &  -3.63655875E-01,-4.08514763E-01,-4.65046293E-01,-1.83030284E-02,
     &  -6.37747095E-01,-7.79340114E-01,-9.97640412E-01,-1.37796958E+00,
     &  -2.20558378E+00,-2.71868323E+00,-5.20246430E+00,-7.24806185E+00,
     &  -8.73344182E+00,-9.87897069E+00,-2.88345168E-02,-1.16467696E+01,
     &  -1.24133146E+01,-1.29467991E+01,-1.34883815E+01,-1.40219953E+01,
     &  -1.42792404E+01,-1.46397577E+01,-1.48581119E+01,-1.51287524E+01,
     &  -1.51939947E+01,-1.53137985E+01,-1.53403952E+01,-1.53079498E+01,
     &  -1.52584930E+01,-1.51838502E+01,-1.87774938E-01,-1.83680918E-01,
     &  -1.45783394E+01,-1.40539169E+01,-1.37283536E+01,-1.33613499E+01,
     &  -1.29382194E+01,-1.19321569E+01,-1.13455797E+01,-1.07099048E+01,
     &  -9.26496363E+00,-8.46511731E+00,-2.58465503E+00,-4.77146375E+00,
     &   5.37650264E-01, 4.75534236E+00, 6.69811985E+00, 8.45570051E+00/
  
         DATA ((DGS  (I,J), I=1401,1500), J=1,1) /
     &   1.00175141E+01, 1.07195964E+01, 1.13587537E+01, 1.19427495E+01,
     &   1.29537136E+01, 1.33785226E+01, 1.37579296E+01, 1.41073667E+01,
     &   1.46203281E+01, 1.48202803E+01, 1.49900605E+01, 1.52291941E+01,
     &   1.53064078E+01, 1.53852684E+01, 1.53923637E+01, 1.53515458E+01,
     &   1.52505501E+01, 1.53163417E+01, 1.51814125E+01, 1.47023911E+01,
     &   1.43505199E+01, 1.40922073E+01, 1.35488698E+01, 1.30077046E+01,
     &   1.24738869E+01, 1.17069903E+01, 1.08818707E+01, 9.93722836E+00,
     &   8.78841752E+00, 7.30374773E+00, 5.22564313E+00, 2.86381805E+00,
     &   1.64918446E+00, 1.16166258E+00, 8.99182946E-01, 7.35214516E-01,
     &   6.23080467E-01, 5.41708273E-01, 4.79633312E-01, 4.30988646E-01,
     &   3.91770368E-01, 3.59480942E-01, 3.32433661E-01, 3.09448219E-01,
     &   2.89673849E-01, 2.72481930E-01, 1.05453648E-01, 2.44062859E-01,
     &   2.32168144E-01, 2.21519697E-01, 2.11916609E-01, 2.03215129E-01,
     &   1.95294328E-01, 1.88053787E-01, 1.81409633E-01, 1.75291242E-01,
     &   1.69638730E-01, 3.85717130E-02, 1.59534124E-01, 1.55000254E-01,
     &   1.50766494E-01, 1.46804175E-01, 1.43088192E-01, 1.39596476E-01,
     &   1.36309559E-01, 1.33210217E-01, 1.30283185E-01, 1.27514924E-01,
     &   1.24893451E-01, 1.22408252E-01, 1.20050343E-01, 1.17812671E-01,
     &   1.15691829E-01, 1.13698236E-01, 1.11822201E-01, 1.09816191E-01,
     &   1.07978038E-01, 1.06234921E-01, 1.04572064E-01, 1.02981508E-01,
     &   1.01457516E-01, 9.00250546E-02, 8.30603174E-02, 7.64212684E-02,
     &   6.90901038E-02, 6.24231851E-02, 5.65585511E-02, 5.51208653E-02,
     &   4.97562812E-02, 4.16951131E-02, 3.65420431E-02, 3.62993736E-02,
     &   3.57828149E-02, 3.52108430E-02, 3.41219307E-02, 3.31847002E-02,
     &   3.01868340E-02, 2.74988914E-02, 2.58911130E-02, 2.37721571E-02/
  
         DATA ((DGS  (I,J), I=1501,1600), J=1,1) /
     &   2.13169386E-02, 1.85133524E-02, 1.49243035E-02, 1.00162540E-02,
     &  -2.23247718E-03,-4.55288047E-03,-7.28491512E-03,-8.07652592E-03,
     &  -9.88077487E-03,-1.18853506E-02,-1.41256293E-02,-1.66458427E-02,
     &  -1.95020349E-02,-2.27662904E-02,-2.65329179E-02,-3.09277385E-02,
     &  -3.61224612E-02,-4.23577328E-02,-4.99816657E-02,-5.95175566E-02,
     &  -7.17905376E-02,-8.81841981E-02,-1.11223078E-01,-1.46287316E-01,
     &  -2.03478233E-01,-3.17765036E-01,-4.71293758E-01,-4.97068285E-01,
     &  -5.25661276E-01,-5.57561277E-01,-5.93376544E-01,-6.33873421E-01,
     &  -6.80036840E-01,-7.33137466E-01,-7.94868519E-01,-8.67515257E-01,
     &  -9.54247915E-01,-1.05959298E+00,-1.19024322E+00,-1.35652431E+00,
     &  -1.57523658E+00,-1.87560684E+00,-2.31330267E+00,-3.00821549E+00,
     &  -4.26932046E+00,-7.12236438E+00,-8.12214036E+00,-8.55716630E+00,
     &  -9.78156577E+00,-1.05267803E+01,-1.10664813E+01,-9.60429914E+00,
     &  -8.43044331E+00,-1.26978843E+01,-1.22716442E+01,-8.47571000E-01,
     &  -4.41252808E+00,-4.31008913E+00,-4.25899952E+00,-1.01693529E+01,
     &  -1.01086620E+01,-1.00627577E+01,-1.00165255E+01,-9.53678497E+00,
     &  -8.76246387E+00,-7.83582698E+00,-6.95289314E+00,-7.32693271E+00,
     &  -6.21586731E+00,-5.11795881E+00,-4.47307211E+00,-3.85532711E+00,
     &  -3.16631329E+00,-2.17247157E+00,-1.44684089E+00, 1.11771645E-01,
     &   1.12105858E-01, 1.12217182E-01, 1.12272829E-01, 1.12328466E-01,
     &   1.12384094E-01, 1.12439711E-01, 1.12884288E-01, 1.13439106E-01,
     &   1.13992916E-01, 5.46819794E+00, 6.60720886E+00, 8.53909578E+00,
     &   9.28670287E+00, 9.98755298E+00, 1.05092099E+01, 1.02328478E+01,
     &   1.08890629E+01, 1.14968625E+01, 1.16789169E+01, 1.17818679E+01,
     &   1.18142969E+01, 1.18121657E+01, 1.17749160E+01, 1.17161357E+01/
  
         DATA ((DGS  (I,J), I=1601,1700), J=1,1) /
     &   8.51473190E+00, 1.14058991E+01, 1.12646895E+01, 1.11250923E+01,
     &   1.07747849E+01, 1.05934351E+01, 1.02988978E+01, 9.82800369E+00,
     &   8.17431409E+00, 6.88577390E+00, 5.90832657E+00, 5.15839754E+00,
     &   4.56968232E+00, 4.01211096E+00, 3.48111843E+00, 2.89047469E+00,
     &   2.69134084E+00, 2.51768800E+00, 2.36469566E+00, 2.13851928E+00,
     &   1.77453856E+00, 1.51711082E+00, 1.32555181E+00, 1.17750838E+00,
     &   1.05967988E+00, 9.63695874E-01, 8.84002031E-01, 8.16778874E-01,
     &   7.59317381E-01, 7.09634338E-01, 6.66251953E-01, 6.28045018E-01,
     &   5.94139130E-01, 5.63845343E-01, 5.36621505E-01, 3.69630281E-01,
     &   2.55172554E-01, 1.97966592E-01, 1.40852646E-01, 1.11836660E-01,
     &   9.46152386E-02, 8.31593771E-02, 7.49838045E-02, 6.88543767E-02,
     &   6.40875173E-02, 6.02737690E-02, 5.81099389E-02, 5.55846954E-02,
     &   5.34263855E-02, 5.15602596E-02, 4.99305819E-02, 4.84949446E-02,
     &   4.32895827E-02, 4.00187805E-02, 3.77674457E-02, 3.61183307E-02,
     &   3.48524589E-02, 3.38343820E-02, 3.30225236E-02, 3.23464840E-02,
     &   2.65263182E-02, 2.48978139E-02, 2.44895236E-02, 2.40181118E-02,
     &   2.34585038E-02, 2.27657828E-02, 2.23489058E-02, 2.18695332E-02,
     &   2.06391889E-02, 1.87918113E-02, 1.55868176E-02, 8.32850475E-03,
     &   1.40817470E-03,-3.76896697E-04,-2.43548193E-03,-4.83597172E-03,
     &  -7.67177027E-03,-1.10737389E-02,-1.52309030E-02,-2.04273592E-02,
     &  -2.71105809E-02,-3.60292879E-02,-4.85485572E-02,-6.74042507E-02,
     &  -9.84349519E-02,-1.03845093E-01,-1.09747288E-01,-1.16213107E-01,
     &  -1.23327911E-01,-1.31216250E-01,-1.39923561E-01,-1.49687924E-01,
     &  -1.60671861E-01,-1.73121809E-01,-1.87350419E-01,-2.03766089E-01,
     &  -2.22919391E-01,-2.45554409E-01,-2.72712380E-01,-3.05903949E-01/
  
         DATA ((DGS  (I,J), I=1701,1800), J=1,1) /
     &  -3.16267257E-01,-3.47395646E-01,-4.00724944E-01,-4.71822528E-01,
     &  -5.71325009E-01,-7.20477151E-01,-9.68744341E-01,-1.46366524E+00,
     &  -2.92648314E+00,-3.48413760E+00,-4.92500679E+00,-5.63179142E+00,
     &  -6.92379136E+00,-7.71030593E+00,-8.41142360E+00,-9.04687403E+00,
     &  -9.59346731E+00,-1.03642375E+01,-1.05943868E+01, 8.40854698E-02,
     &  -1.14860671E+01,-1.18575761E+01,-1.21732226E+01,-1.24345580E+01,
     &  -8.63071854E+00,-1.28715004E+01,-1.30316655E+01,-1.31783682E+01,
     &  -1.33061204E+01,-1.34050669E+01,-1.36290947E+01,-1.34260067E+01,
     &  -1.33389716E+01,-1.24977627E+01,-1.17870343E+01, 2.62027462E-01,
     &  -1.23981588E+01,-1.18538118E+01,-1.11751088E+01,-1.02104134E+01,
     &  -9.06389277E+00,-7.54750279E+00,-5.78009419E+00, 2.63524954E+00,
     &   2.60275226E-02, 2.65376100E+00, 5.83247500E+00, 7.60625473E+00,
     &   9.14048828E+00, 1.02983151E+01, 8.69383015E+00, 9.64713724E+00,
     &   1.05664318E+01, 1.14396447E+01, 1.21225313E+01, 1.28761298E+01,
     &   1.35446769E+01, 5.12555507E+00, 5.58024574E+00, 6.05372920E+00,
     &   9.47557896E-01, 7.23842430E+00, 7.87517924E+00, 8.54188367E+00,
     &   9.33884151E+00, 1.02744103E+01, 1.12395739E+01, 1.23231224E+01,
     &   1.16755113E+01, 1.07927039E+01, 9.90371937E+00, 9.11268764E+00,
     &   8.52003584E+00, 3.32400620E+00, 8.49039338E+00, 7.75008959E+00,
     &   6.98108797E+00, 6.07133077E+00, 4.97722802E+00, 3.53637445E+00,
     &   3.03182397E+00, 2.93719099E+00, 1.96937520E+00, 2.49555494E+00,
     &   2.20342186E+00, 1.51582232E+00, 1.02098310E+00, 7.72705671E-01,
     &   6.23550228E-01, 5.24060539E-01, 4.52962351E-01, 3.99627454E-01,
     &   3.58142885E-01, 3.24947973E-01, 2.97786608E-01, 2.75153241E-01,
     &   2.56000824E-01, 2.39579302E-01, 2.25352129E-01, 2.12900771E-01/
  
         DATA ((DGS  (I,J), I=1801,1900), J=1,1) /
     &   1.50642846E-01, 1.19513046E-01, 1.00838322E-01, 8.84068593E-02,
     &   7.94874119E-02, 7.27628167E-02, 6.75517997E-02, 5.99803507E-02,
     &   5.47387296E-02, 5.26785195E-02, 5.08922177E-02, 4.44596726E-02,
     &   3.97331081E-02, 3.68889369E-02, 3.49789146E-02, 3.35997390E-02,
     &   3.25505158E-02, 3.17196481E-02, 3.10397374E-02, 3.04658971E-02,
     &   2.95249168E-02, 2.95631295E-02, 2.92012234E-02, 2.88728851E-02,
     &   2.85720689E-02, 2.82940644E-02, 2.80328925E-02, 2.77843749E-02,
     &   2.75440829E-02, 2.73067818E-02, 2.70647463E-02, 2.67974075E-02,
     &   2.66192850E-02, 2.32961139E-02, 2.25123752E-02, 2.15432032E-02,
     &   2.07748753E-02, 2.01405307E-02, 2.00671409E-02, 1.91877388E-02,
     &   1.87764049E-02, 1.84548535E-02, 1.81845451E-02, 1.79604431E-02,
     &   1.78773760E-02, 1.76441666E-02, 1.75468361E-02, 1.74870709E-02,
     &   1.74648757E-02, 1.74785585E-02, 1.75271972E-02, 1.76121173E-02,
     &   1.77089409E-02, 1.78826383E-02, 1.80759118E-02, 1.82984914E-02,
     &   1.85659779E-02, 1.88731226E-02, 1.92279636E-02, 1.96326279E-02,
     &   2.00886279E-02, 2.05966992E-02, 2.11966814E-02, 2.18834351E-02,
     &   2.26765578E-02, 2.36651416E-02, 2.49718250E-02, 2.81654180E-02,
     &   3.11842555E-02, 3.23232321E-02, 3.31485114E-02, 3.37873452E-02,
     &   3.43229648E-02, 3.47766011E-02, 3.51492640E-02, 3.54735847E-02,
     &   3.57520015E-02, 3.59881048E-02, 3.61992033E-02, 3.63441322E-02,
     &   3.64702819E-02, 3.65699709E-02, 3.66371115E-02, 3.66772012E-02,
     &   3.66889619E-02, 3.66725243E-02, 3.66297048E-02, 3.65560120E-02,
     &   3.64522192E-02, 3.63191598E-02, 3.61544921E-02, 3.59007001E-02,
     &   3.56158890E-02, 3.52972390E-02, 3.51230907E-02, 3.47519870E-02,
     &   3.43226005E-02, 3.38123881E-02, 3.32226533E-02, 3.25045753E-02/
  
         DATA ((DGS  (I,J), I=1901,2000), J=1,1) /
     &   3.16010660E-02, 3.03758597E-02, 2.82160678E-02, 2.81003026E-02,
     &   2.74729049E-02, 2.72920941E-02, 2.69121214E-02, 2.67357647E-02,
     &   2.65943035E-02, 2.64768617E-02, 2.63778360E-02, 2.62932315E-02,
     &   2.61802484E-02, 2.61581609E-02, 2.61046262E-02, 2.60592578E-02,
     &   2.60159298E-02, 2.59892375E-02, 2.59640822E-02, 2.59448041E-02,
     &   2.59311169E-02, 2.59229111E-02, 2.58480644E-02, 2.58561260E-02,
     &   2.59307726E-02, 2.59434315E-02, 2.59647520E-02, 2.59913663E-02,
     &   2.60242413E-02, 2.60641051E-02, 2.61116906E-02, 2.61681362E-02,
     &   2.62343194E-02, 2.63128557E-02, 2.64061190E-02, 2.65099454E-02,
     &   2.66625605E-02, 2.68592775E-02, 2.73663969E-02, 2.77487235E-02,
     &   2.79982491E-02, 2.81314088E-02, 2.82395595E-02, 2.83306115E-02,
     &   2.84096142E-02, 2.84790162E-02, 2.85400658E-02, 2.85940713E-02,
     &   2.86420127E-02, 2.86853158E-02, 2.87242378E-02, 2.87581584E-02,
     &   2.87869613E-02, 2.88109279E-02, 2.88306173E-02, 2.88472304E-02,
     &   2.88610815E-02, 2.88716892E-02, 2.88878823E-02, 2.88830533E-02,
     &   2.88828436E-02, 2.88796519E-02, 2.88736254E-02, 2.88640372E-02,
     &   2.88508207E-02, 2.88342940E-02, 2.88139061E-02, 2.87898692E-02,
     &   2.87619678E-02, 2.87646180E-02, 2.87331885E-02, 2.86958251E-02,
     &   2.86510033E-02, 2.85547270E-02, 2.81594428E-02, 2.82415472E-02,
     &   2.82313831E-02, 2.82225694E-02, 2.82151055E-02, 2.82089809E-02,
     &   2.82041753E-02, 2.82006324E-02, 2.81983289E-02, 2.81972516E-02,
     &   2.81901256E-02, 2.81907446E-02, 2.81946183E-02, 2.80513662E-02,
     &   2.80570460E-02, 2.80644321E-02, 2.82169432E-02, 2.82260346E-02,
     &   2.82366144E-02, 2.82487574E-02, 2.82626870E-02, 2.82781645E-02,
     &   2.82955561E-02, 2.83149552E-02, 2.83364503E-02, 2.83603703E-02/
  
         DATA ((DGS  (I,J), I=2001,2100), J=1,1) /
     &   2.83865826E-02, 2.84160144E-02, 2.84489051E-02, 2.84858115E-02,
     &   2.85273561E-02, 2.85753479E-02, 2.86319091E-02, 2.87015602E-02,
     &   2.87953182E-02, 2.90327639E-02, 2.92705516E-02, 2.93671775E-02,
     &   2.94778199E-02, 2.95470380E-02, 2.96067330E-02, 2.95750315E-02,
     &   2.96159016E-02, 2.96530794E-02, 2.96871063E-02, 2.97181750E-02,
     &   2.97473290E-02, 2.97743703E-02, 2.97996713E-02, 2.98233150E-02,
     &   2.98452896E-02, 2.98660159E-02, 2.98852214E-02, 2.99029212E-02,
     &   2.99207407E-02, 2.99358164E-02, 2.99491172E-02, 2.99622662E-02,
     &   2.99743254E-02, 2.99854219E-02, 2.99955505E-02, 3.00047098E-02,
     &   3.00128960E-02, 3.00201822E-02, 3.00265016E-02, 3.00319139E-02,
     &   3.00402184E-02, 3.00427295E-02, 3.00443544E-02, 3.00449710E-02,
     &   3.00443566E-02, 3.00270242E-02, 2.98805443E-02, 2.96831396E-02,
     &   2.96591635E-02, 2.95632580E-02, 2.94866697E-02, 2.94121114E-02,
     &   2.93486123E-02, 2.92851521E-02, 2.92249271E-02, 2.91603852E-02,
     &   2.90921420E-02, 2.90223362E-02, 2.88565805E-02, 2.86908248E-02,
     &   2.87544446E-02, 2.88145261E-02, 2.88673311E-02, 2.89187469E-02,
     &   2.89650337E-02, 2.90109700E-02, 2.90529667E-02, 2.90951728E-02,
     &   2.91359057E-02, 2.91736858E-02, 2.92121127E-02, 2.92479721E-02,
     &   2.92846348E-02, 2.93190000E-02, 2.93542693E-02, 2.93874375E-02,
     &   2.94215760E-02, 2.94537612E-02, 2.94869605E-02, 2.95183207E-02,
     &   2.95493231E-02, 2.95813792E-02, 2.96117243E-02, 2.96431385E-02,
     &   2.96729082E-02, 2.97037568E-02, 2.97330160E-02, 2.97633597E-02,
     &   2.97921609E-02, 2.98220490E-02, 2.98504348E-02, 2.98799080E-02,
     &   2.99091825E-02, 2.99370057E-02, 2.99659141E-02, 2.99934002E-02,
     &   3.00219688E-02, 3.00491409E-02, 3.00773921E-02, 3.01042702E-02/
  
         DATA ((DGS  (I,J), I=2101,2174), J=1,1) /
     &   3.01322234E-02, 3.01588249E-02, 3.01864970E-02, 3.02128370E-02,
     &   3.02390541E-02, 3.02663350E-02, 3.02923102E-02, 3.03193441E-02,
     &   3.03450888E-02, 3.03643852E-02, 3.03925906E-02, 3.04192930E-02,
     &   3.04447385E-02, 3.04712422E-02, 3.04965014E-02, 3.05228141E-02,
     &   3.05490318E-02, 3.05740223E-02, 3.06000590E-02, 3.06248794E-02,
     &   3.06507411E-02, 3.06753967E-02, 3.07010889E-02, 3.07259025E-02,
     &   3.07517331E-02, 3.07758743E-02, 3.08012834E-02, 3.08254745E-02,
     &   3.08506869E-02, 3.08747291E-02, 3.08986998E-02, 3.09236845E-02,
     &   3.09475116E-02, 3.09723480E-02, 3.09960347E-02, 3.10207261E-02,
     &   3.10442757E-02, 3.11442182E-02, 3.11676048E-02, 3.11919411E-02,
     &   3.12151118E-02, 3.12392241E-02, 3.14237837E-02, 3.16760362E-02,
     &   3.17157605E-02, 3.34875663E-02, 3.42863732E-02, 3.63845664E-02,
     &   3.77896740E-02, 3.76208077E-02, 3.91979899E-02, 3.92029911E-02,
     &   4.03860531E-02, 4.04313042E-02, 4.04584371E-02, 4.10459876E-02,
     &   4.14373151E-02, 4.15075512E-02, 4.16223442E-02, 4.17924849E-02,
     &   4.19125308E-02, 4.19879290E-02, 4.27194314E-02, 4.27574381E-02,
     &   4.29802554E-02, 4.30202224E-02, 4.36358857E-02, 4.32648045E-02,
     &   4.33884885E-02, 4.34423248E-02, 4.35284146E-02, 4.37522516E-02,
     &   4.38474024E-02, 4.44771095E-02/
  
         DATA ((DGS  (I,J), I=   1, 100), J=2,2) /
     &   3.49887389E-06, 3.90964074E-06, 4.24306934E-06, 4.59201611E-06,
     &   5.02142293E-06, 4.92378846E-06, 7.93488737E-06, 6.13483537E-06,
     &   6.79585914E-06, 7.70782118E-06, 7.29401227E-06, 7.29141472E-06,
     &   7.06805679E-06, 7.46083544E-06, 7.87270982E-06, 8.31510360E-06,
     &   8.54532417E-06, 8.66635216E-06, 8.71107972E-06, 8.88180049E-06,
     &   9.08905468E-06, 9.30878959E-06, 9.41799325E-06, 9.54992092E-06,
     &   9.74549484E-06, 1.01127025E-05, 1.06161062E-05, 1.08487366E-05,
     &   1.09261326E-05, 1.11878912E-05, 1.15127138E-05, 1.16156372E-05,
     &   1.19793277E-05, 1.23441965E-05, 1.27378497E-05, 1.31799374E-05,
     &   1.36615989E-05, 1.43440750E-05, 1.49539026E-05, 1.55812139E-05,
     &   1.62547102E-05, 1.70772680E-05, 1.80327935E-05, 1.89440107E-05,
     &   2.04500579E-05, 2.27266071E-05, 2.45372835E-05, 2.51815349E-05,
     &   2.51369464E-05, 2.46985360E-05, 3.02153979E-05, 3.62033073E-05,
     &   4.16662717E-05, 4.28047827E-05, 4.67877758E-05, 4.74875383E-05,
     &   4.28900748E-05, 3.95996255E-05, 3.78661559E-05, 3.77421319E-05,
     &   3.89904051E-05, 3.88826833E-05, 3.97639427E-05, 3.95580284E-05,
     &   4.11624008E-05, 4.24362857E-05, 4.42067191E-05, 4.66419241E-05,
     &   4.82288388E-05, 4.91466609E-05, 5.30499125E-05, 5.01664363E-05,
     &   5.07239971E-05, 5.18895883E-05, 5.47844423E-05, 5.47502967E-05,
     &   5.24597672E-05, 5.27351756E-05, 5.29916175E-05, 1.27257657E-04,
     &   1.06998401E-04, 1.12126938E-04, 1.07513764E-04, 1.03358958E-04,
     &   9.27648367E-05, 9.25805072E-05, 9.67757073E-05, 9.23693335E-05,
     &   9.23130809E-05, 9.22235093E-05, 8.93393104E-05, 9.11023140E-05,
     &   9.26257148E-05, 9.85609349E-05, 1.10007439E-04, 1.26892456E-04,
     &   1.18748637E-04, 1.10482661E-04, 9.89998775E-05, 9.05976190E-05/
  
         DATA ((DGS  (I,J), I= 101, 200), J=2,2) /
     &   8.30141622E-05, 7.98702922E-05, 8.04291442E-05, 8.46731411E-05,
     &   9.14639816E-05, 9.70581819E-05, 1.02541055E-04, 1.07912600E-04,
     &   1.12174649E-04, 1.16374286E-04, 1.20122546E-04, 1.19677584E-04,
     &   1.19219000E-04, 1.18735443E-04, 1.15367065E-04, 1.09013639E-04,
     &   9.80022906E-05, 7.52397532E-05, 8.52414936E-05, 9.77664243E-05,
     &   1.07296757E-04, 1.14563075E-04, 1.17826599E-04, 1.20411074E-04,
     &   1.18997198E-04, 1.13895037E-04, 1.07079923E-04, 9.87763577E-05,
     &   9.01823575E-05, 8.07065413E-05, 7.44304609E-05, 7.32308015E-05,
     &   7.94592741E-05, 9.11174967E-05, 1.06434257E-04, 1.21115098E-04,
     &   1.30435774E-04, 1.28825511E-04, 1.14887844E-04, 1.00476122E-04,
     &   1.00368601E-04, 9.43204963E-05, 9.00096150E-05, 8.37633528E-05,
     &   8.02149219E-05, 7.81070762E-05, 7.62682068E-05, 7.79496921E-05,
     &   7.62613233E-05, 7.54851659E-05, 7.18896202E-05, 7.71249938E-05,
     &   7.76873781E-05, 6.57362936E-05, 5.37852092E-05, 4.99201209E-05,
     &   4.81075769E-05, 4.60514890E-05, 4.57163976E-05, 4.33445547E-05,
     &   4.53498177E-05, 5.35380399E-05, 5.57442227E-05, 5.32944564E-05,
     &   5.04930581E-05, 4.79381560E-05, 4.71995292E-05, 4.64583582E-05,
     &   4.56091345E-05, 4.57049775E-05, 4.60062226E-05, 4.57851510E-05,
     &   4.77624648E-05, 4.85346257E-05, 4.97922213E-05, 5.05964980E-05,
     &   5.10636511E-05, 5.14140227E-05, 5.24240949E-05, 5.28938408E-05,
     &   5.42536330E-05, 5.49873194E-05, 5.69696057E-05, 5.88464754E-05,
     &   6.21201752E-05, 6.49085112E-05, 6.89801600E-05, 7.24844814E-05,
     &   7.68119914E-05, 8.27170508E-05, 8.63714540E-05, 8.90592385E-05,
     &   9.52066339E-05, 9.86071357E-05, 1.01997532E-04, 1.05996626E-04,
     &   1.10518179E-04, 1.15995098E-04, 1.21451174E-04, 1.31835231E-04/
  
         DATA ((DGS  (I,J), I= 201, 300), J=2,2) /
     &   1.43239864E-04, 1.50422335E-04, 1.53213397E-04, 1.56167379E-04,
     &   1.59294041E-04, 1.62605081E-04, 1.66103868E-04, 1.69720972E-04,
     &   1.73414512E-04, 1.77299481E-04, 1.81382467E-04, 1.85674020E-04,
     &   1.90186669E-04, 1.94862275E-04, 1.99766100E-04, 2.05000350E-04,
     &   2.10543369E-04, 2.16444563E-04, 2.22776344E-04, 2.29588913E-04,
     &   2.36948092E-04, 2.44924578E-04, 2.53592110E-04, 2.63034861E-04,
     &   2.73349581E-04, 2.84723291E-04, 2.97227986E-04, 3.11320995E-04,
     &   3.27693593E-04, 3.49196705E-04, 3.69075808E-04, 3.95924648E-04,
     &   3.65545251E-04, 3.66446931E-04, 3.74902683E-04, 3.86044433E-04,
     &   4.01917618E-04, 4.17661770E-04, 4.36452741E-04, 4.54452469E-04,
     &   4.75786092E-04, 4.99384359E-04, 5.21042282E-04, 5.54151029E-04,
     &   5.87259777E-04, 6.23830040E-04, 6.65121116E-04, 7.12009915E-04,
     &   7.65569653E-04, 8.27097825E-04, 8.98045618E-04, 9.79999537E-04,
     &   1.07592961E-03, 1.16922851E-03, 1.22039244E-03, 1.25529597E-03,
     &   1.30287305E-03, 1.32610782E-03, 1.31252070E-03, 1.39758089E-03,
     &   1.43128195E-03, 1.46195392E-03, 1.48923133E-03, 1.51095085E-03,
     &   1.52458646E-03, 1.52716303E-03, 1.50299072E-03, 1.45977053E-03,
     &   1.42898942E-03, 1.34519354E-03, 1.22772042E-03, 1.07295981E-03,
     &   8.20588126E-04, 6.52885023E-04, 4.00523577E-04, 1.63629412E-04,
     &   2.26708326E-04, 4.78649904E-04, 7.24661266E-04, 9.41891997E-04,
     &   1.12294866E-03, 1.26643128E-03, 1.37326087E-03, 1.44819136E-03,
     &   1.49607015E-03, 1.52167240E-03, 1.52973645E-03, 1.52453678E-03,
     &   1.50944867E-03, 1.48707652E-03, 1.44497135E-03, 1.43363588E-03,
     &   1.37404568E-03, 1.35934937E-03, 1.32781182E-03, 1.29370114E-03,
     &   1.26035106E-03, 1.22830554E-03, 1.19632623E-03, 1.16353725E-03/
  
         DATA ((DGS  (I,J), I= 301, 400), J=2,2) /
     &   1.15925267E-03, 1.10472007E-03, 1.07583456E-03, 1.04806831E-03,
     &   9.61884333E-04, 8.88815497E-04, 8.28764577E-04, 7.76223994E-04,
     &   7.30540529E-04, 6.81516503E-04, 6.56080659E-04, 6.25692134E-04,
     &   5.98994151E-04, 5.75469216E-04, 5.54690583E-04, 5.36312570E-04,
     &   5.20052760E-04, 5.05594414E-04, 4.92664363E-04, 4.81014016E-04,
     &   3.95102034E-04, 3.83064705E-04, 3.85050831E-04, 3.65304887E-04,
     &   3.65852884E-04, 4.03446834E-04, 4.00767498E-04, 3.49982190E-04,
     &   3.34027556E-04, 3.24396076E-04, 3.17180993E-04, 3.11466235E-04,
     &   3.06473395E-04, 3.00045407E-04, 2.96108906E-04, 2.90553469E-04,
     &   2.85297310E-04, 2.79873288E-04, 2.74552282E-04, 2.69073397E-04,
     &   2.63526023E-04, 2.57492857E-04, 2.51153192E-04, 2.45355346E-04,
     &   2.39752351E-04, 2.34237827E-04, 2.28965244E-04, 2.23932928E-04,
     &   2.19142008E-04, 2.14608827E-04, 2.10351687E-04, 2.06221837E-04,
     &   2.01912507E-04, 1.97777420E-04, 1.93811448E-04, 1.90045589E-04,
     &   1.80215906E-04, 1.59170564E-04, 1.30164874E-04, 1.15653557E-04,
     &   1.04438498E-04, 9.62431143E-05, 8.93998658E-05, 8.36651239E-05,
     &   7.79084116E-05, 7.70137952E-05, 7.13888508E-05, 7.13515264E-05,
     &   7.06102091E-05, 6.77395653E-05, 6.71523868E-05, 6.61111420E-05,
     &   6.49848011E-05, 6.50027382E-05, 6.25106371E-05, 6.47037575E-05,
     &   6.17909264E-05, 6.16799934E-05, 6.15518863E-05, 6.26939853E-05,
     &   6.04012668E-05, 6.25927189E-05, 5.96514740E-05, 6.12400702E-05,
     &   6.04447068E-05, 6.23037039E-05, 6.42413495E-05, 6.22510110E-05,
     &   6.51896485E-05, 6.44270060E-05, 6.56588312E-05, 6.91794591E-05,
     &   6.88020946E-05, 7.51666755E-05, 7.39232298E-05, 7.90206034E-05,
     &   8.38720671E-05, 9.59111320E-05, 9.47490338E-05, 9.30893052E-05/
  
         DATA ((DGS  (I,J), I= 401, 500), J=2,2) /
     &   1.01916458E-04, 1.12336537E-04, 1.18673574E-04, 1.13973934E-04,
     &   1.12715598E-04, 1.17578416E-04, 1.24741453E-04, 1.30984509E-04,
     &   1.31933204E-04, 1.26397042E-04, 1.32956151E-04, 1.34314218E-04,
     &   1.38405233E-04, 1.52222496E-04, 1.48028556E-04, 1.37813184E-04,
     &   1.42629818E-04, 1.36009759E-04, 1.38016945E-04, 1.52660145E-04,
     &   1.54849587E-04, 1.58543650E-04, 1.68095493E-04, 1.68843748E-04,
     &   1.65526434E-04, 1.83033289E-04, 1.84419224E-04, 2.08982322E-04,
     &   2.09478638E-04, 2.11182460E-04, 2.27672955E-04, 2.28052793E-04,
     &   2.35204533E-04, 2.55720287E-04, 2.76444782E-04, 2.55158321E-04,
     &   2.56246523E-04, 2.54775951E-04, 2.71177143E-04, 3.07554140E-04,
     &   3.01493619E-04, 3.10237232E-04, 2.98452782E-04, 3.00438397E-04,
     &   2.92591522E-04, 2.87824879E-04, 3.29042954E-04, 2.99729003E-04,
     &   3.16287197E-04, 2.83878443E-04, 3.31423246E-04, 3.28756240E-04,
     &   3.29801694E-04, 3.32761651E-04, 3.06762777E-04, 2.79475319E-04,
     &   2.67320016E-04, 2.80542712E-04, 3.09919077E-04, 3.13090866E-04,
     &   3.11115500E-04, 3.05755628E-04, 3.07086667E-04, 2.97559622E-04,
     &   3.02965774E-04, 3.02273109E-04, 2.85352967E-04, 2.92551112E-04,
     &   3.08276806E-04, 2.95184938E-04, 3.03019299E-04, 2.90110466E-04,
     &   3.02001544E-04, 3.03053628E-04, 3.02983021E-04, 3.11555984E-04,
     &   3.21141505E-04, 2.98496735E-04, 2.99450741E-04, 2.79848418E-04,
     &   2.75762779E-04, 3.10917173E-04, 3.29377997E-04, 3.25713146E-04,
     &   2.80962703E-04, 3.02451424E-04, 3.16566306E-04, 3.31554612E-04,
     &   3.07925651E-04, 3.14059454E-04, 3.18613785E-04, 3.21318661E-04,
     &   3.37775958E-04, 3.39190790E-04, 3.14593414E-04, 3.04772737E-04,
     &   3.48667913E-04, 3.83599679E-04, 3.59916681E-04, 3.99469552E-04/
  
         DATA ((DGS  (I,J), I= 501, 600), J=2,2) /
     &   3.86566692E-04, 3.26413074E-04, 2.42486170E-04, 2.32839171E-04,
     &   2.37554966E-04, 2.35528324E-04, 2.13315755E-04, 2.04065632E-04,
     &   2.06708213E-04, 2.17814451E-04, 2.34778889E-04, 2.57870871E-04,
     &   2.89120215E-04, 3.33370532E-04, 3.98427766E-04, 4.97578946E-04,
     &   5.25989995E-04, 5.54465919E-04, 5.88174574E-04, 6.26830148E-04,
     &   6.71045357E-04, 7.21694252E-04, 7.81144349E-04, 7.94054188E-04,
     &   8.07512696E-04, 8.21498767E-04, 8.36014766E-04, 8.51079349E-04,
     &   8.66228433E-04, 8.81995750E-04, 8.98407418E-04, 9.15506196E-04,
     &   9.33248419E-04, 1.02219060E-03, 1.09145998E-03, 1.12970916E-03,
     &   1.15658502E-03, 1.18471653E-03, 1.21426380E-03, 1.24524139E-03,
     &   1.27779042E-03, 1.31202297E-03, 1.32981613E-03, 1.34810213E-03,
     &   1.36687289E-03, 1.38617533E-03, 1.40600425E-03, 1.42640849E-03,
     &   1.44738599E-03, 1.46898786E-03, 1.49121546E-03, 1.51412254E-03,
     &   1.53771440E-03, 1.56203674E-03, 1.58712347E-03, 1.61301072E-03,
     &   1.63973707E-03, 1.66734366E-03, 1.69587442E-03, 1.72537628E-03,
     &   1.75589946E-03, 1.78749770E-03, 1.82022862E-03, 1.85415404E-03,
     &   1.88934036E-03, 1.92585902E-03, 1.96378697E-03, 2.00320720E-03,
     &   2.04420936E-03, 2.08689042E-03, 2.13135542E-03, 2.17771839E-03,
     &   2.22610620E-03, 2.27665139E-03, 2.32950133E-03, 2.38481713E-03,
     &   2.44277528E-03, 2.50356952E-03, 2.56741300E-03, 2.63454080E-03,
     &   2.70521279E-03, 2.77971700E-03, 2.81850385E-03, 2.85837353E-03,
     &   2.89936787E-03, 2.94153916E-03, 2.98493479E-03, 3.02961277E-03,
     &   3.07562683E-03, 3.12304166E-03, 3.17191835E-03, 3.22232927E-03,
     &   3.27434405E-03, 3.32804411E-03, 3.38350899E-03, 3.44083071E-03,
     &   3.50010050E-03, 3.56142280E-03, 3.62490263E-03, 3.69065921E-03/
  
         DATA ((DGS  (I,J), I= 601, 700), J=2,2) /
     &   3.75881318E-03, 3.82950311E-03, 3.90286838E-03, 3.97906592E-03,
     &   4.05826289E-03, 4.14063983E-03, 4.22639211E-03, 4.31573141E-03,
     &   4.40888751E-03, 4.50611023E-03, 4.60767170E-03, 4.71386885E-03,
     &   4.82502639E-03, 4.94149972E-03, 5.06367904E-03, 5.19199550E-03,
     &   5.32692178E-03, 5.46898348E-03, 5.61876029E-03, 5.77689966E-03,
     &   6.01372891E-03, 6.12122895E-03, 6.30912760E-03, 6.50883468E-03,
     &   6.72149755E-03, 6.94842063E-03, 7.19108608E-03, 7.45119228E-03,
     &   7.73068756E-03, 8.03182515E-03, 8.35721801E-03, 8.70992081E-03,
     &   9.09352017E-03, 9.39974269E-03, 1.03537026E-02, 1.15219351E-02,
     &   1.29857556E-02, 1.48735844E-02, 1.74008216E-02, 2.09584954E-02,
     &   2.63380582E-02, 3.54201430E-02, 5.40292516E-02, 1.13609470E-01,
     &   1.20135208E-01, 1.27453341E-01, 1.35716944E-01, 1.45121053E-01,
     &   1.55918010E-01, 1.68440043E-01, 1.83133341E-01, 2.00611007E-01,
     &   2.21738188E-01, 2.47774291E-01, 2.80621472E-01, 3.23281598E-01,
     &   3.80746368E-01, 3.87597667E-01, 5.41006998E-01, 6.52822405E-01,
     &   7.42659627E-01, 8.20790466E-01, 8.80996528E-01, 9.33601384E-01,
     &   9.75760511E-01, 1.01776034E+00, 1.04661173E+00, 1.07332573E+00,
     &   1.09217609E+00, 1.10771609E+00, 1.11644880E+00, 1.12296720E+00,
     &   1.12352148E+00, 1.12024092E+00, 1.11114337E+00, 1.10131108E+00,
     &   1.08004370E+00, 1.06098830E+00, 1.03759798E+00, 1.00950481E+00,
     &   9.76355859E-01, 9.37826541E-01, 8.93636208E-01, 8.43565579E-01,
     &   7.87475400E-01, 7.25325389E-01, 6.57192207E-01, 5.44270394E-01,
     &   4.62409827E-01, 3.31188634E-01, 1.92153047E-01, 1.92020459E-01,
     &   5.44154292E-01, 6.57085435E-01, 7.57059659E-01, 8.16188965E-01,
     &   8.93558506E-01, 9.37756457E-01, 9.76293350E-01, 1.00944977E+00/
  
         DATA ((DGS  (I,J), I= 701, 800), J=2,2) /
     &   1.03755023E+00, 1.06094765E+00, 1.08000990E+00, 1.09510880E+00,
     &   1.10661128E+00, 1.11487266E+00, 1.12023173E+00, 1.12352034E+00,
     &   1.12297105E+00, 1.11869142E+00, 1.11095930E+00, 1.10422691E+00,
     &   1.08775907E+00, 1.07335914E+00, 1.05220573E+00, 1.02952526E+00,
     &   9.99934451E-01, 9.69768278E-01, 9.27703003E-01, 8.86776869E-01,
     &   8.36774988E-01, 7.80380967E-01, 7.07844781E-01, 6.24691950E-01,
     &   5.20862851E-01, 4.29205353E-01, 3.58008045E-01, 3.06634395E-01,
     &   2.67952378E-01, 2.37832848E-01, 2.13742853E-01, 1.94050320E-01,
     &   1.77659417E-01, 1.63808429E-01, 1.51952099E-01, 1.41690181E-01,
     &   1.32722418E-01, 1.24819256E-01, 1.17802252E-01, 1.11530632E-01,
     &   1.05891876E-01, 1.00794980E-01, 9.61655578E-02, 5.04261383E-02,
     &   3.41763547E-02, 2.58521923E-02, 2.07924602E-02, 1.73917891E-02,
     &   1.49491605E-02, 1.31097293E-02, 1.16746279E-02, 1.05237497E-02,
     &   9.58027261E-03, 9.46852895E-03, 8.68934727E-03, 8.02927955E-03,
     &   7.46295500E-03, 6.97173032E-03, 6.54159846E-03, 6.16183182E-03,
     &   5.82407555E-03, 5.52172591E-03, 5.24949435E-03, 5.00309562E-03,
     &   4.77902075E-03, 4.57436856E-03, 4.38671983E-03, 4.21404110E-03,
     &   4.05461074E-03, 3.90696140E-03, 3.76983469E-03, 3.64214532E-03,
     &   3.52295228E-03, 3.41143567E-03, 3.30687780E-03, 3.20864776E-03,
     &   3.11618867E-03, 3.02900715E-03, 2.94666453E-03, 2.86876942E-03,
     &   2.79497158E-03, 2.72495660E-03, 2.65844143E-03, 2.59517062E-03,
     &   2.53491296E-03, 2.47745873E-03, 2.42261725E-03, 2.37021474E-03,
     &   2.32009252E-03, 2.27210538E-03, 2.22612022E-03, 2.18201475E-03,
     &   2.13967648E-03, 2.09900173E-03, 2.05989477E-03, 2.02226710E-03,
     &   1.98603676E-03, 1.95112775E-03, 1.91746950E-03, 1.88499638E-03/
  
         DATA ((DGS  (I,J), I= 801, 900), J=2,2) /
     &   1.85364729E-03, 1.82336527E-03, 1.79409717E-03, 1.76579329E-03,
     &   1.73840718E-03, 1.71189533E-03, 1.68621692E-03, 1.66133370E-03,
     &   1.63720970E-03, 1.61381113E-03, 1.59110618E-03, 1.56906489E-03,
     &   1.54765904E-03, 1.52686199E-03, 1.50664861E-03, 1.48699514E-03,
     &   1.46787914E-03, 1.44927936E-03, 1.43117570E-03, 1.41354914E-03,
     &   1.39638163E-03, 1.37965608E-03, 1.36335628E-03, 1.34746685E-03,
     &   1.33197320E-03, 1.31686150E-03, 1.30211861E-03, 1.28773209E-03,
     &   1.27369011E-03, 1.25998150E-03, 1.24659566E-03, 1.23352260E-03,
     &   1.22075288E-03, 1.20827763E-03, 1.19608854E-03, 1.18417789E-03,
     &   1.17253860E-03, 1.16116418E-03, 1.15004881E-03, 1.13918744E-03,
     &   1.12857587E-03, 1.11821093E-03, 1.10809072E-03, 1.09821488E-03,
     &   1.08858517E-03, 1.08013007E-03, 1.06960417E-03, 1.06018765E-03,
     &   1.05095142E-03, 1.04189056E-03, 1.03300032E-03, 1.02427613E-03,
     &   1.01571359E-03, 1.00730852E-03, 9.99056851E-04, 9.90951928E-04,
     &   7.63238789E-04, 6.14875014E-04, 5.20541343E-04, 5.03992776E-04,
     &   5.47521030E-04, 5.85026397E-04, 6.40023449E-04, 7.20005535E-04,
     &   8.03136914E-04, 9.16225370E-04, 9.63266287E-04, 1.07578526E-03,
     &   1.14361489E-03, 1.22169653E-03, 1.31179621E-03, 1.41726280E-03,
     &   1.54208799E-03, 1.69189280E-03, 1.87475980E-03, 2.10276479E-03,
     &   2.39459895E-03, 2.53547563E-03, 2.69404222E-03, 2.87379551E-03,
     &   3.07926582E-03, 3.31637383E-03, 3.59297010E-03, 3.74928869E-03,
     &   3.91979886E-03, 4.10651312E-03, 4.31185602E-03, 4.53874842E-03,
     &   4.79076760E-03, 5.07231823E-03, 5.38890868E-03, 5.74749819E-03,
     &   6.15702882E-03, 6.62916594E-03, 7.17943783E-03, 7.80074439E-03,
     &   8.20750533E-03, 8.65887090E-03, 9.16259660E-03, 9.72834704E-03/
  
         DATA ((DGS  (I,J), I= 901,1000), J=2,2) /
     &   1.03683197E-02, 1.10981343E-02, 1.19381210E-02, 1.29152414E-02,
     &   1.40660305E-02, 1.54412551E-02, 1.71135857E-02, 1.91908222E-02,
     &   2.18400034E-02, 2.53344840E-02, 3.01542378E-02, 3.72255005E-02,
     &   4.85913100E-02, 6.97816890E-02, 1.03110087E-01, 1.22079273E-01,
     &   1.42769859E-01, 1.93678363E-01, 2.12019481E-01, 2.27156808E-01,
     &   2.40011908E-01, 2.50836634E-01, 2.59717767E-01, 2.67364892E-01,
     &   2.73626400E-01, 2.78107768E-01, 2.81914880E-01, 2.84609976E-01,
     &   2.86208490E-01, 2.86785826E-01, 2.86375841E-01, 2.85255565E-01,
     &   2.82981991E-01, 2.80006908E-01, 2.75996659E-01, 2.70836971E-01,
     &   2.65411520E-01, 2.57810096E-01, 2.50124894E-01, 2.41291855E-01,
     &   2.31254288E-01, 2.17960458E-01, 2.05172712E-01, 1.88610379E-01,
     &   1.73015982E-01, 1.50280103E-01, 1.25467425E-01, 8.84081019E-02,
     &   5.61046818E-02, 1.88965212E-02, 2.66794158E-04, 1.88021566E-02,
     &   3.75272571E-02, 8.83186484E-02, 1.25383420E-01, 1.50201013E-01,
     &   1.72942433E-01, 1.88541300E-01, 2.05109092E-01, 2.17901653E-01,
     &   2.31201183E-01, 2.41243649E-01, 2.50081555E-01, 2.57771555E-01,
     &   2.65378451E-01, 2.70808458E-01, 2.75973279E-01, 2.79988447E-01,
     &   2.82968222E-01, 2.85246874E-01, 2.86371341E-01, 2.86786374E-01,
     &   2.86213716E-01, 2.84619984E-01, 2.81929679E-01, 2.78127275E-01,
     &   2.73650129E-01, 2.67393291E-01, 2.59750748E-01, 2.50873985E-01,
     &   2.40053677E-01, 2.27202934E-01, 2.12069864E-01, 1.93732985E-01,
     &   1.71502882E-01, 1.83571798E-01, 1.57035051E-01, 1.40690045E-01,
     &   1.30808395E-01, 1.10338158E-01, 1.03177041E-01, 8.77615383E-02,
     &   5.68260291E-02, 4.19283787E-02, 3.32013530E-02, 2.74766234E-02,
     &   2.34345899E-02, 2.04292718E-02, 1.81075281E-02, 1.62601348E-02/
  
         DATA ((DGS  (I,J), I=1001,1100), J=2,2) /
     &   1.47552956E-02, 1.35058758E-02, 1.24519695E-02, 1.15510405E-02,
     &   1.07720530E-02, 1.00918315E-02, 9.49272240E-03, 8.96104259E-03,
     &   8.48602214E-03, 8.05906886E-03, 7.38415662E-03, 6.54171364E-03,
     &   6.09115157E-03, 5.35490645E-03, 4.77877775E-03, 4.21385928E-03,
     &   3.41191202E-03, 2.52990082E-03, 2.00886074E-03, 1.79231924E-03,
     &   1.67140891E-03, 1.59269060E-03, 1.53712622E-03, 1.49523865E-03,
     &   1.46237286E-03, 1.43570079E-03, 1.41339762E-03, 1.39437575E-03,
     &   1.37781217E-03, 1.36314231E-03, 1.34996824E-03, 1.33794586E-03,
     &   1.32687043E-03, 1.31652202E-03, 1.30672457E-03, 1.29743099E-03,
     &   1.28847263E-03, 1.27975908E-03, 1.27124034E-03, 1.26284204E-03,
     &   1.25448079E-03, 1.24608114E-03, 1.23756884E-03, 1.22888121E-03,
     &   1.21990954E-03, 1.21053654E-03, 1.20059118E-03, 1.18987392E-03,
     &   1.17800686E-03, 1.16429267E-03, 1.14699172E-03, 1.10809736E-03,
     &   1.07495534E-03, 1.06366114E-03, 1.05619824E-03, 1.05080838E-03,
     &   1.04677114E-03, 1.04370860E-03, 1.04137987E-03, 1.03959136E-03,
     &   1.03821762E-03, 1.03714174E-03, 1.03626331E-03, 1.03546777E-03,
     &   1.03470480E-03, 1.03387561E-03, 1.03272128E-03, 1.03152160E-03,
     &   1.02981279E-03, 1.02770408E-03, 1.02501079E-03, 1.02164113E-03,
     &   1.01751588E-03, 1.01241235E-03, 1.00626740E-03, 9.98907683E-04,
     &   9.90045473E-04, 9.79337781E-04, 9.67125131E-04, 9.52348322E-04,
     &   9.34829714E-04, 9.13611330E-04, 8.88227927E-04, 8.55674552E-04,
     &   8.14540355E-04, 7.57272057E-04, 7.40940983E-04, 6.91698615E-04,
     &   6.23217065E-04, 6.16734271E-04, 5.73401091E-04, 5.59563505E-04,
     &   5.48470797E-04, 5.32979065E-04, 5.19762613E-04, 5.07557840E-04,
     &   5.00566274E-04, 4.96300147E-04, 4.85813291E-04, 4.75198220E-04/
  
         DATA ((DGS  (I,J), I=1101,1200), J=2,2) /
     &   4.66165272E-04, 4.57565198E-04, 4.49772088E-04, 4.42720613E-04,
     &   4.36012661E-04, 4.30237099E-04, 4.24700551E-04, 4.18013425E-04,
     &   4.11326299E-04, 4.04639173E-04, 3.99019623E-04, 3.93011669E-04,
     &   3.89567206E-04, 3.85056747E-04, 3.85247171E-04, 3.81615876E-04,
     &   3.77708841E-04, 3.74446729E-04, 3.76112153E-04, 3.75346273E-04,
     &   3.75410454E-04, 3.75563142E-04, 3.74105177E-04, 3.85140401E-04,
     &   3.94924494E-04, 4.56939506E-04, 5.24640699E-04, 4.85264924E-04,
     &   3.73241451E-04, 3.84168986E-04, 3.81413538E-04, 4.14092232E-04,
     &   4.03213590E-04, 3.83150865E-04, 3.60889708E-04, 3.52713402E-04,
     &   3.44684210E-04, 3.40334442E-04, 3.39619518E-04, 3.33969936E-04,
     &   3.29939800E-04, 3.29700384E-04, 3.30474068E-04, 3.29166626E-04,
     &   3.28725950E-04, 3.26452040E-04, 3.25000878E-04, 3.23235518E-04,
     &   3.22021019E-04, 3.25261614E-04, 3.25025371E-04, 3.29348218E-04,
     &   3.28793696E-04, 3.68586622E-04, 3.94998359E-04, 3.90368528E-04,
     &   3.71332842E-04, 3.61413729E-04, 3.33754836E-04, 3.22760380E-04,
     &   3.54697365E-04, 4.00377549E-04, 4.00059868E-04, 3.27616716E-04,
     &   3.26514993E-04, 3.22586488E-04, 3.27656519E-04, 3.14118758E-04,
     &   3.10915033E-04, 3.13497152E-04, 3.10644780E-04, 3.03487213E-04,
     &   3.02295193E-04, 3.01590692E-04, 3.06490986E-04, 3.01833807E-04,
     &   2.95832455E-04, 2.95312396E-04, 3.16538340E-04, 3.22814327E-04,
     &   3.21031787E-04, 3.27642247E-04, 2.90268052E-04, 3.02819899E-04,
     &   3.27549115E-04, 3.20452627E-04, 3.18834493E-04, 3.24312003E-04,
     &   3.27983754E-04, 3.35346677E-04, 3.31690196E-04, 2.99813221E-04,
     &   3.34243243E-04, 4.60217192E-04, 3.91954825E-04, 3.05770815E-04,
     &   2.99901633E-04, 2.94346381E-04, 2.87390130E-04, 2.79779266E-04/
  
         DATA ((DGS  (I,J), I=1201,1300), J=2,2) /
     &   2.82438402E-04, 2.84089788E-04, 2.92611102E-04, 2.88726426E-04,
     &   2.89929102E-04, 2.95610145E-04, 2.89352000E-04, 3.00534076E-04,
     &   3.22199104E-04, 3.82921982E-04, 3.67890141E-04, 3.65685826E-04,
     &   4.07690022E-04, 3.31336480E-04, 3.18623237E-04, 3.25938305E-04,
     &   3.78793122E-04, 3.75816895E-04, 4.33924356E-04, 4.38044009E-04,
     &   5.48568819E-04, 6.88534030E-04, 9.21325888E-04, 1.16866724E-03,
     &   7.84055193E-04, 4.44691624E-04, 3.31570434E-04, 2.58116544E-04,
     &   2.02116894E-04, 1.88028150E-04, 1.77839857E-04, 1.63929560E-04,
     &   1.54707502E-04, 1.51123010E-04, 1.48014634E-04, 1.45282629E-04,
     &   1.42854161E-04, 1.40674790E-04, 1.38696288E-04, 1.36899451E-04,
     &   1.35252522E-04, 1.33735142E-04, 1.32330813E-04, 1.31026010E-04,
     &   1.29809530E-04, 1.28672008E-04, 1.27605553E-04, 1.26603460E-04,
     &   1.25660000E-04, 1.24770247E-04, 1.23929941E-04, 1.23135389E-04,
     &   1.22383372E-04, 1.21671079E-04, 1.20996052E-04, 1.20356139E-04,
     &   1.19749458E-04, 1.19174364E-04, 1.18629429E-04, 1.18113417E-04,
     &   1.17625269E-04, 1.17164092E-04, 1.16729146E-04, 1.16319841E-04,
     &   1.15935726E-04, 1.15576492E-04, 1.15241969E-04, 1.14992116E-04,
     &   1.14647076E-04, 1.14152578E-04, 1.13762576E-04, 1.13484162E-04,
     &   1.13328088E-04, 1.13309764E-04, 1.13450749E-04, 1.13781003E-04,
     &   1.14342327E-04, 1.15193801E-04, 1.16420668E-04, 1.18152067E-04,
     &   1.20576737E-04, 1.24015540E-04, 1.29021409E-04, 1.29641995E-04,
     &   1.36654175E-04, 1.49239792E-04, 1.73030741E-04, 2.14106605E-04,
     &   2.31605947E-04, 3.06503762E-04, 4.51116537E-04, 5.19043363E-04,
     &   6.15027212E-04, 6.79384715E-04, 7.60091443E-04, 8.40982603E-04,
     &   9.42240194E-04, 1.00303147E-03, 1.07251555E-03, 1.15267777E-03/
  
         DATA ((DGS  (I,J), I=1301,1400), J=2,2) /
     &   1.24615715E-03, 1.35653945E-03, 1.48882367E-03, 1.56530780E-03,
     &   1.65019420E-03, 1.74494041E-03, 1.85136160E-03, 1.97174752E-03,
     &   2.10902840E-03, 2.26701575E-03, 2.45076055E-03, 2.66710176E-03,
     &   2.75720109E-03, 2.81373011E-03, 2.87263419E-03, 2.93406598E-03,
     &   2.99819147E-03, 3.06519153E-03, 3.13526359E-03, 3.20862357E-03,
     &   3.28550812E-03, 3.36617715E-03, 3.45091679E-03, 3.54004272E-03,
     &   3.63390417E-03, 3.73288840E-03, 3.83742614E-03, 3.94799774E-03,
     &   4.06514062E-03, 4.18945797E-03, 4.32162914E-03, 4.46242201E-03,
     &   4.61270796E-03, 4.77347988E-03, 4.94587411E-03, 5.13119733E-03,
     &   5.33095971E-03, 5.54691616E-03, 5.78111794E-03, 6.03597802E-03,
     &   6.31435446E-03, 6.61965801E-03, 6.95599244E-03, 7.32834006E-03,
     &   7.74281002E-03, 8.20697597E-03, 8.73034285E-03, 9.32500443E-03,
     &   1.00065889E-02, 1.07956517E-02, 1.17197836E-02, 1.28169011E-02,
     &   1.41405753E-02, 1.57690388E-02, 1.78212186E-02, 2.04871408E-02,
     &   2.40903708E-02, 2.92302193E-02, 3.71545912E-02, 5.09602898E-02,
     &   8.10022136E-02, 9.96285653E-02, 1.89762126E-01, 2.64040693E-01,
     &   3.17881308E-01, 3.59540826E-01, 3.93769213E-01, 4.23722810E-01,
     &   4.51515572E-01, 4.70863822E-01, 4.90558850E-01, 5.09928735E-01,
     &   5.19267865E-01, 5.32356472E-01, 5.40199013E-01, 5.49933681E-01,
     &   5.52470585E-01, 5.56222992E-01, 5.57782416E-01, 5.56607130E-01,
     &   5.54813824E-01, 5.52106431E-01, 5.43532617E-01, 5.37520160E-01,
     &   5.30130561E-01, 5.11091171E-01, 4.99270915E-01, 4.85761691E-01,
     &   4.70305159E-01, 4.34062641E-01, 4.12777878E-01, 3.89703280E-01,
     &   3.37252793E-01, 3.08218893E-01, 2.44325414E-01, 1.73984695E-01,
     &   1.85756453E-02, 1.71674413E-01, 2.42195619E-01, 3.05994304E-01/
  
         DATA ((DGS  (I,J), I=1401,1500), J=2,2) /
     &   3.62683726E-01, 3.88169626E-01, 4.11371679E-01, 4.32571474E-01,
     &   4.69270491E-01, 4.84691106E-01, 4.98463303E-01, 5.10388063E-01,
     &   5.29618849E-01, 5.37024083E-01, 5.43186614E-01, 5.51866721E-01,
     &   5.54669587E-01, 5.57532487E-01, 5.57790211E-01, 5.56308770E-01,
     &   5.52642738E-01, 5.47215930E-01, 5.40433014E-01, 5.32618768E-01,
     &   5.19558754E-01, 5.10281226E-01, 4.90872817E-01, 4.71228906E-01,
     &   4.51822004E-01, 4.24011259E-01, 3.94032452E-01, 3.59771588E-01,
     &   3.18071006E-01, 2.64179370E-01, 1.88745638E-01, 1.03015500E-01,
     &   5.89225512E-02, 4.12257203E-02, 3.16977564E-02, 2.57456752E-02,
     &   2.16751428E-02, 1.87159774E-02, 1.64677966E-02, 1.47018916E-02,
     &   1.32781359E-02, 1.21058892E-02, 1.11239265E-02, 1.02894018E-02,
     &   9.57143360E-03, 8.94720139E-03, 8.39947674E-03, 7.91500934E-03,
     &   7.48344153E-03, 7.09655978E-03, 6.74776724E-03, 6.43170459E-03,
     &   6.14397291E-03, 5.88092775E-03, 5.63952401E-03, 5.41719766E-03,
     &   5.21177429E-03, 5.02139787E-03, 4.84447447E-03, 4.67962765E-03,
     &   4.52566252E-03, 4.38153681E-03, 4.24633724E-03, 4.11926015E-03,
     &   3.99959556E-03, 3.88671389E-03, 3.78005490E-03, 3.67911839E-03,
     &   3.58345638E-03, 3.49266646E-03, 3.40638613E-03, 3.32428802E-03,
     &   3.24607565E-03, 3.17147995E-03, 3.10025613E-03, 3.03218100E-03,
     &   2.96705065E-03, 2.90467839E-03, 2.84489302E-03, 2.78753718E-03,
     &   2.73246605E-03, 2.31705337E-03, 2.06233497E-03, 1.81799988E-03,
     &   1.54501033E-03, 1.28935418E-03, 1.03662546E-03, 8.94508819E-04,
     &   7.07960896E-04, 6.44523035E-04, 5.94055219E-04, 5.54969277E-04,
     &   5.21145645E-04, 4.95908030E-04, 4.61981533E-04, 4.28259969E-04,
     &   3.91352973E-04, 4.05500196E-04, 4.49760394E-04, 6.07693275E-04/
  
         DATA ((DGS  (I,J), I=1501,1600), J=2,2) /
     &   9.13168828E-04, 1.34735621E-03, 1.93917968E-03, 2.76371245E-03,
     &   4.84124040E-03, 5.23580662E-03, 5.70059780E-03, 5.83530710E-03,
     &   6.14238463E-03, 6.48361802E-03, 6.86503158E-03, 7.29415528E-03,
     &   7.78053080E-03, 8.33642477E-03, 8.97787687E-03, 9.72628095E-03,
     &   1.06107992E-02, 1.16722691E-02, 1.29696679E-02, 1.45914693E-02,
     &   1.66766917E-02, 1.94570321E-02, 2.33494989E-02, 2.91880927E-02,
     &   3.89184129E-02, 5.83748833E-02, 8.44743070E-02, 8.88550600E-02,
     &   9.37147150E-02, 9.91362915E-02, 1.05223161E-01, 1.12105684E-01,
     &   1.19950627E-01, 1.28974810E-01, 1.39465383E-01, 1.51810815E-01,
     &   1.66549814E-01, 1.84451563E-01, 2.06653350E-01, 2.34909802E-01,
     &   2.72075171E-01, 3.23117643E-01, 3.97494972E-01, 5.15580727E-01,
     &   7.29878117E-01, 1.21467782E+00, 1.38462595E+00, 1.51838803E+00,
     &   1.66747753E+00, 1.79259941E+00, 1.88283477E+00, 1.95936493E+00,
     &   1.99462702E+00, 2.00862712E+00, 1.99101841E+00, 1.92862291E+00,
     &   1.85678391E+00, 1.84319016E+00, 1.83612305E+00, 1.82143857E+00,
     &   1.81535660E+00, 1.81071614E+00, 1.80600752E+00, 1.75508478E+00,
     &   1.66501166E+00, 1.54448626E+00, 1.41678744E+00, 1.25321823E+00,
     &   1.06736030E+00, 8.82339687E-01, 7.73006743E-01, 6.59543137E-01,
     &   5.42461837E-01, 3.73578441E-01, 2.50269505E-01, 1.25508067E-01,
     &   5.02526815E-02, 2.51366518E-02, 1.25770096E-02, 2.53179645E-04,
     &   1.25513799E-02, 2.51110199E-02, 1.25482488E-01, 2.50244094E-01,
     &   3.73553308E-01, 9.24792045E-01, 1.12536357E+00, 1.44674566E+00,
     &   1.57035254E+00, 1.68648356E+00, 1.78141693E+00, 1.85006723E+00,
     &   1.90942734E+00, 1.94923288E+00, 1.98018797E+00, 1.99765965E+00,
     &   2.00720837E+00, 2.00825750E+00, 2.00241723E+00, 1.99191399E+00/
  
         DATA ((DGS  (I,J), I=1601,1700), J=2,2) /
     &   1.95719681E+00, 1.93379776E+00, 1.90785506E+00, 1.88284219E+00,
     &   1.82653424E+00, 1.79571738E+00, 1.74566671E+00, 1.66748904E+00,
     &   1.38464052E+00, 1.16552632E+00, 9.99612865E-01, 8.72156342E-01,
     &   7.72112334E-01, 6.91901577E-01, 6.11812225E-01, 4.86767639E-01,
     &   4.52929094E-01, 4.23437244E-01, 3.97513880E-01, 3.58988814E-01,
     &   2.97137817E-01, 2.53393171E-01, 2.20841467E-01, 1.95683462E-01,
     &   1.75661448E-01, 1.59350631E-01, 1.45807960E-01, 1.34384609E-01,
     &   1.24619646E-01, 1.16176660E-01, 1.08804404E-01, 1.02311467E-01,
     &   9.65494679E-02, 9.14016191E-02, 8.67747423E-02, 5.83940988E-02,
     &   3.89376284E-02, 2.92073025E-02, 1.94762246E-02, 1.46106884E-02,
     &   1.16915343E-02, 9.74561257E-03, 8.35579690E-03, 7.31357151E-03,
     &   6.50308726E-03, 5.85483985E-03, 5.48718383E-03, 5.05822333E-03,
     &   4.69179881E-03, 4.37518930E-03, 4.09891485E-03, 3.85576675E-03,
     &   2.97638146E-03, 2.42748107E-03, 2.05368878E-03, 1.78384376E-03,
     &   1.58172523E-03, 1.42792268E-03, 1.29899334E-03, 1.19328471E-03,
     &   5.74945350E-04, 5.51717764E-04, 5.77104861E-04, 5.91372038E-04,
     &   6.26942979E-04, 6.89451663E-04, 7.26509864E-04, 7.79546018E-04,
     &   9.16815968E-04, 1.14712884E-03, 1.57099219E-03, 2.57537012E-03,
     &   3.54880352E-03, 3.80098462E-03, 4.09210620E-03, 4.43188692E-03,
     &   4.83359162E-03, 5.31580689E-03, 5.90535177E-03, 6.64248047E-03,
     &   7.59044772E-03, 8.85459079E-03, 1.06247575E-02, 1.32804637E-02,
     &   1.77070688E-02, 1.84769727E-02, 1.93167793E-02, 2.02366697E-02,
     &   2.12485542E-02, 2.23668294E-02, 2.36094888E-02, 2.49983435E-02,
     &   2.65606204E-02, 2.83313718E-02, 3.03550677E-02, 3.26897927E-02,
     &   3.54138533E-02, 3.86330968E-02, 4.24955563E-02, 4.72165085E-02/
  
         DATA ((DGS  (I,J), I=1701,1800), J=2,2) /
     &   4.86916758E-02, 5.31171637E-02, 6.07017618E-02, 7.08134018E-02,
     &   8.49648532E-02, 1.06179073E-01, 1.41486745E-01, 2.11875512E-01,
     &   4.19921676E-01, 4.99232408E-01, 7.04156583E-01, 8.59997282E-01,
     &   9.88403622E-01, 1.10047800E+00, 1.19991071E+00, 1.28911146E+00,
     &   1.36878980E+00, 1.44264344E+00, 1.51238933E+00, 1.57612934E+00,
     &   1.63219614E+00, 1.68405859E+00, 1.73081864E+00, 1.77177482E+00,
     &   1.81068637E+00, 1.84255969E+00, 1.86744959E+00, 1.88858180E+00,
     &   1.90484726E+00, 1.91492318E+00, 1.91745814E+00, 1.91317505E+00,
     &   1.90080613E+00, 1.87895065E+00, 1.84609187E+00, 1.80915087E+00,
     &   1.75193662E+00, 1.67915287E+00, 1.58931984E+00, 1.46134013E+00,
     &   1.30722231E+00, 1.09886758E+00, 8.25840951E-01, 1.13146945E-01,
     &   2.92419216E-04, 3.73830191E-01, 8.25827533E-01, 1.09885552E+00,
     &   1.30721167E+00, 1.46133082E+00, 1.58931188E+00, 1.67914607E+00,
     &   1.75193095E+00, 1.80914630E+00, 1.84608817E+00, 1.87894795E+00,
     &   1.90080436E+00, 1.91317416E+00, 1.91745806E+00, 1.91492386E+00,
     &   1.90484875E+00, 1.88858402E+00, 1.86745248E+00, 1.84256319E+00,
     &   1.81069050E+00, 1.77177958E+00, 1.73082396E+00, 1.68406445E+00,
     &   1.63220254E+00, 1.57613623E+00, 1.51239671E+00, 1.44265130E+00,
     &   1.36879810E+00, 1.28912018E+00, 1.19991983E+00, 1.10048752E+00,
     &   9.88413526E-01, 8.60007549E-01, 7.04167205E-01, 4.99243369E-01,
     &   4.27484889E-01, 4.14025943E-01, 3.97331472E-01, 3.51222455E-01,
     &   3.09667412E-01, 2.11875256E-01, 1.41498006E-01, 1.06187453E-01,
     &   8.49742767E-02, 7.08246787E-02, 6.07130387E-02, 5.31277156E-02,
     &   4.72277829E-02, 4.25068287E-02, 3.86439838E-02, 3.54251208E-02,
     &   3.27010574E-02, 3.03660926E-02, 2.83426295E-02, 2.65718742E-02/
  
         DATA ((DGS  (I,J), I=1801,1900), J=2,2) /
     &   1.77182824E-02, 1.32916214E-02, 1.06358412E-02, 8.86558585E-03,
     &   7.60131440E-03, 6.65325662E-03, 5.91604355E-03, 4.84411520E-03,
     &   4.10247498E-03, 3.81123867E-03, 3.55890213E-03, 2.65307085E-03,
     &   1.99288535E-03, 1.60087441E-03, 1.34206755E-03, 1.15885859E-03,
     &   1.02276641E-03, 9.18016297E-04, 8.35186078E-04, 7.68305425E-04,
     &   7.13438281E-04, 6.67880040E-04, 6.29705917E-04, 5.97540130E-04,
     &   5.70396590E-04, 5.47587246E-04, 5.28680823E-04, 5.13515800E-04,
     &   5.02307073E-04, 4.95992151E-04, 4.91217201E-04, 4.79429683E-04,
     &   4.84248931E-04, 5.74160023E-04, 5.95364711E-04, 6.62420954E-04,
     &   7.22308806E-04, 7.73142784E-04, 8.17975071E-04, 8.56183064E-04,
     &   8.89270880E-04, 9.17426175E-04, 9.40901521E-04, 9.60443679E-04,
     &   9.76021242E-04, 9.87671851E-04, 9.95838634E-04, 1.00063192E-03,
     &   1.00189471E-03, 9.99963555E-04, 9.94801135E-04, 9.86188664E-04,
     &   9.74428969E-04, 9.59741246E-04, 9.41095197E-04, 9.19747486E-04,
     &   8.94391964E-04, 8.65429844E-04, 8.32230809E-04, 7.94670430E-04,
     &   7.52732974E-04, 7.06580987E-04, 6.52921345E-04, 5.92957469E-04,
     &   5.26198833E-04, 4.48432471E-04, 3.61031100E-04, 3.13347169E-04,
     &   5.01365238E-04, 5.96323426E-04, 6.68643593E-04, 7.26051825E-04,
     &   7.74931002E-04, 8.16810165E-04, 8.51479998E-04, 8.81875945E-04,
     &   9.08117895E-04, 9.30424215E-04, 9.49060552E-04, 9.64545285E-04,
     &   9.76775331E-04, 9.86555793E-04, 9.93264442E-04, 9.97489668E-04,
     &   9.99129113E-04, 9.98069433E-04, 9.94455247E-04, 9.88219404E-04,
     &   9.79110505E-04, 9.67341974E-04, 9.52754608E-04, 9.34025696E-04,
     &   9.13007696E-04, 8.89492507E-04, 8.60775292E-04, 8.27949049E-04,
     &   7.90570465E-04, 7.46947792E-04, 6.97661736E-04, 6.39049270E-04/
  
         DATA ((DGS  (I,J), I=1901,2000), J=2,2) /
     &   5.72295788E-04, 4.85912203E-04, 3.80942282E-04, 3.75315879E-04,
     &   3.39640468E-04, 3.28706214E-04, 3.26087307E-04, 3.24528725E-04,
     &   3.20744080E-04, 3.18949364E-04, 3.19120164E-04, 3.19810615E-04,
     &   3.20711936E-04, 3.21238107E-04, 3.21387271E-04, 3.21746799E-04,
     &   3.21824706E-04, 3.22015785E-04, 3.21992247E-04, 3.21289837E-04,
     &   3.20494236E-04, 3.19283499E-04, 3.17883524E-04, 3.16264488E-04,
     &   3.14352653E-04, 3.11811122E-04, 3.08975050E-04, 3.05823018E-04,
     &   3.02327446E-04, 2.98508393E-04, 2.94392003E-04, 2.90060898E-04,
     &   2.84841006E-04, 2.79320517E-04, 2.74383041E-04, 2.63701755E-04,
     &   2.52995842E-04, 2.44163182E-04, 2.28396214E-04, 2.41020348E-04,
     &   2.50111190E-04, 2.56970454E-04, 2.65253013E-04, 2.72386302E-04,
     &   2.76913398E-04, 2.81560030E-04, 2.86306058E-04, 2.90498642E-04,
     &   2.94515736E-04, 2.98409804E-04, 3.02128376E-04, 3.05643423E-04,
     &   3.08965038E-04, 3.12113775E-04, 3.15043261E-04, 3.17821850E-04,
     &   3.20464382E-04, 3.22967727E-04, 3.25204981E-04, 3.27247259E-04,
     &   3.29253150E-04, 3.31235039E-04, 3.33269772E-04, 3.35254768E-04,
     &   3.37030667E-04, 3.38816104E-04, 3.40971873E-04, 3.43711024E-04,
     &   3.47117988E-04, 3.51580230E-04, 3.57834850E-04, 3.58137667E-04,
     &   3.53664430E-04, 3.48412503E-04, 3.50780906E-04, 3.52586063E-04,
     &   3.54275740E-04, 3.55847755E-04, 3.57247104E-04, 3.58462192E-04,
     &   3.59540372E-04, 3.60483456E-04, 3.61294208E-04, 3.57374615E-04,
     &   3.53424038E-04, 3.49840245E-04, 3.46527854E-04, 3.43353055E-04,
     &   3.40226027E-04, 3.37172326E-04, 3.34190054E-04, 3.31196733E-04,
     &   3.28171036E-04, 3.25063705E-04, 3.21828018E-04, 3.18570483E-04,
     &   3.15272801E-04, 3.11791364E-04, 3.08127236E-04, 3.04609077E-04/
  
         DATA ((DGS  (I,J), I=2001,2100), J=2,2) /
     &   3.00553529E-04, 2.96883804E-04, 2.91319296E-04, 2.85660658E-04,
     &   2.80238578E-04, 2.75341078E-04, 2.68434630E-04, 2.60902262E-04,
     &   2.54008035E-04, 2.45093964E-04, 2.49863636E-04, 2.55223403E-04,
     &   2.61706895E-04, 2.67809333E-04, 2.71999110E-04, 2.76849686E-04,
     &   2.82028853E-04, 2.87177514E-04, 2.90396366E-04, 2.94064941E-04,
     &   2.97191481E-04, 3.00457529E-04, 3.03588329E-04, 3.06536664E-04,
     &   3.09450454E-04, 3.12333007E-04, 3.15076105E-04, 3.17682439E-04,
     &   3.20295741E-04, 3.22839932E-04, 3.25410358E-04, 3.28003014E-04,
     &   3.30568447E-04, 3.33170041E-04, 3.35923254E-04, 3.38884854E-04,
     &   3.41890950E-04, 3.42827072E-04, 3.44117221E-04, 3.45923562E-04,
     &   3.48505465E-04, 3.52161055E-04, 3.55665634E-04, 3.53741865E-04,
     &   3.51711143E-04, 3.41347069E-04, 3.44347064E-04, 3.47703964E-04,
     &   3.50108106E-04, 3.55136048E-04, 3.61919035E-04, 3.70672237E-04,
     &   3.80403785E-04, 3.90819725E-04, 4.01679004E-04, 4.11889546E-04,
     &   4.23122109E-04, 4.33808926E-04, 2.93275563E-04, 1.52742199E-04,
     &   1.48205012E-04, 1.44377868E-04, 1.41346964E-04, 1.38666317E-04,
     &   1.36459948E-04, 1.34445835E-04, 1.32743536E-04, 1.31154487E-04,
     &   1.29726412E-04, 1.28486529E-04, 1.27302011E-04, 1.26260733E-04,
     &   1.25255048E-04, 1.24362394E-04, 1.23492827E-04, 1.22715041E-04,
     &   1.21952136E-04, 1.21265495E-04, 1.20588190E-04, 1.19975458E-04,
     &   1.19393962E-04, 1.18816531E-04, 1.18290938E-04, 1.17767119E-04,
     &   1.17288719E-04, 1.16810448E-04, 1.16372378E-04, 1.15933243E-04,
     &   1.15530004E-04, 1.15124830E-04, 1.14751950E-04, 1.14376499E-04,
     &   1.14014846E-04, 1.13681057E-04, 1.13344052E-04, 1.13032496E-04,
     &   1.12717443E-04, 1.12425747E-04, 1.12130358E-04, 1.11856497E-04/
  
         DATA ((DGS  (I,J), I=2101,2174), J=2,2) /
     &   1.11578810E-04, 1.11321043E-04, 1.11059367E-04, 1.10816188E-04,
     &   1.10579653E-04, 1.10339150E-04, 1.10115309E-04, 1.09887495E-04,
     &   1.09675267E-04, 1.09459081E-04, 1.09257512E-04, 1.09052014E-04,
     &   1.08860258E-04, 1.08664613E-04, 1.08481916E-04, 1.08295378E-04,
     &   1.08113233E-04, 1.07942966E-04, 1.07768945E-04, 1.07542378E-04,
     &   1.07375697E-04, 1.07219711E-04, 1.07060112E-04, 1.06910665E-04,
     &   1.06757670E-04, 1.06614328E-04, 1.06467503E-04, 1.06329870E-04,
     &   1.06188821E-04, 1.06056536E-04, 1.05926744E-04, 1.05793636E-04,
     &   1.05668712E-04, 1.05540538E-04, 1.05420192E-04, 1.05296663E-04,
     &   1.05180629E-04, 1.05061478E-04, 1.04949512E-04, 1.04834492E-04,
     &   1.04726367E-04, 1.04615252E-04, 1.03520589E-04, 1.02596740E-04,
     &   1.02461962E-04, 9.83116561E-05, 9.71489287E-05, 9.50787584E-05,
     &   9.42952819E-05, 9.42620486E-05, 9.34862835E-05, 9.34841919E-05,
     &   9.30417556E-05, 9.30267704E-05, 9.30178670E-05, 9.28348263E-05,
     &   9.27234895E-05, 9.27043585E-05, 9.26736151E-05, 9.26292127E-05,
     &   9.25986945E-05, 9.25798603E-05, 9.24095641E-05, 9.24015101E-05,
     &   9.23555421E-05, 9.23472551E-05, 9.23106520E-05, 9.22964832E-05,
     &   9.22853356E-05, 9.22750327E-05, 9.22456125E-05, 9.22042300E-05,
     &   9.21871265E-05, 9.20808503E-05/
  
         DATA ((DGS  (I,J), I=   1, 100), J=3,3) /
     &   7.34752126E-06, 7.80889635E-06, 8.32041208E-06, 8.88389597E-06,
     &   9.51490651E-06, 9.83574656E-06, 1.08147354E-05, 1.12490434E-05,
     &   1.19303118E-05, 1.25900406E-05, 1.23890369E-05, 1.22356430E-05,
     &   1.21695660E-05, 1.21730512E-05, 1.22652817E-05, 1.24315305E-05,
     &   1.27250237E-05, 1.30639579E-05, 1.33746070E-05, 1.37923364E-05,
     &   1.41138885E-05, 1.44907473E-05, 1.47817069E-05, 1.52025982E-05,
     &   1.55593393E-05, 1.59155971E-05, 1.63893208E-05, 1.66592439E-05,
     &   1.67932499E-05, 1.72229416E-05, 1.76627265E-05, 1.81109770E-05,
     &   1.85780806E-05, 1.90410533E-05, 1.95091546E-05, 1.99837433E-05,
     &   2.04641024E-05, 2.09570493E-05, 2.14681516E-05, 2.19974163E-05,
     &   2.24032634E-05, 2.29563313E-05, 2.35310664E-05, 2.39777875E-05,
     &   2.45941874E-05, 2.52341534E-05, 2.57189682E-05, 2.63684894E-05,
     &   2.68704600E-05, 2.75519641E-05, 3.11858714E-05, 3.54714146E-05,
     &   4.27718708E-05, 5.47232286E-05, 5.97772979E-05, 6.10980505E-05,
     &   6.55935430E-05, 7.31830224E-05, 8.20857693E-05, 8.71026612E-05,
     &   9.21520498E-05, 9.29555911E-05, 9.13213822E-05, 9.13319449E-05,
     &   9.26122739E-05, 9.42741194E-05, 9.51988107E-05, 9.55383230E-05,
     &   9.58989787E-05, 9.63236767E-05, 9.63105545E-05, 9.43600348E-05,
     &   9.32214428E-05, 9.19312410E-05, 8.87534056E-05, 8.70020957E-05,
     &   8.35465123E-05, 8.16544941E-05, 8.02113848E-05, 8.09379697E-05,
     &   7.85213336E-05, 7.67387027E-05, 7.80132263E-05, 8.10445917E-05,
     &   8.96669908E-05, 1.02329060E-04, 1.10601639E-04, 1.12921280E-04,
     &   1.14327568E-04, 1.13945136E-04, 1.11976437E-04, 1.16026406E-04,
     &   1.19525960E-04, 1.27783001E-04, 1.37584278E-04, 1.52042381E-04,
     &   1.36268928E-04, 1.20258873E-04, 9.80183042E-05, 8.09672002E-05/
  
         DATA ((DGS  (I,J), I= 101, 200), J=3,3) /
     &   5.92966029E-05, 4.30574915E-05, 3.17754088E-05, 2.97727265E-05,
     &   3.56267204E-05, 4.49283320E-05, 5.40448369E-05, 6.29762350E-05,
     &   7.08862642E-05, 7.77917416E-05, 8.36840124E-05, 8.55463761E-05,
     &   8.74657509E-05, 8.94896461E-05, 8.86139733E-05, 8.51071165E-05,
     &   7.78773924E-05, 5.28583243E-05, 3.31416471E-05, 3.00277489E-05,
     &   3.00540699E-05, 3.09049562E-05, 3.10561115E-05, 3.08181296E-05,
     &   3.02386321E-05, 3.00707349E-05, 3.17935677E-05, 3.65574625E-05,
     &   4.58134589E-05, 5.89382129E-05, 7.46328970E-05, 9.25583833E-05,
     &   1.12065192E-04, 1.32011289E-04, 1.50852677E-04, 1.67240057E-04,
     &   1.77020525E-04, 1.75176817E-04, 1.60343820E-04, 1.45269291E-04,
     &   1.46566664E-04, 1.40960639E-04, 1.35531323E-04, 1.26868977E-04,
     &   1.18713656E-04, 1.10377726E-04, 1.00710008E-04, 9.10939212E-05,
     &   8.42923709E-05, 8.14577628E-05, 8.12913612E-05, 8.38733781E-05,
     &   8.46667363E-05, 8.10359249E-05, 7.74051135E-05, 7.24300767E-05,
     &   7.09245635E-05, 7.00860333E-05, 5.37700963E-05, 5.54461824E-05,
     &   5.90712676E-05, 6.39076481E-05, 6.44047712E-05, 6.33190383E-05,
     &   6.17654165E-05, 5.91109890E-05, 5.56593809E-05, 5.40197280E-05,
     &   4.67723385E-05, 4.45330540E-05, 4.50467930E-05, 4.67673657E-05,
     &   5.01574543E-05, 5.26636208E-05, 5.39809893E-05, 5.46241485E-05,
     &   5.51700185E-05, 5.66829725E-05, 5.89395715E-05, 6.05849076E-05,
     &   6.39663063E-05, 6.56270445E-05, 6.97173341E-05, 7.34102778E-05,
     &   7.86769591E-05, 8.38497261E-05, 9.11409649E-05, 9.80362950E-05,
     &   1.05849518E-04, 1.15549880E-04, 1.20881420E-04, 1.24334683E-04,
     &   1.32193786E-04, 1.36471247E-04, 1.37634040E-04, 1.42386963E-04,
     &   1.48908414E-04, 1.56488835E-04, 1.64108465E-04, 1.77975638E-04/
  
         DATA ((DGS  (I,J), I= 201, 300), J=3,3) /
     &   1.94032063E-04, 2.04281434E-04, 2.08243925E-04, 2.12389934E-04,
     &   2.16759409E-04, 2.21322251E-04, 2.26119013E-04, 2.31164631E-04,
     &   2.36470827E-04, 2.42033989E-04, 2.47843808E-04, 2.53894398E-04,
     &   2.60180940E-04, 2.66705796E-04, 2.73486884E-04, 2.80591471E-04,
     &   2.88069687E-04, 2.95881589E-04, 3.04103326E-04, 3.12811977E-04,
     &   3.22098000E-04, 3.31727114E-04, 3.42821825E-04, 3.54515017E-04,
     &   3.67764759E-04, 3.81423626E-04, 3.97213587E-04, 4.15305220E-04,
     &   4.37154270E-04, 4.68939800E-04, 4.99907436E-04, 5.43668125E-04,
     &   4.93033796E-04, 4.93964203E-04, 5.06576192E-04, 5.22854558E-04,
     &   5.42457320E-04, 5.64190445E-04, 5.90166003E-04, 6.15016578E-04,
     &   6.44502611E-04, 6.77121566E-04, 7.07004593E-04, 7.52798312E-04,
     &   7.98592030E-04, 8.49170250E-04, 9.06301416E-04, 9.71211381E-04,
     &   1.04540794E-03, 1.13073460E-03, 1.22931912E-03, 1.34372855E-03,
     &   1.47616708E-03, 1.60450952E-03, 1.67463790E-03, 1.72236739E-03,
     &   1.78836669E-03, 1.82021568E-03, 1.80095061E-03, 1.91836357E-03,
     &   1.96529048E-03, 2.00798623E-03, 2.04579256E-03, 2.07579343E-03,
     &   2.09469020E-03, 2.09833392E-03, 2.06513086E-03, 2.00570246E-03,
     &   1.96340999E-03, 1.84812172E-03, 1.68645477E-03, 1.47340706E-03,
     &   1.12532657E-03, 8.94019188E-04, 5.45021778E-04, 2.10199801E-04,
     &   3.00801002E-04, 6.52815071E-04, 9.92714713E-04, 1.29209954E-03,
     &   1.54138229E-03, 1.73881028E-03, 1.88572457E-03, 1.98869197E-03,
     &   2.05437954E-03, 2.08953022E-03, 2.10064463E-03, 2.09329271E-03,
     &   2.07215127E-03, 2.04103206E-03, 1.98266974E-03, 1.96632129E-03,
     &   1.88361520E-03, 1.86310158E-03, 1.81883572E-03, 1.77079159E-03,
     &   1.72347960E-03, 1.67701632E-03, 1.63171219E-03, 1.58777184E-03/
  
         DATA ((DGS  (I,J), I= 301, 400), J=3,3) /
     &   1.58192208E-03, 1.50446194E-03, 1.46517133E-03, 1.42744429E-03,
     &   1.30706647E-03, 1.20332379E-03, 1.11388299E-03, 1.03648161E-03,
     &   9.69166192E-04, 8.97014526E-04, 8.58605439E-04, 8.12965177E-04,
     &   7.72528751E-04, 7.36600685E-04, 7.04628061E-04, 6.76182816E-04,
     &   6.50956013E-04, 6.28659256E-04, 6.09116497E-04, 5.92309091E-04,
     &   5.88565404E-04, 5.78006576E-04, 5.87799511E-04, 5.77631525E-04,
     &   6.22199117E-04, 8.43647380E-04, 8.05041282E-04, 5.55186830E-04,
     &   4.91442599E-04, 4.50944412E-04, 4.22986225E-04, 4.00768627E-04,
     &   3.83194202E-04, 3.68513303E-04, 3.55944971E-04, 3.44964382E-04,
     &   3.35219422E-04, 3.26452312E-04, 3.18462692E-04, 3.11116467E-04,
     &   3.04280501E-04, 2.97801327E-04, 2.91559153E-04, 2.85680533E-04,
     &   2.80137255E-04, 2.74898946E-04, 2.70048471E-04, 2.65301625E-04,
     &   2.60795781E-04, 2.56517183E-04, 2.52401871E-04, 2.48572016E-04,
     &   2.44616619E-04, 2.40927427E-04, 2.37453946E-04, 2.33871319E-04,
     &   2.24475117E-04, 2.01871886E-04, 1.67083631E-04, 1.44494269E-04,
     &   1.29548108E-04, 1.18843144E-04, 1.11723840E-04, 1.07851101E-04,
     &   1.07927501E-04, 1.08157307E-04, 1.13723892E-04, 1.17369379E-04,
     &   1.18346081E-04, 1.22117214E-04, 1.28865307E-04, 1.29625518E-04,
     &   1.35927240E-04, 1.36631319E-04, 1.34948756E-04, 1.32368380E-04,
     &   1.27866997E-04, 1.26535102E-04, 1.26965921E-04, 1.27206565E-04,
     &   1.27459535E-04, 1.27675974E-04, 1.28828175E-04, 1.31431771E-04,
     &   1.31817970E-04, 1.35822956E-04, 1.42199819E-04, 1.46100170E-04,
     &   1.50179070E-04, 1.59682768E-04, 1.71795670E-04, 1.88919548E-04,
     &   1.94896104E-04, 2.09701575E-04, 2.20597533E-04, 2.32545975E-04,
     &   2.61740248E-04, 3.01444167E-04, 3.06234543E-04, 3.43739053E-04/
  
         DATA ((DGS  (I,J), I= 401, 500), J=3,3) /
     &   3.87539117E-04, 4.01175368E-04, 3.61897372E-04, 3.32938931E-04,
     &   3.24316029E-04, 2.80027266E-04, 2.69750597E-04, 2.63459964E-04,
     &   2.56063066E-04, 2.42162973E-04, 2.26994406E-04, 2.11735054E-04,
     &   2.10027762E-04, 1.94802760E-04, 1.93161961E-04, 1.84986159E-04,
     &   1.78773462E-04, 1.61802307E-04, 1.59784970E-04, 1.53743618E-04,
     &   1.53914233E-04, 1.54191378E-04, 1.63378559E-04, 1.82864865E-04,
     &   1.87379910E-04, 2.16521515E-04, 2.18917945E-04, 2.30155896E-04,
     &   2.32242835E-04, 2.43788863E-04, 2.49121297E-04, 2.64284969E-04,
     &   2.65932163E-04, 2.79714740E-04, 2.83743722E-04, 2.81146671E-04,
     &   2.79941503E-04, 2.50123061E-04, 2.44183469E-04, 2.12078415E-04,
     &   1.91921602E-04, 1.84155394E-04, 1.79173198E-04, 1.76725090E-04,
     &   1.57092133E-04, 1.54644298E-04, 1.49679354E-04, 1.46139459E-04,
     &   1.45354315E-04, 1.45129452E-04, 1.41450929E-04, 1.40330125E-04,
     &   1.39729265E-04, 1.35789415E-04, 1.33842977E-04, 1.32093629E-04,
     &   1.27145067E-04, 1.26714471E-04, 1.25851311E-04, 1.25537477E-04,
     &   1.25324178E-04, 1.25321746E-04, 1.25378753E-04, 1.25476451E-04,
     &   1.25633047E-04, 1.26202885E-04, 1.26880599E-04, 1.27485219E-04,
     &   1.28828138E-04, 1.30149199E-04, 1.30367611E-04, 1.35607574E-04,
     &   1.41010391E-04, 1.45126242E-04, 1.45613930E-04, 1.48758914E-04,
     &   1.49185745E-04, 1.50201219E-04, 1.51158578E-04, 1.55180885E-04,
     &   1.56170273E-04, 1.62811981E-04, 1.66053128E-04, 1.67287860E-04,
     &   1.72258908E-04, 1.75443505E-04, 1.76555272E-04, 1.78029948E-04,
     &   1.82945453E-04, 1.84354817E-04, 1.88203737E-04, 1.89067475E-04,
     &   1.93043036E-04, 2.00270462E-04, 2.09579750E-04, 2.13911458E-04,
     &   2.72779249E-04, 3.14975224E-04, 3.51242787E-04, 2.23489743E-04/
  
         DATA ((DGS  (I,J), I= 501, 600), J=3,3) /
     &   1.75657736E-04, 1.64325197E-04, 1.48513929E-04, 1.47183883E-04,
     &   1.45794577E-04, 1.48181523E-04, 1.56341011E-04, 1.61890066E-04,
     &   1.68193581E-04, 1.78130800E-04, 1.91515823E-04, 2.09120387E-04,
     &   2.33272651E-04, 2.67681350E-04, 3.17273341E-04, 3.92046235E-04,
     &   4.11467984E-04, 4.33245850E-04, 4.57841331E-04, 4.85740829E-04,
     &   5.17600570E-04, 5.54282540E-04, 5.96929213E-04, 6.06300907E-04,
     &   6.15985533E-04, 6.25998700E-04, 6.36357073E-04, 6.47078463E-04,
     &   6.58181923E-04, 6.69687759E-04, 6.81618165E-04, 6.93996327E-04,
     &   7.06847608E-04, 7.71521498E-04, 8.21626861E-04, 8.49262469E-04,
     &   8.68767316E-04, 8.89219144E-04, 9.10672510E-04, 9.33201853E-04,
     &   9.56889153E-04, 9.81824952E-04, 9.94791863E-04, 1.00810927E-03,
     &   1.02179142E-03, 1.03585342E-03, 1.05031099E-03, 1.06518120E-03,
     &   1.08048205E-03, 1.09623232E-03, 1.11245187E-03, 1.12916177E-03,
     &   1.14638435E-03, 1.16414333E-03, 1.18246391E-03, 1.20137289E-03,
     &   1.22089882E-03, 1.24107210E-03, 1.26192518E-03, 1.28349296E-03,
     &   1.30581168E-03, 1.32892180E-03, 1.35286551E-03, 1.37768840E-03,
     &   1.40343942E-03, 1.43017124E-03, 1.45794055E-03, 1.48680874E-03,
     &   1.51684204E-03, 1.54811187E-03, 1.58069565E-03, 1.61467739E-03,
     &   1.65014843E-03, 1.68720826E-03, 1.72596543E-03, 1.76653863E-03,
     &   1.80905786E-03, 1.85366586E-03, 1.90051964E-03, 1.94979239E-03,
     &   2.00167557E-03, 2.05638137E-03, 2.08486544E-03, 2.11414563E-03,
     &   2.14425567E-03, 2.17523122E-03, 2.20711001E-03, 2.23993200E-03,
     &   2.27373954E-03, 2.30857756E-03, 2.34449374E-03, 2.38153878E-03,
     &   2.41976658E-03, 2.45923455E-03, 2.50000386E-03, 2.54213978E-03,
     &   2.58571200E-03, 2.63079504E-03, 2.67746869E-03, 2.72581841E-03/
  
         DATA ((DGS  (I,J), I= 601, 700), J=3,3) /
     &   2.77593593E-03, 2.82791978E-03, 2.88187596E-03, 2.93791865E-03,
     &   2.99617100E-03, 3.05676606E-03, 3.11984777E-03, 3.18557213E-03,
     &   3.25410842E-03, 3.32564074E-03, 3.40036960E-03, 3.47851377E-03,
     &   3.56031253E-03, 3.64602798E-03, 3.73594790E-03, 3.83038898E-03,
     &   3.92970054E-03, 4.03426882E-03, 4.14452199E-03, 4.26093607E-03,
     &   4.43528818E-03, 4.51443224E-03, 4.65277338E-03, 4.79981441E-03,
     &   4.95640187E-03, 5.12349578E-03, 5.30218938E-03, 5.49373299E-03,
     &   5.69956333E-03, 5.92133957E-03, 6.16098813E-03, 6.42075873E-03,
     &   6.70329522E-03, 6.92884665E-03, 7.63152618E-03, 8.49208850E-03,
     &   9.57045097E-03, 1.09612382E-02, 1.28231662E-02, 1.54443609E-02,
     &   1.94079975E-02, 2.60998058E-02, 3.98115239E-02, 8.37124781E-02,
     &   8.85209041E-02, 9.39131996E-02, 1.00002158E-01, 1.06931489E-01,
     &   1.14887128E-01, 1.24113877E-01, 1.34940504E-01, 1.47818772E-01,
     &   1.63386155E-01, 1.82570640E-01, 2.06773812E-01, 2.38207577E-01,
     &   2.80550027E-01, 2.85598351E-01, 3.98636785E-01, 4.81027076E-01,
     &   5.47222920E-01, 6.04793008E-01, 6.49155367E-01, 6.87916839E-01,
     &   7.18981457E-01, 7.49928696E-01, 7.71187614E-01, 7.90871615E-01,
     &   8.04761354E-01, 8.16211880E-01, 8.22646510E-01, 8.27449537E-01,
     &   8.27857960E-01, 8.25440699E-01, 8.18737248E-01, 8.11492400E-01,
     &   7.95821699E-01, 7.81780877E-01, 7.64545903E-01, 7.43845676E-01,
     &   7.19420134E-01, 6.91030112E-01, 6.58468815E-01, 6.21574669E-01,
     &   5.80245066E-01, 5.34450324E-01, 4.84246930E-01, 4.01041393E-01,
     &   3.40723089E-01, 2.44033812E-01, 1.41586596E-01, 1.41488900E-01,
     &   4.00955844E-01, 4.84168256E-01, 5.57833469E-01, 6.01402428E-01,
     &   6.58411561E-01, 6.90978471E-01, 7.19374075E-01, 7.43805118E-01/
  
         DATA ((DGS  (I,J), I= 701, 800), J=3,3) /
     &   7.64510724E-01, 7.81750923E-01, 7.95796791E-01, 8.06922297E-01,
     &   8.15397811E-01, 8.21485140E-01, 8.25433931E-01, 8.27857114E-01,
     &   8.27452377E-01, 8.24298963E-01, 8.18601611E-01, 8.13640908E-01,
     &   8.01506709E-01, 7.90896230E-01, 7.75309508E-01, 7.58597584E-01,
     &   7.36793833E-01, 7.14566127E-01, 6.83570663E-01, 6.53414565E-01,
     &   6.16571076E-01, 5.75017590E-01, 5.21569877E-01, 4.60299375E-01,
     &   3.83793731E-01, 3.16256639E-01, 2.63795477E-01, 2.25941222E-01,
     &   1.97438696E-01, 1.75245370E-01, 1.57494861E-01, 1.42984587E-01,
     &   1.30907092E-01, 1.20701113E-01, 1.11964883E-01, 1.04403483E-01,
     &   9.77956707E-02, 9.19723015E-02, 8.68018903E-02, 8.21807099E-02,
     &   7.80258500E-02, 7.42702553E-02, 7.08591155E-02, 3.71566453E-02,
     &   2.51833832E-02, 1.90500550E-02, 1.53220992E-02, 1.28166119E-02,
     &   1.10170533E-02, 9.66195866E-03, 8.60479382E-03, 7.75705987E-03,
     &   7.06215072E-03, 6.97985084E-03, 6.40600733E-03, 5.91993485E-03,
     &   5.50293910E-03, 5.14128290E-03, 4.82464528E-03, 4.54512173E-03,
     &   4.29655604E-03, 4.07408233E-03, 3.87380382E-03, 3.69256296E-03,
     &   3.52777416E-03, 3.37729984E-03, 3.23935742E-03, 3.11244868E-03,
     &   2.99530494E-03, 2.88684504E-03, 2.78614203E-03, 2.69239619E-03,
     &   2.60491375E-03, 2.52309116E-03, 2.44639946E-03, 2.37437396E-03,
     &   2.30660415E-03, 2.24272665E-03, 2.18241829E-03, 2.12539076E-03,
     &   2.07138604E-03, 2.02017253E-03, 1.97154176E-03, 1.92530556E-03,
     &   1.88129368E-03, 1.83935167E-03, 1.79933911E-03, 1.76112805E-03,
     &   1.72460169E-03, 1.68965234E-03, 1.65618443E-03, 1.62410558E-03,
     &   1.59333384E-03, 1.56379243E-03, 1.53541207E-03, 1.50812711E-03,
     &   1.48187733E-03, 1.45660690E-03, 1.43226401E-03, 1.40880051E-03/
  
         DATA ((DGS  (I,J), I= 801, 900), J=3,3) /
     &   1.38617149E-03, 1.36433529E-03, 1.34325299E-03, 1.32288863E-03,
     &   1.30320760E-03, 1.28417840E-03, 1.26577131E-03, 1.24795847E-03,
     &   1.23071378E-03, 1.21401275E-03, 1.19783237E-03, 1.18215108E-03,
     &   1.16694729E-03, 1.15220590E-03, 1.13790509E-03, 1.12402938E-03,
     &   1.11056300E-03, 1.09749116E-03, 1.08480003E-03, 1.07247663E-03,
     &   1.06050666E-03, 1.04888320E-03, 1.03759371E-03, 1.02662860E-03,
     &   1.01597910E-03, 1.00563728E-03, 9.95596082E-04, 9.85849392E-04,
     &   9.76392093E-04, 9.67220185E-04, 9.58330936E-04, 9.49723094E-04,
     &   9.41397184E-04, 9.33355933E-04, 9.25604868E-04, 9.18153201E-04,
     &   9.11015204E-04, 9.03034098E-04, 8.95232365E-04, 8.87604485E-04,
     &   8.80145164E-04, 8.72849320E-04, 8.65712077E-04, 8.58728138E-04,
     &   8.51894861E-04, 8.45868545E-04, 8.38159149E-04, 8.31745230E-04,
     &   8.25464538E-04, 8.19313860E-04, 8.13288634E-04, 8.07385938E-04,
     &   8.01602462E-04, 7.95933564E-04, 7.90380541E-04, 7.84936057E-04,
     &   6.12906743E-04, 5.16008430E-04, 4.79186808E-04, 5.36353218E-04,
     &   6.40780425E-04, 7.06820969E-04, 7.94330188E-04, 9.13025095E-04,
     &   1.03247307E-03, 1.19193890E-03, 1.25784872E-03, 1.40952786E-03,
     &   1.50068049E-03, 1.60503010E-03, 1.72388836E-03, 1.86358427E-03,
     &   2.02912423E-03, 2.22781703E-03, 2.47028550E-03, 2.77239837E-03,
     &   3.15886446E-03, 3.34537019E-03, 3.55522602E-03, 3.79308489E-03,
     &   4.06492509E-03, 4.37855814E-03, 4.74438945E-03, 4.95111689E-03,
     &   5.17659255E-03, 5.42348259E-03, 5.69498386E-03, 5.99496294E-03,
     &   6.32814111E-03, 6.70034430E-03, 7.11884627E-03, 7.59284802E-03,
     &   8.13416132E-03, 8.75820531E-03, 9.48549700E-03, 1.03066484E-02,
     &   1.08442330E-02, 1.14407584E-02, 1.21064738E-02, 1.28541497E-02/
  
         DATA ((DGS  (I,J), I= 901,1000), J=3,3) /
     &   1.36999047E-02, 1.46643786E-02, 1.57744366E-02, 1.70657066E-02,
     &   1.85864664E-02, 2.04038012E-02, 2.26137397E-02, 2.53587317E-02,
     &   2.88595070E-02, 3.34772845E-02, 3.98463151E-02, 4.91905529E-02,
     &   6.42097268E-02, 9.22113662E-02, 1.36252513E-01, 1.61318954E-01,
     &   1.88660097E-01, 2.55932068E-01, 2.80168551E-01, 3.00171450E-01,
     &   3.17158549E-01, 3.31462654E-01, 3.43198437E-01, 3.53303568E-01,
     &   3.61577704E-01, 3.67499512E-01, 3.72530340E-01, 3.76091718E-01,
     &   3.78204040E-01, 3.78966948E-01, 3.78425182E-01, 3.76944818E-01,
     &   3.73940451E-01, 3.70009091E-01, 3.64709833E-01, 3.57891673E-01,
     &   3.50722327E-01, 3.40677587E-01, 3.30522140E-01, 3.18849908E-01,
     &   3.05585979E-01, 2.88019128E-01, 2.71121033E-01, 2.49235088E-01,
     &   2.28628201E-01, 1.98584352E-01, 1.65796157E-01, 1.16824874E-01,
     &   7.41381439E-02, 2.49698520E-02, 3.11088834E-04, 2.48451532E-02,
     &   4.95893123E-02, 1.16706668E-01, 1.65685150E-01, 1.98479841E-01,
     &   2.28531013E-01, 2.49143806E-01, 2.71036964E-01, 2.87941422E-01,
     &   3.05515805E-01, 3.18786208E-01, 3.30464871E-01, 3.40626658E-01,
     &   3.50678629E-01, 3.57853995E-01, 3.64678938E-01, 3.69984696E-01,
     &   3.73922257E-01, 3.76933333E-01, 3.78419236E-01, 3.78967672E-01,
     &   3.78210945E-01, 3.76104943E-01, 3.72549896E-01, 3.67525291E-01,
     &   3.61609061E-01, 3.53341095E-01, 3.43242020E-01, 3.31512010E-01,
     &   3.17213744E-01, 3.00232403E-01, 2.80235129E-01, 2.56004248E-01,
     &   2.26628748E-01, 2.42576963E-01, 2.07510537E-01, 1.85911772E-01,
     &   1.72853872E-01, 1.45803901E-01, 1.36340990E-01, 1.15970487E-01,
     &   7.50913587E-02, 5.54051157E-02, 4.38729135E-02, 3.63080319E-02,
     &   3.09667139E-02, 2.69953424E-02, 2.39272669E-02, 2.14860129E-02/
  
         DATA ((DGS  (I,J), I=1001,1100), J=3,3) /
     &   1.94974203E-02, 1.78463469E-02, 1.64536325E-02, 1.52630675E-02,
     &   1.42336400E-02, 1.33347257E-02, 1.25429982E-02, 1.18403740E-02,
     &   1.12126220E-02, 1.06483858E-02, 9.75646485E-03, 8.64313272E-03,
     &   8.04768235E-03, 7.07467572E-03, 6.31332724E-03, 5.56683326E-03,
     &   4.50684410E-03, 3.34059690E-03, 2.65060661E-03, 2.36346209E-03,
     &   2.20255151E-03, 2.09818472E-03, 2.02432685E-03, 1.96879385E-03,
     &   1.92519188E-03, 1.88978876E-03, 1.86024888E-03, 1.83499736E-03,
     &   1.81305094E-03, 1.79360073E-03, 1.77610253E-03, 1.76017937E-03,
     &   1.74547834E-03, 1.73174970E-03, 1.71878330E-03, 1.70644505E-03,
     &   1.69455055E-03, 1.68300333E-03, 1.67169203E-03, 1.66053021E-03,
     &   1.64939027E-03, 1.63820879E-03, 1.62685595E-03, 1.61526674E-03,
     &   1.60328223E-03, 1.59076068E-03, 1.57745699E-03, 1.56311715E-03,
     &   1.54722622E-03, 1.52884588E-03, 1.50563943E-03, 1.45341361E-03,
     &   1.40884312E-03, 1.39366364E-03, 1.38364365E-03, 1.37641418E-03,
     &   1.37100759E-03, 1.36692273E-03, 1.36381730E-03, 1.36144867E-03,
     &   1.35964490E-03, 1.35818159E-03, 1.35702930E-03, 1.35597082E-03,
     &   1.35487548E-03, 1.35364654E-03, 1.35223664E-03, 1.35077136E-03,
     &   1.34885145E-03, 1.34623525E-03, 1.34282473E-03, 1.33848848E-03,
     &   1.33306853E-03, 1.32638192E-03, 1.31823730E-03, 1.30841604E-03,
     &   1.29662553E-03, 1.28225130E-03, 1.26585677E-03, 1.24593624E-03,
     &   1.22218763E-03, 1.19367227E-03, 1.15892727E-03, 1.11559649E-03,
     &   1.05914986E-03, 9.79886046E-04, 9.56267081E-04, 8.92574487E-04,
     &   8.00067984E-04, 7.91037051E-04, 7.30899287E-04, 7.09647040E-04,
     &   6.93173022E-04, 6.75749936E-04, 6.59246626E-04, 6.42634722E-04,
     &   6.31907584E-04, 6.26630267E-04, 6.11807923E-04, 5.97979251E-04/
  
         DATA ((DGS  (I,J), I=1101,1200), J=3,3) /
     &   5.85018194E-04, 5.72911761E-04, 5.61918283E-04, 5.51106505E-04,
     &   5.40724399E-04, 5.33792752E-04, 5.23849177E-04, 5.12031703E-04,
     &   5.00214229E-04, 4.88396755E-04, 4.82402421E-04, 4.75615220E-04,
     &   4.67527671E-04, 4.61241760E-04, 4.60197711E-04, 4.57260053E-04,
     &   4.47237881E-04, 4.37703131E-04, 4.35156151E-04, 4.35049162E-04,
     &   4.34171939E-04, 4.31514560E-04, 4.26567207E-04, 4.26960104E-04,
     &   4.33303406E-04, 4.47869815E-04, 4.58500559E-04, 4.38522336E-04,
     &   3.92969758E-04, 3.86620286E-04, 3.83243427E-04, 3.82482255E-04,
     &   3.77211132E-04, 3.73664250E-04, 3.69599340E-04, 3.66318794E-04,
     &   3.63755254E-04, 3.61080132E-04, 3.60222527E-04, 3.58010211E-04,
     &   3.54948709E-04, 3.53331686E-04, 3.51295619E-04, 3.49632140E-04,
     &   3.49471945E-04, 3.48685295E-04, 3.47160009E-04, 3.43035721E-04,
     &   3.39407467E-04, 3.38021684E-04, 3.36876234E-04, 3.35740819E-04,
     &   3.37448715E-04, 3.42832640E-04, 3.42971057E-04, 3.38907022E-04,
     &   3.35476733E-04, 3.31362464E-04, 3.24319733E-04, 3.18110615E-04,
     &   3.14613423E-04, 3.14731555E-04, 3.12737457E-04, 3.09500496E-04,
     &   3.09016044E-04, 3.06400738E-04, 3.06436235E-04, 3.01985169E-04,
     &   2.99782963E-04, 2.99534217E-04, 2.99140517E-04, 2.96127913E-04,
     &   2.94648413E-04, 2.92297131E-04, 2.89535525E-04, 2.87673304E-04,
     &   2.85857891E-04, 2.82778256E-04, 2.82896463E-04, 2.84655095E-04,
     &   2.91762560E-04, 2.95557327E-04, 2.72498061E-04, 2.71807551E-04,
     &   2.70585891E-04, 2.67299711E-04, 2.67895267E-04, 2.74552402E-04,
     &   2.72095807E-04, 2.70080523E-04, 2.68602320E-04, 2.58025031E-04,
     &   2.62743942E-04, 2.90967010E-04, 2.83446211E-04, 2.62900913E-04,
     &   2.58469764E-04, 2.56838271E-04, 2.54356475E-04, 2.53528094E-04/
  
         DATA ((DGS  (I,J), I=1201,1300), J=3,3) /
     &   2.52439999E-04, 2.50776734E-04, 2.48826379E-04, 2.47883799E-04,
     &   2.46303341E-04, 2.45942791E-04, 2.43870892E-04, 2.41853069E-04,
     &   2.39887817E-04, 2.37737488E-04, 2.37192483E-04, 2.35586486E-04,
     &   2.38685163E-04, 2.31151497E-04, 2.23485668E-04, 2.20455519E-04,
     &   2.16977616E-04, 2.16321705E-04, 2.13364863E-04, 2.11540938E-04,
     &   2.02426622E-04, 2.02296935E-04, 1.94530700E-04, 1.86279074E-04,
     &   2.81449393E-04, 3.65423204E-04, 3.93414474E-04, 3.28317959E-04,
     &   2.72042749E-04, 2.56310816E-04, 2.44359526E-04, 2.27128165E-04,
     &   2.15088282E-04, 2.10286285E-04, 2.06076388E-04, 2.02348638E-04,
     &   1.99020287E-04, 1.96027739E-04, 1.93313460E-04, 1.90852991E-04,
     &   1.88607102E-04, 1.86549779E-04, 1.84659583E-04, 1.82918682E-04,
     &   1.81312126E-04, 1.79827295E-04, 1.78453473E-04, 1.77181517E-04,
     &   1.76003597E-04, 1.74912985E-04, 1.73903892E-04, 1.72971335E-04,
     &   1.72111027E-04, 1.71319287E-04, 1.70592973E-04, 1.69929420E-04,
     &   1.69326393E-04, 1.68782048E-04, 1.68294898E-04, 1.67863795E-04,
     &   1.67487901E-04, 1.67166682E-04, 1.66899895E-04, 1.66687579E-04,
     &   1.66530059E-04, 1.66427941E-04, 1.66382122E-04, 1.66386796E-04,
     &   1.66464480E-04, 1.66790557E-04, 1.67379445E-04, 1.68256897E-04,
     &   1.69456774E-04, 1.71023138E-04, 1.73013289E-04, 1.75502249E-04,
     &   1.78589549E-04, 1.82409853E-04, 1.87150280E-04, 1.93086585E-04,
     &   2.00606944E-04, 2.10366715E-04, 2.23479426E-04, 2.25042915E-04,
     &   2.42069309E-04, 2.70795176E-04, 3.22175372E-04, 4.07469641E-04,
     &   4.43210366E-04, 5.94364825E-04, 8.82693443E-04, 1.01745670E-03,
     &   1.20752918E-03, 1.33482052E-03, 1.49433121E-03, 1.65411123E-03,
     &   1.85402399E-03, 1.97400561E-03, 2.11111637E-03, 2.26926835E-03/
  
         DATA ((DGS  (I,J), I=1301,1400), J=3,3) /
     &   2.45366170E-03, 2.67136228E-03, 2.93222072E-03, 3.08302902E-03,
     &   3.25039420E-03, 3.43718837E-03, 3.64698847E-03, 3.88430659E-03,
     &   4.15491696E-03, 4.46633042E-03, 4.82850037E-03, 5.25490346E-03,
     &   5.43248283E-03, 5.54389644E-03, 5.65999026E-03, 5.78106510E-03,
     &   5.90744807E-03, 6.03949558E-03, 6.17759668E-03, 6.32217686E-03,
     &   6.47370247E-03, 6.63268568E-03, 6.79969032E-03, 6.97533848E-03,
     &   7.16031832E-03, 7.35539302E-03, 7.56141131E-03, 7.77931981E-03,
     &   8.01017754E-03, 8.25517314E-03, 8.51564530E-03, 8.79310723E-03,
     &   9.08927604E-03, 9.40610831E-03, 9.74584330E-03, 1.01110559E-02,
     &   1.05047221E-02, 1.09303001E-02, 1.13918321E-02, 1.18940729E-02,
     &   1.24426548E-02, 1.30442988E-02, 1.37070919E-02, 1.44408520E-02,
     &   1.52576178E-02, 1.61723139E-02, 1.72036706E-02, 1.83755197E-02,
     &   1.97186579E-02, 2.12735917E-02, 2.30946908E-02, 2.52566732E-02,
     &   2.78651056E-02, 3.10741521E-02, 3.51181687E-02, 4.03716190E-02,
     &   4.74721168E-02, 5.76006570E-02, 7.32163459E-02, 1.00421708E-01,
     &   1.59621984E-01, 1.96326859E-01, 3.73943002E-01, 5.20315475E-01,
     &   6.26413160E-01, 7.08506917E-01, 7.75956974E-01, 8.34983179E-01,
     &   8.89751270E-01, 9.27878705E-01, 9.66689494E-01, 1.00485956E+00,
     &   1.02326314E+00, 1.04905540E+00, 1.06450982E+00, 1.08369284E+00,
     &   1.08869203E+00, 1.09608648E+00, 1.09915946E+00, 1.09684346E+00,
     &   1.09330959E+00, 1.08797443E+00, 1.07107898E+00, 1.05923090E+00,
     &   1.04466904E+00, 1.00715024E+00, 9.83857387E-01, 9.57236269E-01,
     &   9.26777809E-01, 8.55358729E-01, 8.13415225E-01, 7.67944693E-01,
     &   6.64586381E-01, 6.07372517E-01, 4.81464777E-01, 3.42852183E-01,
     &   3.66048407E-02, 3.38299566E-01, 4.77267828E-01, 6.02988769E-01/
  
         DATA ((DGS  (I,J), I=1401,1500), J=3,3) /
     &   7.14700277E-01, 7.64922494E-01, 8.10644186E-01, 8.52420253E-01,
     &   9.24738904E-01, 9.55126587E-01, 9.82265916E-01, 1.00576471E+00,
     &   1.04366067E+00, 1.05825334E+00, 1.07039715E+00, 1.08750206E+00,
     &   1.09302536E+00, 1.09866696E+00, 1.09917482E+00, 1.09625551E+00,
     &   1.08903128E+00, 1.07833727E+00, 1.06497093E+00, 1.04957227E+00,
     &   1.02383637E+00, 1.00555418E+00, 9.67308193E-01, 9.28598135E-01,
     &   8.90355120E-01, 8.35551594E-01, 7.76475709E-01, 7.08961654E-01,
     &   6.26786976E-01, 5.20588750E-01, 3.71939924E-01, 2.03001113E-01,
     &   1.16112053E-01, 8.12388715E-02, 6.24631639E-02, 5.07340487E-02,
     &   4.27126914E-02, 3.68813810E-02, 3.24511286E-02, 2.89712435E-02,
     &   2.61655938E-02, 2.38555649E-02, 2.19205075E-02, 2.02759897E-02,
     &   1.88611570E-02, 1.76310395E-02, 1.65516870E-02, 1.55969886E-02,
     &   1.47465337E-02, 1.39841367E-02, 1.32967980E-02, 1.26739566E-02,
     &   1.21069440E-02, 1.15885785E-02, 1.11128595E-02, 1.06747343E-02,
     &   1.02699180E-02, 9.89475329E-03, 9.54609908E-03, 9.22124297E-03,
     &   8.91783037E-03, 8.63380736E-03, 8.36737425E-03, 8.11694738E-03,
     &   7.88112766E-03, 7.65867446E-03, 7.44848377E-03, 7.24956991E-03,
     &   7.06105010E-03, 6.88213135E-03, 6.71209934E-03, 6.55030893E-03,
     &   6.39617592E-03, 6.24917007E-03, 6.10880899E-03, 5.97465289E-03,
     &   5.84629993E-03, 5.72338226E-03, 5.60556246E-03, 5.49253050E-03,
     &   5.38400098E-03, 4.56534042E-03, 4.06336737E-03, 3.58187090E-03,
     &   3.04395545E-03, 2.54033615E-03, 2.04297301E-03, 1.76403436E-03,
     &   1.39361398E-03, 1.26611834E-03, 1.16300369E-03, 1.07255106E-03,
     &   9.97198223E-04, 9.33367613E-04, 8.31184584E-04, 7.53246645E-04,
     &   5.43171304E-04, 4.23009277E-04, 4.33238032E-04, 6.04012743E-04/
  
         DATA ((DGS  (I,J), I=1501,1600), J=3,3) /
     &   9.28042071E-04, 1.36699753E-03, 1.95979145E-03, 2.78765966E-03,
     &   4.87564600E-03, 5.27247647E-03, 5.73993003E-03, 5.87541274E-03,
     &   6.18425876E-03, 6.52746859E-03, 6.91110643E-03, 7.34275250E-03,
     &   7.83200839E-03, 8.39121894E-03, 9.03652734E-03, 9.78945768E-03,
     &   1.06793608E-02, 1.17473273E-02, 1.30527098E-02, 1.46845353E-02,
     &   1.67826999E-02, 1.95803557E-02, 2.34971525E-02, 2.93723114E-02,
     &   3.91636712E-02, 5.87423482E-02, 8.50058191E-02, 8.94141128E-02,
     &   9.43043206E-02, 9.97599839E-02, 1.05885124E-01, 1.12810922E-01,
     &   1.20705194E-01, 1.29786121E-01, 1.40342662E-01, 1.52765727E-01,
     &   1.67597413E-01, 1.85611740E-01, 2.07953150E-01, 2.36387304E-01,
     &   2.73786407E-01, 3.25149889E-01, 3.99994989E-01, 5.18823411E-01,
     &   7.34468572E-01, 1.22231732E+00, 1.39333431E+00, 1.52793765E+00,
     &   1.67796482E+00, 1.80387363E+00, 1.89467650E+00, 1.97168799E+00,
     &   2.00717185E+00, 2.02126000E+00, 2.00354055E+00, 1.94075263E+00,
     &   1.86846181E+00, 1.85478256E+00, 1.84767100E+00, 1.83289417E+00,
     &   1.82677395E+00, 1.82210430E+00, 1.81736607E+00, 1.76612306E+00,
     &   1.67548345E+00, 1.55420002E+00, 1.42569807E+00, 1.26110012E+00,
     &   1.07407327E+00, 8.87889015E-01, 7.77868446E-01, 6.63691236E-01,
     &   5.45873582E-01, 3.75928042E-01, 2.51843604E-01, 1.26297580E-01,
     &   5.05691201E-02, 2.52955116E-02, 1.26576444E-02, 3.22093394E-04,
     &   1.26318567E-02, 2.52697193E-02, 1.26271840E-01, 2.51818033E-01,
     &   3.75902751E-01, 9.30608368E-01, 1.13244134E+00, 1.45584471E+00,
     &   1.58022898E+00, 1.69709039E+00, 1.79262082E+00, 1.86170288E+00,
     &   1.92143632E+00, 1.96149222E+00, 1.99264199E+00, 2.01022356E+00,
     &   2.01983233E+00, 2.02088806E+00, 2.01501106E+00, 2.00444176E+00/
  
         DATA ((DGS  (I,J), I=1601,1700), J=3,3) /
     &   1.96950624E+00, 1.94596002E+00, 1.91985416E+00, 1.89468397E+00,
     &   1.83802189E+00, 1.80701121E+00, 1.75664576E+00, 1.67797640E+00,
     &   1.39334896E+00, 1.17285669E+00, 1.00589976E+00, 8.77641624E-01,
     &   7.76968411E-01, 6.96253187E-01, 6.15660132E-01, 4.89829110E-01,
     &   4.55777747E-01, 4.26100417E-01, 4.00014016E-01, 3.61246659E-01,
     &   2.99006673E-01, 2.54986915E-01, 2.22230495E-01, 1.96914274E-01,
     &   1.76766347E-01, 1.60352958E-01, 1.46725124E-01, 1.35229939E-01,
     &   1.25403573E-01, 1.16907498E-01, 1.09488887E-01, 1.02955124E-01,
     &   9.71568980E-02, 9.19766842E-02, 8.73207189E-02, 5.87616897E-02,
     &   3.91830182E-02, 2.93916623E-02, 1.95997147E-02, 1.47039045E-02,
     &   1.17667096E-02, 9.80885570E-03, 8.41063554E-03, 7.36219049E-03,
     &   6.54693080E-03, 5.89490201E-03, 5.52510647E-03, 5.09374581E-03,
     &   4.72529379E-03, 4.40694705E-03, 4.12915593E-03, 3.88465263E-03,
     &   3.00068563E-03, 2.44886547E-03, 2.07223660E-03, 1.79928490E-03,
     &   1.59276419E-03, 1.43137536E-03, 1.30201736E-03, 1.19624221E-03,
     &   5.41517583E-04, 5.39271702E-04, 5.49975626E-04, 5.66364779E-04,
     &   5.90524156E-04, 6.26052320E-04, 6.49929331E-04, 6.79444767E-04,
     &   7.63402117E-04, 9.05792554E-04, 1.17989041E-03, 1.85361639E-03,
     &   2.52090360E-03, 2.69475727E-03, 2.89580956E-03, 3.13085971E-03,
     &   3.40918922E-03, 3.74379348E-03, 4.15342723E-03, 4.66623982E-03,
     &   5.32646918E-03, 6.20781006E-03, 7.44294989E-03, 9.29727238E-03,
     &   1.23898652E-02, 1.29278794E-02, 1.35147726E-02, 1.41576639E-02,
     &   1.48648820E-02, 1.56464933E-02, 1.65150795E-02, 1.74858923E-02,
     &   1.85779698E-02, 1.98158224E-02, 2.12305456E-02, 2.28627551E-02,
     &   2.47672064E-02, 2.70179132E-02, 2.97183878E-02, 3.30191615E-02/
  
         DATA ((DGS  (I,J), I=1701,1800), J=3,3) /
     &   3.40505758E-02, 3.71448400E-02, 4.24480120E-02, 4.95182128E-02,
     &   5.94132439E-02, 7.42469020E-02, 9.89353806E-02, 1.48154249E-01,
     &   2.93629794E-01, 3.49087618E-01, 4.92380377E-01, 6.01351654E-01,
     &   6.91139524E-01, 7.69507307E-01, 8.39035428E-01, 9.01408881E-01,
     &   9.57123802E-01, 1.00876582E+00, 1.05753549E+00, 1.10210557E+00,
     &   1.14131018E+00, 1.17757489E+00, 1.21027177E+00, 1.23891029E+00,
     &   1.26611912E+00, 1.28840648E+00, 1.30581069E+00, 1.32058735E+00,
     &   1.33196095E+00, 1.33900651E+00, 1.34077908E+00, 1.33778413E+00,
     &   1.32913519E+00, 1.31385279E+00, 1.29087635E+00, 1.26504543E+00,
     &   1.22503847E+00, 1.17414458E+00, 1.11132900E+00, 1.02183944E+00,
     &   9.14072858E-01, 7.68381225E-01, 5.77467911E-01, 7.91190911E-02,
     &   4.97897899E-04, 2.61400453E-01, 5.77458528E-01, 7.68372794E-01,
     &   9.14065416E-01, 1.02183293E+00, 1.11132344E+00, 1.17413982E+00,
     &   1.22503451E+00, 1.26504223E+00, 1.29087376E+00, 1.31385090E+00,
     &   1.32913395E+00, 1.33778351E+00, 1.34077902E+00, 1.33900698E+00,
     &   1.33196198E+00, 1.32058890E+00, 1.30581271E+00, 1.28840893E+00,
     &   1.26612201E+00, 1.23891362E+00, 1.21027549E+00, 1.17757899E+00,
     &   1.14131465E+00, 1.10211039E+00, 1.05754065E+00, 1.00877131E+00,
     &   9.57129606E-01, 9.01414977E-01, 8.39041811E-01, 7.69513966E-01,
     &   6.91146449E-01, 6.01358834E-01, 4.92387804E-01, 3.49095283E-01,
     &   2.98918350E-01, 2.89507219E-01, 2.77833656E-01, 2.45592061E-01,
     &   2.16534832E-01, 1.48154071E-01, 9.89432580E-02, 7.42527671E-02,
     &   5.94198416E-02, 4.95261102E-02, 4.24559136E-02, 3.71522397E-02,
     &   3.30270721E-02, 2.97263034E-02, 2.70255662E-02, 2.47751330E-02,
     &   2.28706878E-02, 2.12383196E-02, 1.98237688E-02, 1.85859237E-02/
  
         DATA ((DGS  (I,J), I=1801,1900), J=3,3) /
     &   1.23978961E-02, 9.30541069E-03, 7.45122605E-03, 6.21625446E-03,
     &   5.33511213E-03, 4.67511151E-03, 4.16255770E-03, 3.41892671E-03,
     &   2.90627205E-03, 2.70562598E-03, 2.53220736E-03, 1.91447495E-03,
     &   1.47370718E-03, 1.22043074E-03, 1.06022219E-03, 9.52975139E-04,
     &   8.78581520E-04, 8.25708233E-04, 7.87691534E-04, 7.60316033E-04,
     &   7.40493196E-04, 7.26110656E-04, 7.15933535E-04, 7.09079776E-04,
     &   7.04917332E-04, 7.02993767E-04, 7.02988803E-04, 7.04682371E-04,
     &   7.07933348E-04, 7.12666512E-04, 7.18861833E-04, 7.26541147E-04,
     &   7.48542100E-04, 1.15900655E-03, 1.25581074E-03, 1.43334034E-03,
     &   1.58048035E-03, 1.70472783E-03, 1.81070593E-03, 1.90162951E-03,
     &   1.97935891E-03, 2.04493926E-03, 2.10008952E-03, 2.14563506E-03,
     &   2.18184023E-03, 2.20924232E-03, 2.22843294E-03, 2.23981569E-03,
     &   2.24335871E-03, 2.23937291E-03, 2.22797368E-03, 2.20883015E-03,
     &   2.18236633E-03, 2.14910889E-03, 2.10689395E-03, 2.05844757E-03,
     &   2.00076424E-03, 1.93489078E-03, 1.85923058E-03, 1.77352108E-03,
     &   1.67771236E-03, 1.57203927E-03, 1.44896690E-03, 1.31093994E-03,
     &   1.15658889E-03, 9.75384841E-04, 7.68774735E-04, 6.55130930E-04,
     &   1.10192982E-03, 1.32203443E-03, 1.48859402E-03, 1.62035376E-03,
     &   1.73232719E-03, 1.82808004E-03, 1.90731801E-03, 1.97669129E-03,
     &   2.03656758E-03, 2.08743709E-03, 2.12987168E-03, 2.16519289E-03,
     &   2.19302838E-03, 2.21524557E-03, 2.23054801E-03, 2.24010382E-03,
     &   2.24365029E-03, 2.24119359E-03, 2.23289713E-03, 2.21841682E-03,
     &   2.19765666E-03, 2.17076751E-03, 2.13724717E-03, 2.09429616E-03,
     &   2.04609558E-03, 1.99216820E-03, 1.92650893E-03, 1.85088031E-03,
     &   1.76374965E-03, 1.66325433E-03, 1.54619900E-03, 1.40796868E-03/
  
         DATA ((DGS  (I,J), I=1901,2000), J=3,3) /
     &   1.24104623E-03, 1.03070405E-03, 7.50034452E-04, 7.34990522E-04,
     &   7.04728673E-04, 6.93699059E-04, 6.89978186E-04, 6.89615530E-04,
     &   6.90904469E-04, 6.92976845E-04, 6.95335356E-04, 6.97682936E-04,
     &   6.99817483E-04, 7.01611942E-04, 7.02964749E-04, 7.03808183E-04,
     &   7.04090099E-04, 7.03765945E-04, 7.02800551E-04, 7.01163707E-04,
     &   6.98822438E-04, 6.95759777E-04, 6.91918357E-04, 6.87307136E-04,
     &   6.81870556E-04, 6.75580914E-04, 6.68411020E-04, 6.60295349E-04,
     &   6.51193898E-04, 6.41069757E-04, 6.29840484E-04, 6.17362741E-04,
     &   6.03673785E-04, 5.88487535E-04, 5.71753787E-04, 5.53177339E-04,
     &   5.32361500E-04, 5.08650712E-04, 4.76330437E-04, 4.84955107E-04,
     &   4.98050035E-04, 5.10977795E-04, 5.23350158E-04, 5.35060977E-04,
     &   5.46126861E-04, 5.56474027E-04, 5.66121912E-04, 5.75135538E-04,
     &   5.83455033E-04, 5.91138628E-04, 5.98201761E-04, 6.04627011E-04,
     &   6.10475821E-04, 6.15763789E-04, 6.20426628E-04, 6.24545035E-04,
     &   6.28128183E-04, 6.31134112E-04, 6.33612015E-04, 6.35546405E-04,
     &   6.36962951E-04, 6.37846484E-04, 6.38212874E-04, 6.38063538E-04,
     &   6.37402380E-04, 6.36236006E-04, 6.34566749E-04, 6.32404655E-04,
     &   6.29757879E-04, 6.26639326E-04, 6.23058363E-04, 6.19044128E-04,
     &   6.14601176E-04, 6.09765844E-04, 5.78027604E-04, 5.75753372E-04,
     &   5.73416078E-04, 5.70992021E-04, 5.68475406E-04, 5.65862564E-04,
     &   5.63152109E-04, 5.60319319E-04, 5.57334578E-04, 5.54221879E-04,
     &   5.50950797E-04, 5.47518641E-04, 5.43924389E-04, 5.40168745E-04,
     &   5.36213461E-04, 5.32055531E-04, 5.27739337E-04, 5.23176307E-04,
     &   5.18361050E-04, 5.13343699E-04, 5.08018561E-04, 5.02496898E-04,
     &   4.96668207E-04, 4.90532946E-04, 4.83899836E-04, 4.77098735E-04/
  
         DATA ((DGS  (I,J), I=2001,2100), J=3,3) /
     &   4.70019280E-04, 4.62471001E-04, 4.54477214E-04, 4.46006600E-04,
     &   4.37052047E-04, 4.27426504E-04, 4.17030262E-04, 4.05606291E-04,
     &   3.92628610E-04, 3.72501689E-04, 3.70946778E-04, 3.75560594E-04,
     &   3.80882053E-04, 3.86367233E-04, 3.91826115E-04, 3.97142364E-04,
     &   4.02324364E-04, 4.07310155E-04, 4.12072067E-04, 4.16561189E-04,
     &   4.20873493E-04, 4.24938475E-04, 4.28778203E-04, 4.32378347E-04,
     &   4.35733003E-04, 4.38902491E-04, 4.41813494E-04, 4.44495287E-04,
     &   4.46994851E-04, 4.49297234E-04, 4.51372461E-04, 4.53161255E-04,
     &   4.54714345E-04, 4.56119363E-04, 4.57317988E-04, 4.58309565E-04,
     &   4.59095432E-04, 4.59683136E-04, 4.60069822E-04, 4.60263406E-04,
     &   4.60267164E-04, 4.60083023E-04, 4.59715456E-04, 4.59159940E-04,
     &   4.58411777E-04, 4.52701378E-04, 4.30989619E-04, 4.20818385E-04,
     &   4.25121270E-04, 4.40204965E-04, 4.61243607E-04, 4.87647888E-04,
     &   5.15702158E-04, 5.47131437E-04, 5.80337650E-04, 6.13736413E-04,
     &   6.50624403E-04, 6.88323047E-04, 6.72993876E-04, 6.57664706E-04,
     &   6.26444205E-04, 5.98148420E-04, 5.74360727E-04, 5.52253708E-04,
     &   5.33286503E-04, 5.15360998E-04, 4.99761816E-04, 4.84840038E-04,
     &   4.71145643E-04, 4.59049756E-04, 4.47327086E-04, 4.36897809E-04,
     &   4.26724801E-04, 4.17621131E-04, 4.08693949E-04, 4.00666317E-04,
     &   3.92759279E-04, 3.85619812E-04, 3.78560952E-04, 3.72164896E-04,
     &   3.66089320E-04, 3.60054001E-04, 3.54561240E-04, 3.49090227E-04,
     &   3.44098459E-04, 3.39114626E-04, 3.34557134E-04, 3.29997214E-04,
     &   3.25818961E-04, 3.21630484E-04, 3.17785596E-04, 3.13924623E-04,
     &   3.10216333E-04, 3.06803923E-04, 3.03369246E-04, 3.00204055E-04,
     &   2.97013805E-04, 2.94069960E-04, 2.91099029E-04, 2.88354203E-04/
  
         DATA ((DGS  (I,J), I=2101,2174), J=3,3) /
     &   2.85580858E-04, 2.83015672E-04, 2.80420998E-04, 2.78018538E-04,
     &   2.75690119E-04, 2.73331421E-04, 2.71144304E-04, 2.68926705E-04,
     &   2.66868590E-04, 2.64779080E-04, 2.62839067E-04, 2.60868699E-04,
     &   2.59037063E-04, 2.57175367E-04, 2.55443467E-04, 2.53681875E-04,
     &   2.51968425E-04, 2.50372768E-04, 2.48748103E-04, 2.47126207E-04,
     &   2.45582817E-04, 2.44143738E-04, 2.42676716E-04, 2.41311978E-04,
     &   2.39912251E-04, 2.38609067E-04, 2.37279099E-04, 2.36036934E-04,
     &   2.34768576E-04, 2.33583352E-04, 2.32424590E-04, 2.31240527E-04,
     &   2.30133279E-04, 2.29001329E-04, 2.27942332E-04, 2.26859225E-04,
     &   2.25845480E-04, 2.24820781E-04, 2.23849676E-04, 2.22855623E-04,
     &   2.21924455E-04, 2.20970904E-04, 2.11753344E-04, 2.04272801E-04,
     &   2.03204931E-04, 1.73681792E-04, 1.66724459E-04, 1.55908481E-04,
     &   1.52415863E-04, 1.52194334E-04, 1.48953136E-04, 1.48944766E-04,
     &   1.47216700E-04, 1.47166683E-04, 1.47126347E-04, 1.46439326E-04,
     &   1.46028482E-04, 1.45958622E-04, 1.45846709E-04, 1.45685812E-04,
     &   1.45575694E-04, 1.45507918E-04, 1.44899872E-04, 1.44871552E-04,
     &   1.44719019E-04, 1.44690009E-04, 1.44721281E-04, 1.44504654E-04,
     &   1.44509362E-04, 1.44474248E-04, 1.44328789E-04, 1.44186524E-04,
     &   1.44127963E-04, 1.43767228E-04/
  
      save
      RETURN
      END


c      ++++ dalhadshigh19 ++++  

c update jun 2019 
       subroutine dalhad_timelike1h17
       IMPLICIT NONE
       INTEGER NC,I,J
       PARAMETER(NC=200)
       REAL EMA(NC),DAM(NC,3),DGM(NC,3)
       COMMON /DATM17/EMA,DAM,DGM
c  
c******************************************************************************
c*                                                                            *
c*    --- intRdat1 ---                              Fri Jun 14 03:51:38 2019  *
c*                                                                            *
c***************************# FJ@HU Berlin #***********************************
c  
c  "Delta alpha"               Update version (12/06/2019) 
c  
c ISCAN:  2, Ismooth: 0, IGS: 0, DSET: WAVE, iplot: 0 itestflavorspl: 0
c IKE,Emin,Emax,NP,N,EPSREL:  1, 6.0000E-01, 1.4000E+00, 100, 10, 1.00E-02, 
c ALS(sta)(sys):  0.1184( 0.0007)( 0.0000), MZINP:   91.1876, MTOP:    173.20
c NF,IOR,ICHK: 5,4,2,ISU2: 0,NFL: 5,INAG: 1,inotail:  0, sin2W:   0.23153
c CHPTCUT,EC,ECUT: 0.3180,     5.20,    11.50
c  
  
       DATA  (EMA  (I), I=   1, 100) /
     &   1.3005E+01, 1.3500E+01, 1.4000E+01, 1.4500E+01, 1.5000E+01,
     &   1.6000E+01, 1.7000E+01, 1.8000E+01, 1.9000E+01, 2.0000E+01,
     &   2.1000E+01, 2.2000E+01, 2.3000E+01, 2.4000E+01, 2.5000E+01,
     &   2.6000E+01, 2.7000E+01, 2.8000E+01, 2.9000E+01, 3.0000E+01,
     &   3.1000E+01, 3.2000E+01, 3.3000E+01, 3.4000E+01, 3.5000E+01,
     &   3.6000E+01, 3.7000E+01, 3.8000E+01, 3.9000E+01, 4.0000E+01,
     &   4.1000E+01, 4.2000E+01, 4.3000E+01, 4.4000E+01, 4.5000E+01,
     &   4.6000E+01, 4.7000E+01, 4.8000E+01, 4.9000E+01, 5.0000E+01,
     &   5.1000E+01, 5.2000E+01, 5.3000E+01, 5.4000E+01, 5.5000E+01,
     &   5.6000E+01, 5.7000E+01, 5.8000E+01, 5.9000E+01, 6.0000E+01,
     &   6.1000E+01, 6.2000E+01, 6.3000E+01, 6.4000E+01, 6.5000E+01,
     &   6.6000E+01, 6.7000E+01, 6.8000E+01, 6.9000E+01, 7.0000E+01,
     &   7.1000E+01, 7.2000E+01, 7.3000E+01, 7.4000E+01, 7.5000E+01,
     &   7.6000E+01, 7.7000E+01, 7.8000E+01, 7.9000E+01, 8.0000E+01,
     &   8.1000E+01, 8.2000E+01, 8.3000E+01, 8.4000E+01, 8.5000E+01,
     &   8.6000E+01, 8.7000E+01, 8.8000E+01, 8.9000E+01, 9.0000E+01,
     &   9.1000E+01, 9.2000E+01, 9.3000E+01, 9.4000E+01, 9.5000E+01,
     &   9.6000E+01, 9.7000E+01, 9.8000E+01, 9.9000E+01, 1.0000E+02,
     &   1.0900E+02, 1.1800E+02, 1.2700E+02, 1.3600E+02, 1.4500E+02,
     &   1.5400E+02, 1.6300E+02, 1.7200E+02, 1.8100E+02, 1.9000E+02/
  
       DATA  (EMA  (I), I= 101, 200) /
     &   1.9900E+02, 2.0800E+02, 2.1700E+02, 2.2600E+02, 2.3500E+02,
     &   2.4400E+02, 2.5300E+02, 2.6200E+02, 2.7100E+02, 2.8000E+02,
     &   2.8900E+02, 2.9800E+02, 3.0700E+02, 3.1600E+02, 3.2500E+02,
     &   3.3400E+02, 3.4300E+02, 3.5200E+02, 3.6100E+02, 3.7000E+02,
     &   3.7900E+02, 3.8800E+02, 3.9700E+02, 4.0600E+02, 4.1500E+02,
     &   4.2400E+02, 4.3300E+02, 4.4200E+02, 4.5100E+02, 4.6000E+02,
     &   4.6900E+02, 4.7800E+02, 4.8700E+02, 4.9600E+02, 5.0500E+02,
     &   5.1400E+02, 5.2300E+02, 5.3200E+02, 5.4100E+02, 5.5000E+02,
     &   5.5900E+02, 5.6800E+02, 5.7700E+02, 5.8600E+02, 5.9500E+02,
     &   6.0400E+02, 6.1300E+02, 6.2200E+02, 6.3100E+02, 6.4000E+02,
     &   6.4900E+02, 6.5800E+02, 6.6700E+02, 6.7600E+02, 6.8500E+02,
     &   6.9400E+02, 7.0300E+02, 7.1200E+02, 7.2100E+02, 7.3000E+02,
     &   7.3900E+02, 7.4800E+02, 7.5700E+02, 7.6600E+02, 7.7500E+02,
     &   7.8400E+02, 7.9300E+02, 8.0200E+02, 8.1100E+02, 8.2000E+02,
     &   8.2900E+02, 8.3800E+02, 8.4700E+02, 8.5600E+02, 8.6500E+02,
     &   8.7400E+02, 8.8300E+02, 8.9200E+02, 9.0100E+02, 9.1000E+02,
     &   9.1900E+02, 9.2800E+02, 9.3700E+02, 9.4600E+02, 9.5500E+02,
     &   9.6400E+02, 9.7300E+02, 9.8200E+02, 9.9100E+02, 1.0000E+03,
     &   2.0000E+03, 3.0000E+03, 4.0000E+03, 5.0000E+03, 6.0000E+03,
     &   8.0000E+03, 1.0000E+04, 1.2000E+04, 1.4000E+04, 2.0000E+04/
  
  
         DATA ((DAM  (I,J), I=   1, 100), J=1,1) /
     &   1.5857E-02, 1.6140E-02, 1.6341E-02, 1.6567E-02, 1.6783E-02,
     &   1.7189E-02, 1.7567E-02, 1.7920E-02, 1.8252E-02, 1.8566E-02,
     &   1.8862E-02, 1.9254E-02, 1.9413E-02, 1.9670E-02, 1.9916E-02,
     &   2.0153E-02, 2.0378E-02, 2.0596E-02, 2.0806E-02, 2.1009E-02,
     &   2.1205E-02, 2.1395E-02, 2.1578E-02, 2.1759E-02, 2.1962E-02,
     &   2.2097E-02, 2.2260E-02, 2.2419E-02, 2.2574E-02, 2.2725E-02,
     &   2.2871E-02, 2.3014E-02, 2.3162E-02, 2.3290E-02, 2.3423E-02,
     &   2.3617E-02, 2.3681E-02, 2.3806E-02, 2.3929E-02, 2.4048E-02,
     &   2.4166E-02, 2.4281E-02, 2.4394E-02, 2.4529E-02, 2.4613E-02,
     &   2.4720E-02, 2.4825E-02, 2.5053E-02, 2.5029E-02, 2.5129E-02,
     &   2.5227E-02, 2.5323E-02, 2.5418E-02, 2.5511E-02, 2.5602E-02,
     &   2.5693E-02, 2.5782E-02, 2.5869E-02, 2.5956E-02, 2.6041E-02,
     &   2.6125E-02, 2.6208E-02, 2.6289E-02, 2.6370E-02, 2.6449E-02,
     &   2.6527E-02, 2.6605E-02, 2.6681E-02, 2.6756E-02, 2.6831E-02,
     &   2.6904E-02, 2.6977E-02, 2.7048E-02, 2.7119E-02, 2.7189E-02,
     &   2.7258E-02, 2.7327E-02, 2.7394E-02, 2.7461E-02, 2.7527E-02,
     &   2.7592E-02, 2.7657E-02, 2.7721E-02, 2.7784E-02, 2.7847E-02,
     &   2.7908E-02, 2.7970E-02, 2.8030E-02, 2.8090E-02, 2.8150E-02,
     &   2.8659E-02, 2.9128E-02, 2.9563E-02, 2.9968E-02, 3.0347E-02,
     &   3.0704E-02, 3.1040E-02, 3.1359E-02, 3.1661E-02, 3.1950E-02/
  
         DATA ((DAM  (I,J), I= 101, 200), J=1,1) /
     &   3.2225E-02, 3.2488E-02, 3.2740E-02, 3.2982E-02, 3.3216E-02,
     &   3.3440E-02, 3.3657E-02, 3.3867E-02, 3.4069E-02, 3.4266E-02,
     &   3.4456E-02, 3.4641E-02, 3.4821E-02, 3.4996E-02, 3.5166E-02,
     &   3.5332E-02, 3.5494E-02, 3.5651E-02, 3.5807E-02, 3.5959E-02,
     &   3.6107E-02, 3.6253E-02, 3.6395E-02, 3.6535E-02, 3.6672E-02,
     &   3.6806E-02, 3.6938E-02, 3.7068E-02, 3.7195E-02, 3.7321E-02,
     &   3.7445E-02, 3.7566E-02, 3.7687E-02, 3.7805E-02, 3.7915E-02,
     &   3.8019E-02, 3.8121E-02, 3.8220E-02, 3.8319E-02, 3.8415E-02,
     &   3.8510E-02, 3.8604E-02, 3.8696E-02, 3.8786E-02, 3.8876E-02,
     &   3.8963E-02, 3.9050E-02, 3.9135E-02, 3.9219E-02, 3.9302E-02,
     &   3.9384E-02, 3.9464E-02, 3.9544E-02, 3.9622E-02, 3.9700E-02,
     &   3.9776E-02, 3.9851E-02, 3.9926E-02, 3.9999E-02, 4.0072E-02,
     &   4.0144E-02, 4.0214E-02, 4.0284E-02, 4.0353E-02, 4.0422E-02,
     &   4.0489E-02, 4.0556E-02, 4.0622E-02, 4.0687E-02, 4.0752E-02,
     &   4.0816E-02, 4.0879E-02, 4.0941E-02, 4.1003E-02, 4.1064E-02,
     &   4.1125E-02, 4.1184E-02, 4.1244E-02, 4.1302E-02, 4.1361E-02,
     &   4.1418E-02, 4.1475E-02, 4.1531E-02, 4.1587E-02, 4.1643E-02,
     &   4.1697E-02, 4.1752E-02, 4.1806E-02, 4.1859E-02, 4.1912E-02,
     &   4.5959E-02, 4.8322E-02, 4.9999E-02, 5.1299E-02, 5.2359E-02,
     &   5.4033E-02, 5.5331E-02, 5.6390E-02, 5.7287E-02, 5.9359E-02/
  
  
         DATA ((DAM  (I,J), I=   1, 100), J=2,2) /
     &   5.8969E-05, 5.8246E-05, 5.7705E-05, 5.7280E-05, 5.6932E-05,
     &   5.6387E-05, 5.5975E-05, 5.5650E-05, 5.5387E-05, 5.5170E-05,
     &   5.4987E-05, 5.4833E-05, 5.4700E-05, 5.4585E-05, 5.4484E-05,
     &   5.4396E-05, 5.4318E-05, 5.4249E-05, 5.4187E-05, 5.4132E-05,
     &   5.4082E-05, 5.4037E-05, 5.3996E-05, 5.3959E-05, 5.3925E-05,
     &   5.3894E-05, 5.3865E-05, 5.3839E-05, 5.3815E-05, 5.3792E-05,
     &   5.3772E-05, 5.3752E-05, 5.3735E-05, 5.3718E-05, 5.3702E-05,
     &   5.3688E-05, 5.3674E-05, 5.3662E-05, 5.3650E-05, 5.3639E-05,
     &   5.3628E-05, 5.3618E-05, 5.3609E-05, 5.3600E-05, 5.3592E-05,
     &   5.3584E-05, 5.3576E-05, 5.3569E-05, 5.3562E-05, 5.3556E-05,
     &   5.3550E-05, 5.3544E-05, 5.3539E-05, 5.3533E-05, 5.3528E-05,
     &   5.3523E-05, 5.3519E-05, 5.3514E-05, 5.3510E-05, 5.3506E-05,
     &   5.3502E-05, 5.3499E-05, 5.3495E-05, 5.3492E-05, 5.3489E-05,
     &   5.3486E-05, 5.3483E-05, 5.3480E-05, 5.3477E-05, 5.3474E-05,
     &   5.3472E-05, 5.3469E-05, 5.3467E-05, 5.3464E-05, 5.3462E-05,
     &   5.3460E-05, 5.3458E-05, 5.3456E-05, 5.3454E-05, 5.3452E-05,
     &   5.3450E-05, 5.3449E-05, 5.3447E-05, 5.3445E-05, 5.3444E-05,
     &   5.3442E-05, 5.3441E-05, 5.3439E-05, 5.3438E-05, 5.3437E-05,
     &   5.3426E-05, 5.3418E-05, 5.3411E-05, 5.3406E-05, 5.3402E-05,
     &   5.3398E-05, 5.3395E-05, 5.3392E-05, 5.3390E-05, 5.3388E-05/
  
         DATA ((DAM  (I,J), I= 101, 200), J=2,2) /
     &   5.3387E-05, 5.3385E-05, 5.3384E-05, 5.3383E-05, 5.3382E-05,
     &   5.3381E-05, 5.3380E-05, 5.3380E-05, 5.3379E-05, 5.3378E-05,
     &   5.3378E-05, 5.3377E-05, 5.3377E-05, 5.3377E-05, 5.3376E-05,
     &   5.3376E-05, 5.3376E-05, 5.3375E-05, 5.3375E-05, 5.3375E-05,
     &   5.3375E-05, 5.3374E-05, 5.3374E-05, 5.3374E-05, 5.3374E-05,
     &   5.3374E-05, 5.3374E-05, 5.3373E-05, 5.3373E-05, 5.3373E-05,
     &   5.3373E-05, 5.3373E-05, 5.3373E-05, 5.3373E-05, 5.3373E-05,
     &   5.3372E-05, 5.3372E-05, 5.3372E-05, 5.3372E-05, 5.3372E-05,
     &   5.3372E-05, 5.3372E-05, 5.3372E-05, 5.3372E-05, 5.3372E-05,
     &   5.3372E-05, 5.3372E-05, 5.3372E-05, 5.3372E-05, 5.3372E-05,
     &   5.3372E-05, 5.3372E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05,
     &   5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05,
     &   5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05,
     &   5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05,
     &   5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05,
     &   5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05,
     &   5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05,
     &   5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05, 5.3371E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05/
  
  
         DATA ((DAM  (I,J), I=   1, 100), J=3,3) /
     &   1.1590E-04, 1.1052E-04, 1.0721E-04, 1.0499E-04, 1.0340E-04,
     &   1.0128E-04, 9.9923E-05, 9.8976E-05, 9.8276E-05, 9.7738E-05,
     &   9.7312E-05, 9.6979E-05, 9.6680E-05, 9.6441E-05, 9.6237E-05,
     &   9.6063E-05, 9.5912E-05, 9.5780E-05, 9.5664E-05, 9.5561E-05,
     &   9.5470E-05, 9.5389E-05, 9.5316E-05, 9.5251E-05, 9.5198E-05,
     &   9.5136E-05, 9.5087E-05, 9.5042E-05, 9.5001E-05, 9.4964E-05,
     &   9.4928E-05, 9.4896E-05, 9.4870E-05, 9.4839E-05, 9.4813E-05,
     &   9.4805E-05, 9.4768E-05, 9.4747E-05, 9.4728E-05, 9.4710E-05,
     &   9.4693E-05, 9.4678E-05, 9.4663E-05, 9.4657E-05, 9.4636E-05,
     &   9.4623E-05, 9.4612E-05, 9.4630E-05, 9.4591E-05, 9.4581E-05,
     &   9.4571E-05, 9.4563E-05, 9.4554E-05, 9.4547E-05, 9.4539E-05,
     &   9.4532E-05, 9.4525E-05, 9.4519E-05, 9.4513E-05, 9.4507E-05,
     &   9.4501E-05, 9.4496E-05, 9.4491E-05, 9.4486E-05, 9.4481E-05,
     &   9.4477E-05, 9.4473E-05, 9.4469E-05, 9.4465E-05, 9.4461E-05,
     &   9.4458E-05, 9.4454E-05, 9.4451E-05, 9.4448E-05, 9.4445E-05,
     &   9.4442E-05, 9.4439E-05, 9.4437E-05, 9.4434E-05, 9.4432E-05,
     &   9.4429E-05, 9.4427E-05, 9.4425E-05, 9.4423E-05, 9.4421E-05,
     &   9.4419E-05, 9.4417E-05, 9.4415E-05, 9.4414E-05, 9.4412E-05,
     &   9.4400E-05, 9.4391E-05, 9.4384E-05, 9.4379E-05, 9.4376E-05,
     &   9.4373E-05, 9.4372E-05, 9.4371E-05, 9.4370E-05, 9.4369E-05/
  
         DATA ((DAM  (I,J), I= 101, 200), J=3,3) /
     &   9.4369E-05, 9.4370E-05, 9.4370E-05, 9.4370E-05, 9.4371E-05,
     &   9.4371E-05, 9.4372E-05, 9.4373E-05, 9.4374E-05, 9.4375E-05,
     &   9.4375E-05, 9.4376E-05, 9.4377E-05, 9.4378E-05, 9.4379E-05,
     &   9.4380E-05, 9.4381E-05, 9.4382E-05, 9.4383E-05, 9.4384E-05,
     &   9.4385E-05, 9.4386E-05, 9.4387E-05, 9.4388E-05, 9.4389E-05,
     &   9.4390E-05, 9.4391E-05, 9.4391E-05, 9.4392E-05, 9.4393E-05,
     &   9.4394E-05, 9.4395E-05, 9.4396E-05, 9.4397E-05, 9.4398E-05,
     &   9.4398E-05, 9.4399E-05, 9.4400E-05, 9.4401E-05, 9.4401E-05,
     &   9.4402E-05, 9.4403E-05, 9.4403E-05, 9.4404E-05, 9.4405E-05,
     &   9.4405E-05, 9.4406E-05, 9.4407E-05, 9.4407E-05, 9.4408E-05,
     &   9.4409E-05, 9.4409E-05, 9.4410E-05, 9.4411E-05, 9.4411E-05,
     &   9.4412E-05, 9.4412E-05, 9.4413E-05, 9.4414E-05, 9.4414E-05,
     &   9.4415E-05, 9.4415E-05, 9.4416E-05, 9.4416E-05, 9.4417E-05,
     &   9.4417E-05, 9.4418E-05, 9.4418E-05, 9.4419E-05, 9.4419E-05,
     &   9.4420E-05, 9.4420E-05, 9.4421E-05, 9.4421E-05, 9.4422E-05,
     &   9.4422E-05, 9.4423E-05, 9.4423E-05, 9.4424E-05, 9.4424E-05,
     &   9.4425E-05, 9.4425E-05, 9.4426E-05, 9.4426E-05, 9.4427E-05,
     &   9.4427E-05, 9.4427E-05, 9.4428E-05, 9.4428E-05, 9.4429E-05,
     &   9.4461E-05, 9.4475E-05, 9.4491E-05, 9.4500E-05, 9.4504E-05,
     &   9.4520E-05, 9.4528E-05, 9.4532E-05, 9.4541E-05, 9.4554E-05/

c      ++++ deghadshigh19 ++++  

c update jun 2019 
c  
c******************************************************************************
c*                                                                            *
c*    --- intRdat1 ---                              Fri Jun 14 10:24:55 2019  *
c*                                                                            *
c***************************# FJ@HU Berlin #***********************************
c  
c  "Delta alpha"               Update version (12/06/2019) 
c  
c ISCAN:  2, Ismooth: 0, IGS: 0, DSET: WAVE, iplot: 0 itestflavorspl: 0
c IKE,Emin,Emax,NP,N,EPSREL:  1, 6.0000E-01, 1.4000E+00, 100, 10, 1.00E-02, 
c ALS(sta)(sys):  0.1184( 0.0007)( 0.0000), MZINP:   91.1876, MTOP:    173.20
c NF,IOR,ICHK: 5,4,2,ISU2: 2,NFL: 5,INAG: 1,inotail:  0, sin2W:   0.23153
c CHPTCUT,EC,ECUT: 0.3180,     5.20,    11.50
c  

         DATA ((DGM  (I,J), I=   1, 100), J=1,1) /
     &   3.0625E-02, 3.1239E-02, 3.1676E-02, 3.2161E-02, 3.2623E-02,
     &   3.3488E-02, 3.4286E-02, 3.5030E-02, 3.5727E-02, 3.6385E-02,
     &   3.7004E-02, 3.7820E-02, 3.8152E-02, 3.8687E-02, 3.9198E-02,
     &   3.9690E-02, 4.0158E-02, 4.0610E-02, 4.1046E-02, 4.1466E-02,
     &   4.1873E-02, 4.2265E-02, 4.2645E-02, 4.3020E-02, 4.3439E-02,
     &   4.3718E-02, 4.4055E-02, 4.4384E-02, 4.4705E-02, 4.5016E-02,
     &   4.5318E-02, 4.5613E-02, 4.5920E-02, 4.6184E-02, 4.6460E-02,
     &   4.6861E-02, 4.6993E-02, 4.7251E-02, 4.7503E-02, 4.7751E-02,
     &   4.7993E-02, 4.8231E-02, 4.8464E-02, 4.8742E-02, 4.8917E-02,
     &   4.9137E-02, 4.9353E-02, 4.9825E-02, 4.9775E-02, 4.9980E-02,
     &   5.0182E-02, 5.0381E-02, 5.0576E-02, 5.0768E-02, 5.0958E-02,
     &   5.1144E-02, 5.1328E-02, 5.1509E-02, 5.1687E-02, 5.1862E-02,
     &   5.2035E-02, 5.2206E-02, 5.2374E-02, 5.2540E-02, 5.2704E-02,
     &   5.2866E-02, 5.3025E-02, 5.3183E-02, 5.3338E-02, 5.3491E-02,
     &   5.3643E-02, 5.3792E-02, 5.3940E-02, 5.4086E-02, 5.4231E-02,
     &   5.4373E-02, 5.4514E-02, 5.4653E-02, 5.4791E-02, 5.4927E-02,
     &   5.5062E-02, 5.5195E-02, 5.5327E-02, 5.5457E-02, 5.5586E-02,
     &   5.5714E-02, 5.5840E-02, 5.5965E-02, 5.6089E-02, 5.6212E-02,
     &   5.7262E-02, 5.8229E-02, 5.9125E-02, 5.9960E-02, 6.0742E-02,
     &   6.1477E-02, 6.2171E-02, 6.2828E-02, 6.3452E-02, 6.4046E-02/
  
         DATA ((DGM  (I,J), I= 101, 200), J=1,1) /
     &   6.4613E-02, 6.5156E-02, 6.5676E-02, 6.6175E-02, 6.6656E-02,
     &   6.7119E-02, 6.7566E-02, 6.7998E-02, 6.8416E-02, 6.8821E-02,
     &   6.9214E-02, 6.9595E-02, 6.9966E-02, 7.0326E-02, 7.0678E-02,
     &   7.1020E-02, 7.1353E-02, 7.1677E-02, 7.1998E-02, 7.2311E-02,
     &   7.2617E-02, 7.2917E-02, 7.3211E-02, 7.3498E-02, 7.3781E-02,
     &   7.4058E-02, 7.4330E-02, 7.4597E-02, 7.4861E-02, 7.5119E-02,
     &   7.5374E-02, 7.5626E-02, 7.5873E-02, 7.6117E-02, 7.6345E-02,
     &   7.6558E-02, 7.6768E-02, 7.6974E-02, 7.7176E-02, 7.7375E-02,
     &   7.7571E-02, 7.7764E-02, 7.7954E-02, 7.8140E-02, 7.8324E-02,
     &   7.8505E-02, 7.8684E-02, 7.8860E-02, 7.9033E-02, 7.9204E-02,
     &   7.9372E-02, 7.9538E-02, 7.9702E-02, 7.9864E-02, 8.0023E-02,
     &   8.0181E-02, 8.0336E-02, 8.0489E-02, 8.0641E-02, 8.0790E-02,
     &   8.0938E-02, 8.1084E-02, 8.1228E-02, 8.1371E-02, 8.1512E-02,
     &   8.1651E-02, 8.1788E-02, 8.1925E-02, 8.2059E-02, 8.2192E-02,
     &   8.2324E-02, 8.2454E-02, 8.2582E-02, 8.2710E-02, 8.2836E-02,
     &   8.2961E-02, 8.3084E-02, 8.3206E-02, 8.3327E-02, 8.3447E-02,
     &   8.3566E-02, 8.3683E-02, 8.3799E-02, 8.3914E-02, 8.4029E-02,
     &   8.4142E-02, 8.4253E-02, 8.4364E-02, 8.4474E-02, 8.4583E-02,
     &   9.2926E-02, 9.7798E-02, 1.0125E-01, 1.0393E-01, 1.0612E-01,
     &   1.0957E-01, 1.1225E-01, 1.1443E-01, 1.1628E-01, 1.2055E-01/
  
  
         DATA ((DGM  (I,J), I=   1, 100), J=2,2) /
     &   1.0754E-04, 1.0462E-04, 1.0260E-04, 1.0112E-04, 9.9974E-05,
     &   9.8312E-05, 9.7149E-05, 9.6284E-05, 9.5614E-05, 9.5079E-05,
     &   9.4642E-05, 9.4279E-05, 9.3972E-05, 9.3711E-05, 9.3486E-05,
     &   9.3291E-05, 9.3120E-05, 9.2969E-05, 9.2835E-05, 9.2716E-05,
     &   9.2609E-05, 9.2513E-05, 9.2426E-05, 9.2347E-05, 9.2276E-05,
     &   9.2210E-05, 9.2151E-05, 9.2096E-05, 9.2045E-05, 9.1999E-05,
     &   9.1956E-05, 9.1916E-05, 9.1879E-05, 9.1845E-05, 9.1813E-05,
     &   9.1783E-05, 9.1755E-05, 9.1729E-05, 9.1705E-05, 9.1682E-05,
     &   9.1660E-05, 9.1640E-05, 9.1620E-05, 9.1602E-05, 9.1585E-05,
     &   9.1569E-05, 9.1554E-05, 9.1539E-05, 9.1526E-05, 9.1513E-05,
     &   9.1500E-05, 9.1488E-05, 9.1477E-05, 9.1466E-05, 9.1456E-05,
     &   9.1447E-05, 9.1437E-05, 9.1428E-05, 9.1420E-05, 9.1412E-05,
     &   9.1404E-05, 9.1397E-05, 9.1389E-05, 9.1383E-05, 9.1376E-05,
     &   9.1370E-05, 9.1364E-05, 9.1358E-05, 9.1352E-05, 9.1347E-05,
     &   9.1342E-05, 9.1337E-05, 9.1332E-05, 9.1327E-05, 9.1323E-05,
     &   9.1318E-05, 9.1314E-05, 9.1310E-05, 9.1306E-05, 9.1302E-05,
     &   9.1299E-05, 9.1295E-05, 9.1292E-05, 9.1289E-05, 9.1285E-05,
     &   9.1282E-05, 9.1279E-05, 9.1276E-05, 9.1274E-05, 9.1271E-05,
     &   9.1249E-05, 9.1233E-05, 9.1220E-05, 9.1209E-05, 9.1200E-05,
     &   9.1193E-05, 9.1187E-05, 9.1182E-05, 9.1178E-05, 9.1174E-05/
  
         DATA ((DGM  (I,J), I= 101, 200), J=2,2) /
     &   9.1170E-05, 9.1168E-05, 9.1165E-05, 9.1163E-05, 9.1161E-05,
     &   9.1159E-05, 9.1158E-05, 9.1156E-05, 9.1155E-05, 9.1154E-05,
     &   9.1153E-05, 9.1152E-05, 9.1151E-05, 9.1150E-05, 9.1149E-05,
     &   9.1149E-05, 9.1148E-05, 9.1148E-05, 9.1147E-05, 9.1146E-05,
     &   9.1146E-05, 9.1146E-05, 9.1145E-05, 9.1145E-05, 9.1144E-05,
     &   9.1144E-05, 9.1144E-05, 9.1144E-05, 9.1143E-05, 9.1143E-05,
     &   9.1143E-05, 9.1143E-05, 9.1142E-05, 9.1142E-05, 9.1142E-05,
     &   9.1142E-05, 9.1142E-05, 9.1141E-05, 9.1141E-05, 9.1141E-05,
     &   9.1141E-05, 9.1141E-05, 9.1141E-05, 9.1141E-05, 9.1141E-05,
     &   9.1140E-05, 9.1140E-05, 9.1140E-05, 9.1140E-05, 9.1140E-05,
     &   9.1140E-05, 9.1140E-05, 9.1140E-05, 9.1140E-05, 9.1140E-05,
     &   9.1140E-05, 9.1139E-05, 9.1139E-05, 9.1139E-05, 9.1139E-05,
     &   9.1139E-05, 9.1139E-05, 9.1139E-05, 9.1139E-05, 9.1139E-05,
     &   9.1139E-05, 9.1139E-05, 9.1139E-05, 9.1139E-05, 9.1139E-05,
     &   9.1139E-05, 9.1139E-05, 9.1139E-05, 9.1139E-05, 9.1139E-05,
     &   9.1138E-05, 9.1138E-05, 9.1138E-05, 9.1138E-05, 9.1138E-05,
     &   9.1138E-05, 9.1138E-05, 9.1138E-05, 9.1138E-05, 9.1138E-05,
     &   9.1138E-05, 9.1138E-05, 9.1138E-05, 9.1138E-05, 9.1138E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05/
  
  
         DATA ((DGM  (I,J), I=   1, 100), J=3,3) /
     &   2.4713E-04, 2.2097E-04, 2.0427E-04, 1.9289E-04, 1.8467E-04,
     &   1.7368E-04, 1.6672E-04, 1.6196E-04, 1.5851E-04, 1.5591E-04,
     &   1.5388E-04, 1.5234E-04, 1.5095E-04, 1.4986E-04, 1.4895E-04,
     &   1.4818E-04, 1.4751E-04, 1.4694E-04, 1.4644E-04, 1.4600E-04,
     &   1.4561E-04, 1.4527E-04, 1.4496E-04, 1.4469E-04, 1.4448E-04,
     &   1.4421E-04, 1.4400E-04, 1.4382E-04, 1.4365E-04, 1.4350E-04,
     &   1.4335E-04, 1.4322E-04, 1.4312E-04, 1.4299E-04, 1.4288E-04,
     &   1.4287E-04, 1.4270E-04, 1.4261E-04, 1.4254E-04, 1.4246E-04,
     &   1.4240E-04, 1.4233E-04, 1.4227E-04, 1.4226E-04, 1.4217E-04,
     &   1.4212E-04, 1.4207E-04, 1.4217E-04, 1.4198E-04, 1.4194E-04,
     &   1.4191E-04, 1.4187E-04, 1.4184E-04, 1.4181E-04, 1.4178E-04,
     &   1.4175E-04, 1.4172E-04, 1.4170E-04, 1.4167E-04, 1.4165E-04,
     &   1.4163E-04, 1.4160E-04, 1.4158E-04, 1.4156E-04, 1.4155E-04,
     &   1.4153E-04, 1.4151E-04, 1.4150E-04, 1.4148E-04, 1.4147E-04,
     &   1.4145E-04, 1.4144E-04, 1.4142E-04, 1.4141E-04, 1.4140E-04,
     &   1.4139E-04, 1.4138E-04, 1.4137E-04, 1.4136E-04, 1.4135E-04,
     &   1.4134E-04, 1.4133E-04, 1.4132E-04, 1.4131E-04, 1.4130E-04,
     &   1.4129E-04, 1.4129E-04, 1.4128E-04, 1.4127E-04, 1.4127E-04,
     &   1.4121E-04, 1.4118E-04, 1.4115E-04, 1.4113E-04, 1.4111E-04,
     &   1.4110E-04, 1.4109E-04, 1.4109E-04, 1.4108E-04, 1.4108E-04/
  
         DATA ((DGM  (I,J), I= 101, 200), J=3,3) /
     &   1.4108E-04, 1.4107E-04, 1.4107E-04, 1.4107E-04, 1.4108E-04,
     &   1.4108E-04, 1.4108E-04, 1.4108E-04, 1.4108E-04, 1.4108E-04,
     &   1.4109E-04, 1.4109E-04, 1.4109E-04, 1.4109E-04, 1.4110E-04,
     &   1.4110E-04, 1.4110E-04, 1.4110E-04, 1.4111E-04, 1.4111E-04,
     &   1.4111E-04, 1.4112E-04, 1.4112E-04, 1.4112E-04, 1.4112E-04,
     &   1.4113E-04, 1.4113E-04, 1.4113E-04, 1.4113E-04, 1.4114E-04,
     &   1.4114E-04, 1.4114E-04, 1.4115E-04, 1.4115E-04, 1.4115E-04,
     &   1.4115E-04, 1.4116E-04, 1.4116E-04, 1.4116E-04, 1.4116E-04,
     &   1.4116E-04, 1.4117E-04, 1.4117E-04, 1.4117E-04, 1.4117E-04,
     &   1.4117E-04, 1.4118E-04, 1.4118E-04, 1.4118E-04, 1.4118E-04,
     &   1.4118E-04, 1.4119E-04, 1.4119E-04, 1.4119E-04, 1.4119E-04,
     &   1.4119E-04, 1.4120E-04, 1.4120E-04, 1.4120E-04, 1.4120E-04,
     &   1.4120E-04, 1.4120E-04, 1.4121E-04, 1.4121E-04, 1.4121E-04,
     &   1.4121E-04, 1.4121E-04, 1.4121E-04, 1.4122E-04, 1.4122E-04,
     &   1.4122E-04, 1.4122E-04, 1.4122E-04, 1.4122E-04, 1.4123E-04,
     &   1.4123E-04, 1.4123E-04, 1.4123E-04, 1.4123E-04, 1.4123E-04,
     &   1.4123E-04, 1.4124E-04, 1.4124E-04, 1.4124E-04, 1.4124E-04,
     &   1.4124E-04, 1.4124E-04, 1.4124E-04, 1.4124E-04, 1.4125E-04,
     &   1.4135E-04, 1.4139E-04, 1.4144E-04, 1.4147E-04, 1.4148E-04,
     &   1.4153E-04, 1.4156E-04, 1.4156E-04, 1.4159E-04, 1.4164E-04/
  
      save
      RETURN
      END

c      ++++ dalhadt19 ++++  

c update jun 2019 
       subroutine dalhad_spacelike17
       IMPLICIT NONE
       INTEGER NA,NC,I,J
       PARAMETER(NA=979,NC=200)
       REAL ETA(NA),DAT(NA,3),DGT(NA,3)
       REAL XXX(NC),YGG(NC,3),Y3G(NC,3)
       COMMON /DATT17/ETA,DAT,DGT
       COMMON /DATH17/XXX,YGG,Y3G
c  
c******************************************************************************
c*                                                                            *
c*    --- intRdat1 ---                              Wed Jun 12 18:01:36 2019  *
c*                                                                            *
c***************************# FJ@HU Berlin #***********************************
c  
c  "Delta alpha"               Update version (12/06/2019) 
c  
c ISCAN: -1, Ismooth: 0, IGS: 0, DSET: WAVE, iplot: 0 itestflavorspl: 0
c IKE,Emin,Emax,NP,N,EPSREL:  1, 6.0000E-01, 1.4000E+00, 100, 10, 1.00E-02, 
c ALS(sta)(sys):  0.1184( 0.0007)( 0.0000), MZINP:   91.1876, MTOP:    173.20
c NF,IOR,ICHK: 5,4,2,ISU2: 0,NFL: 5,INAG: 1,inotail:  0, sin2W:   0.23153
c CHPTCUT,EC,ECUT: 0.3180,     5.20,    11.50
c  
  
       DATA  (ETA  (I), I=   1, 100) /
     &  -1.0000E+03,-9.9000E+02,-9.8000E+02,-9.7000E+02,-9.6000E+02,
     &  -9.5000E+02,-9.4000E+02,-9.3000E+02,-9.2000E+02,-9.1000E+02,
     &  -9.0000E+02,-8.9000E+02,-8.8000E+02,-8.7000E+02,-8.6000E+02,
     &  -8.5000E+02,-8.4000E+02,-8.3000E+02,-8.2000E+02,-8.1000E+02,
     &  -8.0000E+02,-7.9000E+02,-7.8000E+02,-7.7000E+02,-7.6000E+02,
     &  -7.5000E+02,-7.4000E+02,-7.3000E+02,-7.2000E+02,-7.1000E+02,
     &  -7.0000E+02,-6.9000E+02,-6.8000E+02,-6.7000E+02,-6.6000E+02,
     &  -6.5000E+02,-6.4000E+02,-6.3000E+02,-6.2000E+02,-6.1000E+02,
     &  -6.0000E+02,-5.9000E+02,-5.8000E+02,-5.7000E+02,-5.6000E+02,
     &  -5.5000E+02,-5.4000E+02,-5.3000E+02,-5.2000E+02,-5.1000E+02,
     &  -5.0000E+02,-4.9000E+02,-4.8000E+02,-4.7000E+02,-4.6000E+02,
     &  -4.5000E+02,-4.4000E+02,-4.3000E+02,-4.2000E+02,-4.1000E+02,
     &  -4.0000E+02,-3.9000E+02,-3.8000E+02,-3.7000E+02,-3.6000E+02,
     &  -3.5000E+02,-3.4000E+02,-3.3000E+02,-3.2000E+02,-3.1000E+02,
     &  -3.0000E+02,-2.9000E+02,-2.8000E+02,-2.7000E+02,-2.6000E+02,
     &  -2.5000E+02,-2.4000E+02,-2.3000E+02,-2.2000E+02,-2.1000E+02,
     &  -2.0000E+02,-1.9000E+02,-1.8000E+02,-1.7000E+02,-1.6000E+02,
     &  -1.5000E+02,-1.4000E+02,-1.3000E+02,-1.2000E+02,-1.1000E+02,
     &  -1.0000E+02,-9.9000E+01,-9.8000E+01,-9.7000E+01,-9.6000E+01,
     &  -9.5000E+01,-9.4000E+01,-9.3000E+01,-9.2000E+01,-9.1000E+01/
  
       DATA  (ETA  (I), I= 101, 200) /
     &  -9.0000E+01,-8.9000E+01,-8.8000E+01,-8.7000E+01,-8.6000E+01,
     &  -8.5000E+01,-8.4000E+01,-8.3000E+01,-8.2000E+01,-8.1000E+01,
     &  -8.0000E+01,-7.9000E+01,-7.8000E+01,-7.7000E+01,-7.6000E+01,
     &  -7.5000E+01,-7.4000E+01,-7.3000E+01,-7.2000E+01,-7.1000E+01,
     &  -7.0000E+01,-6.9000E+01,-6.8000E+01,-6.7000E+01,-6.6000E+01,
     &  -6.5000E+01,-6.4000E+01,-6.3000E+01,-6.2000E+01,-6.1000E+01,
     &  -6.0000E+01,-5.9000E+01,-5.8000E+01,-5.7000E+01,-5.6000E+01,
     &  -5.5000E+01,-5.4000E+01,-5.3000E+01,-5.2000E+01,-5.1000E+01,
     &  -5.0000E+01,-4.9000E+01,-4.8000E+01,-4.7000E+01,-4.6000E+01,
     &  -4.5000E+01,-4.4000E+01,-4.3000E+01,-4.2000E+01,-4.1000E+01,
     &  -4.0000E+01,-3.9000E+01,-3.8000E+01,-3.7000E+01,-3.6000E+01,
     &  -3.5000E+01,-3.4000E+01,-3.3000E+01,-3.2000E+01,-3.1000E+01,
     &  -3.0000E+01,-2.9000E+01,-2.8000E+01,-2.7000E+01,-2.6000E+01,
     &  -2.5000E+01,-2.4000E+01,-2.3000E+01,-2.2000E+01,-2.1000E+01,
     &  -2.0000E+01,-1.9000E+01,-1.8000E+01,-1.7000E+01,-1.6000E+01,
     &  -1.5000E+01,-1.4000E+01,-1.3000E+01,-1.2000E+01,-1.1000E+01,
     &  -1.0000E+01,-9.9100E+00,-9.8200E+00,-9.7300E+00,-9.6400E+00,
     &  -9.5500E+00,-9.4600E+00,-9.3700E+00,-9.2800E+00,-9.1900E+00,
     &  -9.1000E+00,-9.0100E+00,-8.9200E+00,-8.8300E+00,-8.7400E+00,
     &  -8.6500E+00,-8.5600E+00,-8.4700E+00,-8.3800E+00,-8.2900E+00/
  
       DATA  (ETA  (I), I= 201, 300) /
     &  -8.2000E+00,-8.1100E+00,-8.0200E+00,-7.9300E+00,-7.8400E+00,
     &  -7.7500E+00,-7.6600E+00,-7.5700E+00,-7.4800E+00,-7.3900E+00,
     &  -7.3000E+00,-7.2100E+00,-7.1200E+00,-7.0300E+00,-6.9400E+00,
     &  -6.8500E+00,-6.7600E+00,-6.6700E+00,-6.5800E+00,-6.4900E+00,
     &  -6.4000E+00,-6.3100E+00,-6.2200E+00,-6.1300E+00,-6.0400E+00,
     &  -5.9500E+00,-5.8600E+00,-5.7700E+00,-5.6800E+00,-5.5900E+00,
     &  -5.5000E+00,-5.4100E+00,-5.3200E+00,-5.2300E+00,-5.1400E+00,
     &  -5.0500E+00,-4.9600E+00,-4.8700E+00,-4.7800E+00,-4.6900E+00,
     &  -4.6000E+00,-4.5100E+00,-4.4200E+00,-4.3300E+00,-4.2400E+00,
     &  -4.1500E+00,-4.0600E+00,-3.9700E+00,-3.8800E+00,-3.7900E+00,
     &  -3.7000E+00,-3.6100E+00,-3.5200E+00,-3.4300E+00,-3.3400E+00,
     &  -3.2500E+00,-3.1600E+00,-3.0700E+00,-2.9800E+00,-2.8900E+00,
     &  -2.8000E+00,-2.7100E+00,-2.6200E+00,-2.5300E+00,-2.4400E+00,
     &  -2.3500E+00,-2.2600E+00,-2.1700E+00,-2.0800E+00,-1.9900E+00,
     &  -1.9000E+00,-1.8100E+00,-1.7200E+00,-1.6300E+00,-1.5400E+00,
     &  -1.4500E+00,-1.3600E+00,-1.2700E+00,-1.1800E+00,-1.0900E+00,
     &  -1.0000E+00,-9.9100E-01,-9.8200E-01,-9.7300E-01,-9.6400E-01,
     &  -9.5500E-01,-9.4600E-01,-9.3700E-01,-9.2800E-01,-9.1900E-01,
     &  -9.1000E-01,-9.0100E-01,-8.9200E-01,-8.8300E-01,-8.7400E-01,
     &  -8.6500E-01,-8.5600E-01,-8.4700E-01,-8.3800E-01,-8.2900E-01/
  
       DATA  (ETA  (I), I= 301, 400) /
     &  -8.2000E-01,-8.1100E-01,-8.0200E-01,-7.9300E-01,-7.8400E-01,
     &  -7.7500E-01,-7.6600E-01,-7.5700E-01,-7.4800E-01,-7.3900E-01,
     &  -7.3000E-01,-7.2100E-01,-7.1200E-01,-7.0300E-01,-6.9400E-01,
     &  -6.8500E-01,-6.7600E-01,-6.6700E-01,-6.5800E-01,-6.4900E-01,
     &  -6.4000E-01,-6.3100E-01,-6.2200E-01,-6.1300E-01,-6.0400E-01,
     &  -5.9500E-01,-5.8600E-01,-5.7700E-01,-5.6800E-01,-5.5900E-01,
     &  -5.5000E-01,-5.4100E-01,-5.3200E-01,-5.2300E-01,-5.1400E-01,
     &  -5.0500E-01,-4.9600E-01,-4.8700E-01,-4.7800E-01,-4.6900E-01,
     &  -4.6000E-01,-4.5100E-01,-4.4200E-01,-4.3300E-01,-4.2400E-01,
     &  -4.1500E-01,-4.0600E-01,-3.9700E-01,-3.8800E-01,-3.7900E-01,
     &  -3.7000E-01,-3.6100E-01,-3.5200E-01,-3.4300E-01,-3.3400E-01,
     &  -3.2500E-01,-3.1600E-01,-3.0700E-01,-2.9800E-01,-2.8900E-01,
     &  -2.8000E-01,-2.7100E-01,-2.6200E-01,-2.5300E-01,-2.4400E-01,
     &  -2.3500E-01,-2.2600E-01,-2.1700E-01,-2.0800E-01,-1.9900E-01,
     &  -1.9000E-01,-1.8100E-01,-1.7200E-01,-1.6300E-01,-1.5400E-01,
     &  -1.4500E-01,-1.3600E-01,-1.2700E-01,-1.1800E-01,-1.0900E-01,
     &  -1.0000E-01,-9.9100E-02,-9.8200E-02,-9.7300E-02,-9.6400E-02,
     &  -9.5500E-02,-9.4600E-02,-9.3700E-02,-9.2800E-02,-9.1900E-02,
     &  -9.1000E-02,-9.0100E-02,-8.9200E-02,-8.8300E-02,-8.7400E-02,
     &  -8.6500E-02,-8.5600E-02,-8.4700E-02,-8.3800E-02,-8.2900E-02/
  
       DATA  (ETA  (I), I= 401, 500) /
     &  -8.2000E-02,-8.1100E-02,-8.0200E-02,-7.9300E-02,-7.8400E-02,
     &  -7.7500E-02,-7.6600E-02,-7.5700E-02,-7.4800E-02,-7.3900E-02,
     &  -7.3000E-02,-7.2100E-02,-7.1200E-02,-7.0300E-02,-6.9400E-02,
     &  -6.8500E-02,-6.7600E-02,-6.6700E-02,-6.5800E-02,-6.4900E-02,
     &  -6.4000E-02,-6.3100E-02,-6.2200E-02,-6.1300E-02,-6.0400E-02,
     &  -5.9500E-02,-5.8600E-02,-5.7700E-02,-5.6800E-02,-5.5900E-02,
     &  -5.5000E-02,-5.4100E-02,-5.3200E-02,-5.2300E-02,-5.1400E-02,
     &  -5.0500E-02,-4.9600E-02,-4.8700E-02,-4.7800E-02,-4.6900E-02,
     &  -4.6000E-02,-4.5100E-02,-4.4200E-02,-4.3300E-02,-4.2400E-02,
     &  -4.1500E-02,-4.0600E-02,-3.9700E-02,-3.8800E-02,-3.7900E-02,
     &  -3.7000E-02,-3.6100E-02,-3.5200E-02,-3.4300E-02,-3.3400E-02,
     &  -3.2500E-02,-3.1600E-02,-3.0700E-02,-2.9800E-02,-2.8900E-02,
     &  -2.8000E-02,-2.7100E-02,-2.6200E-02,-2.5300E-02,-2.4400E-02,
     &  -2.3500E-02,-2.2600E-02,-2.1700E-02,-2.0800E-02,-1.9900E-02,
     &  -1.9000E-02,-1.8100E-02,-1.7200E-02,-1.6300E-02,-1.5400E-02,
     &  -1.4500E-02,-1.3600E-02,-1.2700E-02,-1.1800E-02,-1.0900E-02,
     &  -1.0000E-02,-9.9100E-03,-9.8200E-03,-9.7300E-03,-9.6400E-03,
     &  -9.5500E-03,-9.4600E-03,-9.3700E-03,-9.2800E-03,-9.1900E-03,
     &  -9.1000E-03,-9.0100E-03,-8.9200E-03,-8.8300E-03,-8.7400E-03,
     &  -8.6500E-03,-8.5600E-03,-8.4700E-03,-8.3800E-03,-8.2900E-03/
  
       DATA  (ETA  (I), I= 501, 600) /
     &  -8.2000E-03,-8.1100E-03,-8.0200E-03,-7.9300E-03,-7.8400E-03,
     &  -7.7500E-03,-7.6600E-03,-7.5700E-03,-7.4800E-03,-7.3900E-03,
     &  -7.3000E-03,-7.2100E-03,-7.1200E-03,-7.0300E-03,-6.9400E-03,
     &  -6.8500E-03,-6.7600E-03,-6.6700E-03,-6.5800E-03,-6.4900E-03,
     &  -6.4000E-03,-6.3100E-03,-6.2200E-03,-6.1300E-03,-6.0400E-03,
     &  -5.9500E-03,-5.8600E-03,-5.7700E-03,-5.6800E-03,-5.5900E-03,
     &  -5.5000E-03,-5.4100E-03,-5.3200E-03,-5.2300E-03,-5.1400E-03,
     &  -5.0500E-03,-4.9600E-03,-4.8700E-03,-4.7800E-03,-4.6900E-03,
     &  -4.6000E-03,-4.5100E-03,-4.4200E-03,-4.3300E-03,-4.2400E-03,
     &  -4.1500E-03,-4.0600E-03,-3.9700E-03,-3.8800E-03,-3.7900E-03,
     &  -3.7000E-03,-3.6100E-03,-3.5200E-03,-3.4300E-03,-3.3400E-03,
     &  -3.2500E-03,-3.1600E-03,-3.0700E-03,-2.9800E-03,-2.8900E-03,
     &  -2.8000E-03,-2.7100E-03,-2.6200E-03,-2.5300E-03,-2.4400E-03,
     &  -2.3500E-03,-2.2600E-03,-2.1700E-03,-2.0800E-03,-1.9900E-03,
     &  -1.9000E-03,-1.8100E-03,-1.7200E-03,-1.6300E-03,-1.5400E-03,
     &  -1.4500E-03,-1.3600E-03,-1.2700E-03,-1.1800E-03,-1.0900E-03,
     &  -1.0000E-03,-9.9100E-04,-9.8200E-04,-9.7300E-04,-9.6400E-04,
     &  -9.5500E-04,-9.4600E-04,-9.3700E-04,-9.2800E-04,-9.1900E-04,
     &  -9.1000E-04,-9.0100E-04,-8.9200E-04,-8.8300E-04,-8.7400E-04,
     &  -8.6500E-04,-8.5600E-04,-8.4700E-04,-8.3800E-04,-8.2900E-04/
  
       DATA  (ETA  (I), I= 601, 700) /
     &  -8.2000E-04,-8.1100E-04,-8.0200E-04,-7.9300E-04,-7.8400E-04,
     &  -7.7500E-04,-7.6600E-04,-7.5700E-04,-7.4800E-04,-7.3900E-04,
     &  -7.3000E-04,-7.2100E-04,-7.1200E-04,-7.0300E-04,-6.9400E-04,
     &  -6.8500E-04,-6.7600E-04,-6.6700E-04,-6.5800E-04,-6.4900E-04,
     &  -6.4000E-04,-6.3100E-04,-6.2200E-04,-6.1300E-04,-6.0400E-04,
     &  -5.9500E-04,-5.8600E-04,-5.7700E-04,-5.6800E-04,-5.5900E-04,
     &  -5.5000E-04,-5.4100E-04,-5.3200E-04,-5.2300E-04,-5.1400E-04,
     &  -5.0500E-04,-4.9600E-04,-4.8700E-04,-4.7800E-04,-4.6900E-04,
     &  -4.6000E-04,-4.5100E-04,-4.4200E-04,-4.3300E-04,-4.2400E-04,
     &  -4.1500E-04,-4.0600E-04,-3.9700E-04,-3.8800E-04,-3.7900E-04,
     &  -3.7000E-04,-3.6100E-04,-3.5200E-04,-3.4300E-04,-3.3400E-04,
     &  -3.2500E-04,-3.1600E-04,-3.0700E-04,-2.9800E-04,-2.8900E-04,
     &  -2.8000E-04,-2.7100E-04,-2.6200E-04,-2.5300E-04,-2.4400E-04,
     &  -2.3500E-04,-2.2600E-04,-2.1700E-04,-2.0800E-04,-1.9900E-04,
     &  -1.9000E-04,-1.8100E-04,-1.7200E-04,-1.6300E-04,-1.5400E-04,
     &  -1.4500E-04,-1.3600E-04,-1.2700E-04,-1.1800E-04,-1.0900E-04,
     &  -1.0000E-04,-9.9100E-05,-9.8200E-05,-9.7300E-05,-9.6400E-05,
     &  -9.5500E-05,-9.4600E-05,-9.3700E-05,-9.2800E-05,-9.1900E-05,
     &  -9.1000E-05,-9.0100E-05,-8.9200E-05,-8.8300E-05,-8.7400E-05,
     &  -8.6500E-05,-8.5600E-05,-8.4700E-05,-8.3800E-05,-8.2900E-05/
  
       DATA  (ETA  (I), I= 701, 800) /
     &  -8.2000E-05,-8.1100E-05,-8.0200E-05,-7.9300E-05,-7.8400E-05,
     &  -7.7500E-05,-7.6600E-05,-7.5700E-05,-7.4800E-05,-7.3900E-05,
     &  -7.3000E-05,-7.2100E-05,-7.1200E-05,-7.0300E-05,-6.9400E-05,
     &  -6.8500E-05,-6.7600E-05,-6.6700E-05,-6.5800E-05,-6.4900E-05,
     &  -6.4000E-05,-6.3100E-05,-6.2200E-05,-6.1300E-05,-6.0400E-05,
     &  -5.9500E-05,-5.8600E-05,-5.7700E-05,-5.6800E-05,-5.5900E-05,
     &  -5.5000E-05,-5.4100E-05,-5.3200E-05,-5.2300E-05,-5.1400E-05,
     &  -5.0500E-05,-4.9600E-05,-4.8700E-05,-4.7800E-05,-4.6900E-05,
     &  -4.6000E-05,-4.5100E-05,-4.4200E-05,-4.3300E-05,-4.2400E-05,
     &  -4.1500E-05,-4.0600E-05,-3.9700E-05,-3.8800E-05,-3.7900E-05,
     &  -3.7000E-05,-3.6100E-05,-3.5200E-05,-3.4300E-05,-3.3400E-05,
     &  -3.2500E-05,-3.1600E-05,-3.0700E-05,-2.9800E-05,-2.8900E-05,
     &  -2.8000E-05,-2.7100E-05,-2.6200E-05,-2.5300E-05,-2.4400E-05,
     &  -2.3500E-05,-2.2600E-05,-2.1700E-05,-2.0800E-05,-1.9900E-05,
     &  -1.9000E-05,-1.8100E-05,-1.7200E-05,-1.6300E-05,-1.5400E-05,
     &  -1.4500E-05,-1.3600E-05,-1.2700E-05,-1.1800E-05,-1.0900E-05,
     &  -1.0000E-05,-9.9100E-06,-9.8200E-06,-9.7300E-06,-9.6400E-06,
     &  -9.5500E-06,-9.4600E-06,-9.3700E-06,-9.2800E-06,-9.1900E-06,
     &  -9.1000E-06,-9.0100E-06,-8.9200E-06,-8.8300E-06,-8.7400E-06,
     &  -8.6500E-06,-8.5600E-06,-8.4700E-06,-8.3800E-06,-8.2900E-06/
  
       DATA  (ETA  (I), I= 801, 900) /
     &  -8.2000E-06,-8.1100E-06,-8.0200E-06,-7.9300E-06,-7.8400E-06,
     &  -7.7500E-06,-7.6600E-06,-7.5700E-06,-7.4800E-06,-7.3900E-06,
     &  -7.3000E-06,-7.2100E-06,-7.1200E-06,-7.0300E-06,-6.9400E-06,
     &  -6.8500E-06,-6.7600E-06,-6.6700E-06,-6.5800E-06,-6.4900E-06,
     &  -6.4000E-06,-6.3100E-06,-6.2200E-06,-6.1300E-06,-6.0400E-06,
     &  -5.9500E-06,-5.8600E-06,-5.7700E-06,-5.6800E-06,-5.5900E-06,
     &  -5.5000E-06,-5.4100E-06,-5.3200E-06,-5.2300E-06,-5.1400E-06,
     &  -5.0500E-06,-4.9600E-06,-4.8700E-06,-4.7800E-06,-4.6900E-06,
     &  -4.6000E-06,-4.5100E-06,-4.4200E-06,-4.3300E-06,-4.2400E-06,
     &  -4.1500E-06,-4.0600E-06,-3.9700E-06,-3.8800E-06,-3.7900E-06,
     &  -3.7000E-06,-3.6100E-06,-3.5200E-06,-3.4300E-06,-3.3400E-06,
     &  -3.2500E-06,-3.1600E-06,-3.0700E-06,-2.9800E-06,-2.8900E-06,
     &  -2.8000E-06,-2.7100E-06,-2.6200E-06,-2.5300E-06,-2.4400E-06,
     &  -2.3500E-06,-2.2600E-06,-2.1700E-06,-2.0800E-06,-1.9900E-06,
     &  -1.9000E-06,-1.8100E-06,-1.7200E-06,-1.6300E-06,-1.5400E-06,
     &  -1.4500E-06,-1.3600E-06,-1.2700E-06,-1.1800E-06,-1.0900E-06,
     &  -1.0000E-06, 0.0000E+00, 1.0000E-06, 3.0010E-03, 6.0010E-03,
     &   9.0010E-03, 1.2000E-02, 1.5000E-02, 1.8000E-02, 2.1000E-02,
     &   2.4000E-02, 2.7000E-02, 3.0000E-02, 3.3000E-02, 3.6000E-02,
     &   3.9000E-02, 4.2000E-02, 4.5000E-02, 4.8000E-02, 5.1000E-02/
  
       DATA  (ETA  (I), I= 901, 979) /
     &   5.4000E-02, 5.7000E-02, 6.0000E-02, 6.3000E-02, 6.6000E-02,
     &   6.9000E-02, 7.2000E-02, 7.5000E-02, 7.8000E-02, 8.1000E-02,
     &   8.4000E-02, 8.7000E-02, 9.0000E-02, 9.3000E-02, 9.6000E-02,
     &   9.9000E-02, 1.0200E-01, 1.0500E-01, 1.0800E-01, 1.1100E-01,
     &   1.1400E-01, 1.1700E-01, 1.2000E-01, 1.2300E-01, 1.2600E-01,
     &   1.2900E-01, 1.3200E-01, 1.3500E-01, 1.3800E-01, 1.4100E-01,
     &   1.4400E-01, 1.4700E-01, 1.5000E-01, 1.5300E-01, 1.5600E-01,
     &   1.5900E-01, 1.6200E-01, 1.6500E-01, 1.6800E-01, 1.7100E-01,
     &   1.7400E-01, 1.7700E-01, 1.8000E-01, 1.8300E-01, 1.8600E-01,
     &   1.8900E-01, 1.9200E-01, 1.9500E-01, 1.9800E-01, 2.0100E-01,
     &   2.0400E-01, 2.0700E-01, 2.1000E-01, 2.1300E-01, 2.1600E-01,
     &   2.1900E-01, 2.2200E-01, 2.2500E-01, 2.2800E-01, 2.3100E-01,
     &   2.3400E-01, 2.3700E-01, 2.4000E-01, 2.4300E-01, 2.4600E-01,
     &   2.4900E-01, 2.5200E-01, 2.5500E-01, 2.5800E-01, 2.6100E-01,
     &   2.6400E-01, 2.6700E-01, 2.7000E-01, 2.7100E-01, 2.7300E-01,
     &   0.27370000D0, 0.27599999D0, 0.27630001D0, 0.27700001D0/
  
         DATA ((DAT  (I,J), I=   1, 100), J=1,1) /
     &   4.1060E-02, 4.1008E-02, 4.0956E-02, 4.0904E-02, 4.0850E-02,
     &   4.0797E-02, 4.0742E-02, 4.0687E-02, 4.0631E-02, 4.0575E-02,
     &   4.0518E-02, 4.0460E-02, 4.0401E-02, 4.0342E-02, 4.0282E-02,
     &   4.0221E-02, 4.0159E-02, 4.0097E-02, 4.0033E-02, 3.9969E-02,
     &   3.9904E-02, 3.9838E-02, 3.9771E-02, 3.9703E-02, 3.9634E-02,
     &   3.9564E-02, 3.9493E-02, 3.9421E-02, 3.9348E-02, 3.9274E-02,
     &   3.9198E-02, 3.9121E-02, 3.9043E-02, 3.8964E-02, 3.8884E-02,
     &   3.8802E-02, 3.8718E-02, 3.8633E-02, 3.8547E-02, 3.8459E-02,
     &   3.8369E-02, 3.8278E-02, 3.8185E-02, 3.8091E-02, 3.7994E-02,
     &   3.7896E-02, 3.7795E-02, 3.7692E-02, 3.7588E-02, 3.7481E-02,
     &   3.7371E-02, 3.7260E-02, 3.7146E-02, 3.7029E-02, 3.6909E-02,
     &   3.6787E-02, 3.6661E-02, 3.6533E-02, 3.6401E-02, 3.6266E-02,
     &   3.6127E-02, 3.5984E-02, 3.5837E-02, 3.5687E-02, 3.5532E-02,
     &   3.5372E-02, 3.5207E-02, 3.5037E-02, 3.4861E-02, 3.4680E-02,
     &   3.4492E-02, 3.4298E-02, 3.4097E-02, 3.3887E-02, 3.3670E-02,
     &   3.3444E-02, 3.3208E-02, 3.2962E-02, 3.2704E-02, 3.2434E-02,
     &   3.2151E-02, 3.1852E-02, 3.1537E-02, 3.1204E-02, 3.0850E-02,
     &   3.0472E-02, 3.0069E-02, 2.9634E-02, 2.9165E-02, 2.8654E-02,
     &   2.8093E-02, 2.8034E-02, 2.7974E-02, 2.7914E-02, 2.7853E-02,
     &   2.7791E-02, 2.7729E-02, 2.7666E-02, 2.7602E-02, 2.7538E-02/
  
         DATA ((DAT  (I,J), I= 101, 200), J=1,1) /
     &   2.7473E-02, 2.7407E-02, 2.7340E-02, 2.7273E-02, 2.7205E-02,
     &   2.7136E-02, 2.7066E-02, 2.6996E-02, 2.6924E-02, 2.6852E-02,
     &   2.6779E-02, 2.6705E-02, 2.6629E-02, 2.6553E-02, 2.6476E-02,
     &   2.6398E-02, 2.6319E-02, 2.6239E-02, 2.6157E-02, 2.6075E-02,
     &   2.5991E-02, 2.5906E-02, 2.5820E-02, 2.5733E-02, 2.5644E-02,
     &   2.5554E-02, 2.5462E-02, 2.5369E-02, 2.5275E-02, 2.5178E-02,
     &   2.5081E-02, 2.4982E-02, 2.4881E-02, 2.4778E-02, 2.4673E-02,
     &   2.4567E-02, 2.4458E-02, 2.4348E-02, 2.4235E-02, 2.4120E-02,
     &   2.4003E-02, 2.3884E-02, 2.3762E-02, 2.3637E-02, 2.3510E-02,
     &   2.3380E-02, 2.3247E-02, 2.3111E-02, 2.2972E-02, 2.2830E-02,
     &   2.2683E-02, 2.2534E-02, 2.2380E-02, 2.2222E-02, 2.2060E-02,
     &   2.1893E-02, 2.1722E-02, 2.1545E-02, 2.1363E-02, 2.1176E-02,
     &   2.0982E-02, 2.0781E-02, 2.0574E-02, 2.0359E-02, 2.0136E-02,
     &   1.9905E-02, 1.9664E-02, 1.9413E-02, 1.9151E-02, 1.8877E-02,
     &   1.8589E-02, 1.8288E-02, 1.7970E-02, 1.7635E-02, 1.7280E-02,
     &   1.6904E-02, 1.6502E-02, 1.6071E-02, 1.5608E-02, 1.5107E-02,
     &   1.4562E-02, 1.4510E-02, 1.4458E-02, 1.4406E-02, 1.4353E-02,
     &   1.4300E-02, 1.4246E-02, 1.4191E-02, 1.4137E-02, 1.4081E-02,
     &   1.4026E-02, 1.3969E-02, 1.3913E-02, 1.3855E-02, 1.3797E-02,
     &   1.3739E-02, 1.3680E-02, 1.3621E-02, 1.3560E-02, 1.3500E-02/
  
         DATA ((DAT  (I,J), I= 201, 300), J=1,1) /
     &   1.3438E-02, 1.3376E-02, 1.3314E-02, 1.3251E-02, 1.3187E-02,
     &   1.3122E-02, 1.3057E-02, 1.2991E-02, 1.2925E-02, 1.2858E-02,
     &   1.2790E-02, 1.2721E-02, 1.2651E-02, 1.2581E-02, 1.2510E-02,
     &   1.2438E-02, 1.2365E-02, 1.2291E-02, 1.2217E-02, 1.2141E-02,
     &   1.2065E-02, 1.1988E-02, 1.1909E-02, 1.1830E-02, 1.1750E-02,
     &   1.1668E-02, 1.1586E-02, 1.1502E-02, 1.1418E-02, 1.1332E-02,
     &   1.1245E-02, 1.1157E-02, 1.1067E-02, 1.0976E-02, 1.0884E-02,
     &   1.0791E-02, 1.0696E-02, 1.0600E-02, 1.0502E-02, 1.0402E-02,
     &   1.0302E-02, 1.0199E-02, 1.0095E-02, 9.9887E-03, 9.8809E-03,
     &   9.7713E-03, 9.6597E-03, 9.5461E-03, 9.4305E-03, 9.3127E-03,
     &   9.1927E-03, 9.0703E-03, 8.9456E-03, 8.8184E-03, 8.6886E-03,
     &   8.5561E-03, 8.4207E-03, 8.2824E-03, 8.1410E-03, 7.9964E-03,
     &   7.8484E-03, 7.6967E-03, 7.5413E-03, 7.3819E-03, 7.2182E-03,
     &   7.0468E-03, 6.8739E-03, 6.6958E-03, 6.5121E-03, 6.3225E-03,
     &   6.1265E-03, 5.9234E-03, 5.7127E-03, 5.4936E-03, 5.2653E-03,
     &   5.0267E-03, 4.7769E-03, 4.5144E-03, 4.2379E-03, 3.9460E-03,
     &   3.6369E-03, 3.6050E-03, 3.5729E-03, 3.5406E-03, 3.5081E-03,
     &   3.4755E-03, 3.4426E-03, 3.4096E-03, 3.3763E-03, 3.3429E-03,
     &   3.3092E-03, 3.2754E-03, 3.2413E-03, 3.2071E-03, 3.1727E-03,
     &   3.1380E-03, 3.1032E-03, 3.0681E-03, 3.0329E-03, 2.9974E-03/
  
         DATA ((DAT  (I,J), I= 301, 400), J=1,1) /
     &   2.9618E-03, 2.9259E-03, 2.8899E-03, 2.8536E-03, 2.8171E-03,
     &   2.7805E-03, 2.7436E-03, 2.7066E-03, 2.6693E-03, 2.6319E-03,
     &   2.5942E-03, 2.5564E-03, 2.5183E-03, 2.4801E-03, 2.4417E-03,
     &   2.4031E-03, 2.3644E-03, 2.3254E-03, 2.2863E-03, 2.2471E-03,
     &   2.2076E-03, 2.1680E-03, 2.1283E-03, 2.0885E-03, 2.0484E-03,
     &   2.0083E-03, 1.9680E-03, 1.9276E-03, 1.8871E-03, 1.8465E-03,
     &   1.8058E-03, 1.7651E-03, 1.7242E-03, 1.6834E-03, 1.6424E-03,
     &   1.6015E-03, 1.5605E-03, 1.5195E-03, 1.4786E-03, 1.4376E-03,
     &   1.3967E-03, 1.3559E-03, 1.3151E-03, 1.2745E-03, 1.2339E-03,
     &   1.1936E-03, 1.1533E-03, 1.1133E-03, 1.0734E-03, 1.0338E-03,
     &   9.9445E-04, 9.5537E-04, 9.1660E-04, 8.7817E-04, 8.4011E-04,
     &   8.0244E-04, 7.6519E-04, 7.2840E-04, 6.9210E-04, 6.5633E-04,
     &   6.2111E-04, 5.8648E-04, 5.5247E-04, 5.1913E-04, 4.8648E-04,
     &   4.5457E-04, 4.2342E-04, 3.9309E-04, 3.6361E-04, 3.3501E-04,
     &   3.0733E-04, 2.8062E-04, 2.5490E-04, 2.3022E-04, 2.0661E-04,
     &   1.8411E-04, 1.6276E-04, 1.4259E-04, 1.2363E-04, 1.0592E-04,
     &   8.9487E-05, 8.7915E-05, 8.6357E-05, 8.4811E-05, 8.3279E-05,
     &   8.1760E-05, 8.0254E-05, 7.8761E-05, 7.7281E-05, 7.5815E-05,
     &   7.4362E-05, 7.2923E-05, 7.1496E-05, 7.0084E-05, 6.8684E-05,
     &   6.7299E-05, 6.5926E-05, 6.4567E-05, 6.3222E-05, 6.1890E-05/
  
         DATA ((DAT  (I,J), I= 401, 500), J=1,1) /
     &   6.0572E-05, 5.9267E-05, 5.7977E-05, 5.6699E-05, 5.5436E-05,
     &   5.4186E-05, 5.2950E-05, 5.1727E-05, 5.0519E-05, 4.9324E-05,
     &   4.8143E-05, 4.6976E-05, 4.5822E-05, 4.4683E-05, 4.3557E-05,
     &   4.2446E-05, 4.1348E-05, 4.0265E-05, 3.9195E-05, 3.8139E-05,
     &   3.7098E-05, 3.6070E-05, 3.5057E-05, 3.4057E-05, 3.3072E-05,
     &   3.2101E-05, 3.1144E-05, 3.0202E-05, 2.9273E-05, 2.8359E-05,
     &   2.7458E-05, 2.6573E-05, 2.5701E-05, 2.4844E-05, 2.4001E-05,
     &   2.3172E-05, 2.2358E-05, 2.1558E-05, 2.0772E-05, 2.0001E-05,
     &   1.9244E-05, 1.8501E-05, 1.7773E-05, 1.7059E-05, 1.6360E-05,
     &   1.5676E-05, 1.5005E-05, 1.4350E-05, 1.3708E-05, 1.3082E-05,
     &   1.2470E-05, 1.1872E-05, 1.1289E-05, 1.0720E-05, 1.0167E-05,
     &   9.6272E-06, 9.1025E-06, 8.5924E-06, 8.0969E-06, 7.6161E-06,
     &   7.1499E-06, 6.6983E-06, 6.2614E-06, 5.8392E-06, 5.4317E-06,
     &   5.0388E-06, 4.6607E-06, 4.2972E-06, 3.9485E-06, 3.6144E-06,
     &   3.2951E-06, 2.9906E-06, 2.7007E-06, 2.4257E-06, 2.1653E-06,
     &   1.9197E-06, 1.6889E-06, 1.4728E-06, 1.2716E-06, 1.0850E-06,
     &   9.1328E-07, 8.9692E-07, 8.8071E-07, 8.6464E-07, 8.4872E-07,
     &   8.3295E-07, 8.1733E-07, 8.0185E-07, 7.8653E-07, 7.7135E-07,
     &   7.5632E-07, 7.4143E-07, 7.2670E-07, 7.1211E-07, 6.9767E-07,
     &   6.8338E-07, 6.6923E-07, 6.5524E-07, 6.4139E-07, 6.2769E-07/
  
         DATA ((DAT  (I,J), I= 501, 600), J=1,1) /
     &   6.1413E-07, 6.0073E-07, 5.8747E-07, 5.7436E-07, 5.6140E-07,
     &   5.4859E-07, 5.3592E-07, 5.2340E-07, 5.1103E-07, 4.9881E-07,
     &   4.8674E-07, 4.7481E-07, 4.6303E-07, 4.5140E-07, 4.3992E-07,
     &   4.2858E-07, 4.1740E-07, 4.0636E-07, 3.9547E-07, 3.8472E-07,
     &   3.7413E-07, 3.6368E-07, 3.5338E-07, 3.4323E-07, 3.3322E-07,
     &   3.2337E-07, 3.1366E-07, 3.0410E-07, 2.9469E-07, 2.8542E-07,
     &   2.7631E-07, 2.6734E-07, 2.5852E-07, 2.4985E-07, 2.4132E-07,
     &   2.3295E-07, 2.2472E-07, 2.1664E-07, 2.0870E-07, 2.0092E-07,
     &   1.9328E-07, 1.8579E-07, 1.7845E-07, 1.7126E-07, 1.6421E-07,
     &   1.5732E-07, 1.5057E-07, 1.4397E-07, 1.3751E-07, 1.3121E-07,
     &   1.2505E-07, 1.1904E-07, 1.1318E-07, 1.0747E-07, 1.0190E-07,
     &   9.6484E-08, 9.1214E-08, 8.6092E-08, 8.1119E-08, 7.6293E-08,
     &   7.1615E-08, 6.7086E-08, 6.2704E-08, 5.8470E-08, 5.4384E-08,
     &   5.0446E-08, 4.6656E-08, 4.3014E-08, 3.9520E-08, 3.6174E-08,
     &   3.2976E-08, 2.9926E-08, 2.7024E-08, 2.4270E-08, 2.1664E-08,
     &   1.9206E-08, 1.6896E-08, 1.4733E-08, 1.2719E-08, 1.0853E-08,
     &   9.1347E-09, 8.9711E-09, 8.8088E-09, 8.6481E-09, 8.4889E-09,
     &   8.3311E-09, 8.1748E-09, 8.0200E-09, 7.8667E-09, 7.7148E-09,
     &   7.5645E-09, 7.4156E-09, 7.2682E-09, 7.1223E-09, 6.9778E-09,
     &   6.8348E-09, 6.6934E-09, 6.5533E-09, 6.4148E-09, 6.2778E-09/
  
         DATA ((DAT  (I,J), I= 601, 700), J=1,1) /
     &   6.1422E-09, 6.0081E-09, 5.8755E-09, 5.7444E-09, 5.6147E-09,
     &   5.4866E-09, 5.3599E-09, 5.2347E-09, 5.1109E-09, 4.9887E-09,
     &   4.8679E-09, 4.7486E-09, 4.6308E-09, 4.5145E-09, 4.3996E-09,
     &   4.2863E-09, 4.1744E-09, 4.0639E-09, 3.9550E-09, 3.8476E-09,
     &   3.7416E-09, 3.6371E-09, 3.5341E-09, 3.4326E-09, 3.3325E-09,
     &   3.2339E-09, 3.1368E-09, 3.0412E-09, 2.9471E-09, 2.8544E-09,
     &   2.7633E-09, 2.6736E-09, 2.5854E-09, 2.4986E-09, 2.4134E-09,
     &   2.3296E-09, 2.2473E-09, 2.1665E-09, 2.0871E-09, 2.0093E-09,
     &   1.9329E-09, 1.8580E-09, 1.7846E-09, 1.7127E-09, 1.6422E-09,
     &   1.5732E-09, 1.5057E-09, 1.4397E-09, 1.3752E-09, 1.3121E-09,
     &   1.2505E-09, 1.1905E-09, 1.1318E-09, 1.0747E-09, 1.0190E-09,
     &   9.6486E-10, 9.1216E-10, 8.6094E-10, 8.1120E-10, 7.6294E-10,
     &   7.1616E-10, 6.7087E-10, 6.2705E-10, 5.8471E-10, 5.4385E-10,
     &   5.0447E-10, 4.6657E-10, 4.3015E-10, 3.9521E-10, 3.6175E-10,
     &   3.2976E-10, 2.9926E-10, 2.7024E-10, 2.4270E-10, 2.1664E-10,
     &   1.9206E-10, 1.6896E-10, 1.4733E-10, 1.2719E-10, 1.0853E-10,
     &   9.1348E-11, 8.9711E-11, 8.8089E-11, 8.6481E-11, 8.4889E-11,
     &   8.3311E-11, 8.1748E-11, 8.0200E-11, 7.8667E-11, 7.7149E-11,
     &   7.5645E-11, 7.4156E-11, 7.2682E-11, 7.1223E-11, 6.9778E-11,
     &   6.8349E-11, 6.6934E-11, 6.5534E-11, 6.4148E-11, 6.2778E-11/
  
         DATA ((DAT  (I,J), I= 701, 800), J=1,1) /
     &   6.1422E-11, 6.0081E-11, 5.8755E-11, 5.7444E-11, 5.6147E-11,
     &   5.4866E-11, 5.3599E-11, 5.2347E-11, 5.1109E-11, 4.9887E-11,
     &   4.8679E-11, 4.7486E-11, 4.6308E-11, 4.5145E-11, 4.3996E-11,
     &   4.2863E-11, 4.1744E-11, 4.0640E-11, 3.9550E-11, 3.8476E-11,
     &   3.7416E-11, 3.6371E-11, 3.5341E-11, 3.4326E-11, 3.3325E-11,
     &   3.2339E-11, 3.1368E-11, 3.0412E-11, 2.9471E-11, 2.8544E-11,
     &   2.7633E-11, 2.6736E-11, 2.5854E-11, 2.4986E-11, 2.4134E-11,
     &   2.3296E-11, 2.2473E-11, 2.1665E-11, 2.0871E-11, 2.0093E-11,
     &   1.9329E-11, 1.8580E-11, 1.7846E-11, 1.7127E-11, 1.6422E-11,
     &   1.5732E-11, 1.5057E-11, 1.4397E-11, 1.3752E-11, 1.3121E-11,
     &   1.2505E-11, 1.1905E-11, 1.1318E-11, 1.0747E-11, 1.0190E-11,
     &   9.6486E-12, 9.1216E-12, 8.6094E-12, 8.1120E-12, 7.6294E-12,
     &   7.1616E-12, 6.7087E-12, 6.2705E-12, 5.8471E-12, 5.4385E-12,
     &   5.0447E-12, 4.6657E-12, 4.3015E-12, 3.9521E-12, 3.6175E-12,
     &   3.2976E-12, 2.9926E-12, 2.7024E-12, 2.4270E-12, 2.1664E-12,
     &   1.9206E-12, 1.6896E-12, 1.4733E-12, 1.2719E-12, 1.0853E-12,
     &   9.1348E-13, 8.9711E-13, 8.8089E-13, 8.6481E-13, 8.4889E-13,
     &   8.3311E-13, 8.1748E-13, 8.0200E-13, 7.8667E-13, 7.7149E-13,
     &   7.5645E-13, 7.4156E-13, 7.2682E-13, 7.1223E-13, 6.9778E-13,
     &   6.8349E-13, 6.6934E-13, 6.5534E-13, 6.4148E-13, 6.2778E-13/
  
         DATA ((DAT  (I,J), I= 801, 900), J=1,1) /
     &   6.1422E-13, 6.0081E-13, 5.8755E-13, 5.7444E-13, 5.6147E-13,
     &   5.4866E-13, 5.3599E-13, 5.2347E-13, 5.1109E-13, 4.9887E-13,
     &   4.8679E-13, 4.7486E-13, 4.6308E-13, 4.5145E-13, 4.3996E-13,
     &   4.2863E-13, 4.1744E-13, 4.0640E-13, 3.9550E-13, 3.8476E-13,
     &   3.7416E-13, 3.6371E-13, 3.5341E-13, 3.4326E-13, 3.3325E-13,
     &   3.2339E-13, 3.1368E-13, 3.0412E-13, 2.9471E-13, 2.8544E-13,
     &   2.7633E-13, 2.6736E-13, 2.5854E-13, 2.4986E-13, 2.4134E-13,
     &   2.3296E-13, 2.2473E-13, 2.1665E-13, 2.0871E-13, 2.0093E-13,
     &   1.9329E-13, 1.8580E-13, 1.7846E-13, 1.7127E-13, 1.6422E-13,
     &   1.5732E-13, 1.5057E-13, 1.4397E-13, 1.3752E-13, 1.3121E-13,
     &   1.2505E-13, 1.1905E-13, 1.1318E-13, 1.0747E-13, 1.0190E-13,
     &   9.6486E-14, 9.1216E-14, 8.6094E-14, 8.1120E-14, 7.6294E-14,
     &   7.1616E-14, 6.7087E-14, 6.2705E-14, 5.8471E-14, 5.4385E-14,
     &   5.0447E-14, 4.6657E-14, 4.3015E-14, 3.9521E-14, 3.6175E-14,
     &   3.2976E-14, 2.9926E-14, 2.7024E-14, 2.4270E-14, 2.1664E-14,
     &   1.9206E-14, 1.6896E-14, 1.4733E-14, 1.2719E-14, 1.0853E-14,
     &   9.1348E-15, 0.0000E+00,-9.1348E-15,-8.2269E-08,-3.2899E-07,
     &  -7.4021E-07,-1.3158E-06,-2.0563E-06,-2.9617E-06,-4.0322E-06,
     &  -5.2680E-06,-6.6695E-06,-8.2369E-06,-9.9706E-06,-1.1871E-05,
     &  -1.3939E-05,-1.6174E-05,-1.8577E-05,-2.1149E-05,-2.3891E-05/
  
         DATA ((DAT  (I,J), I= 901, 979), J=1,1) /
     &  -2.6802E-05,-2.9884E-05,-3.3137E-05,-3.6563E-05,-4.0161E-05,
     &  -4.3934E-05,-4.7881E-05,-5.2003E-05,-5.6303E-05,-6.0780E-05,
     &  -6.5436E-05,-7.0272E-05,-7.5290E-05,-8.0489E-05,-8.5873E-05,
     &  -9.1442E-05,-9.7198E-05,-1.0314E-04,-1.0927E-04,-1.1560E-04,
     &  -1.2212E-04,-1.2883E-04,-1.3574E-04,-1.4285E-04,-1.5016E-04,
     &  -1.5767E-04,-1.6539E-04,-1.7331E-04,-1.8144E-04,-1.8979E-04,
     &  -1.9834E-04,-2.0712E-04,-2.1612E-04,-2.2534E-04,-2.3478E-04,
     &  -2.4446E-04,-2.5436E-04,-2.6451E-04,-2.7489E-04,-2.8551E-04,
     &  -2.9638E-04,-3.0750E-04,-3.1888E-04,-3.3052E-04,-3.4242E-04,
     &  -3.5459E-04,-3.6703E-04,-3.7976E-04,-3.9277E-04,-4.0607E-04,
     &  -4.1967E-04,-4.3358E-04,-4.4780E-04,-4.6234E-04,-4.7721E-04,
     &  -4.9242E-04,-5.0797E-04,-5.2388E-04,-5.4017E-04,-5.5686E-04,
     &  -5.7393E-04,-5.9141E-04,-6.0932E-04,-6.2769E-04,-6.4652E-04,
     &  -6.6585E-04,-6.8597E-04,-7.0639E-04,-7.2741E-04,-7.4909E-04,
     &  -7.7149E-04,-7.9470E-04,-8.1887E-04,-8.2717E-04,-8.4420E-04,
     &  -8.50317501E-04,-8.71111724E-04,-8.73928303E-04,-8.80619465E-04/
  
         DATA ((DAT  (I,J), I=   1, 100), J=2,2) /
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05,
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05,
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05,
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05,
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05,
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05,
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3368E-05, 5.3368E-05,
     &   5.3368E-05, 5.3368E-05, 5.3368E-05, 5.3368E-05, 5.3368E-05,
     &   5.3368E-05, 5.3368E-05, 5.3368E-05, 5.3368E-05, 5.3368E-05,
     &   5.3368E-05, 5.3368E-05, 5.3368E-05, 5.3368E-05, 5.3367E-05,
     &   5.3367E-05, 5.3367E-05, 5.3367E-05, 5.3367E-05, 5.3367E-05,
     &   5.3367E-05, 5.3367E-05, 5.3366E-05, 5.3366E-05, 5.3366E-05,
     &   5.3366E-05, 5.3366E-05, 5.3365E-05, 5.3365E-05, 5.3365E-05,
     &   5.3365E-05, 5.3364E-05, 5.3364E-05, 5.3363E-05, 5.3363E-05,
     &   5.3363E-05, 5.3362E-05, 5.3362E-05, 5.3361E-05, 5.3360E-05,
     &   5.3359E-05, 5.3358E-05, 5.3357E-05, 5.3356E-05, 5.3355E-05,
     &   5.3353E-05, 5.3352E-05, 5.3349E-05, 5.3347E-05, 5.3344E-05,
     &   5.3340E-05, 5.3336E-05, 5.3331E-05, 5.3324E-05, 5.3315E-05,
     &   5.3304E-05, 5.3302E-05, 5.3301E-05, 5.3300E-05, 5.3298E-05,
     &   5.3297E-05, 5.3295E-05, 5.3293E-05, 5.3292E-05, 5.3290E-05/
  
         DATA ((DAT  (I,J), I= 101, 200), J=2,2) /
     &   5.3288E-05, 5.3286E-05, 5.3284E-05, 5.3282E-05, 5.3280E-05,
     &   5.3278E-05, 5.3276E-05, 5.3274E-05, 5.3272E-05, 5.3269E-05,
     &   5.3267E-05, 5.3264E-05, 5.3261E-05, 5.3258E-05, 5.3255E-05,
     &   5.3252E-05, 5.3249E-05, 5.3246E-05, 5.3242E-05, 5.3239E-05,
     &   5.3235E-05, 5.3231E-05, 5.3227E-05, 5.3223E-05, 5.3218E-05,
     &   5.3214E-05, 5.3209E-05, 5.3204E-05, 5.3198E-05, 5.3193E-05,
     &   5.3187E-05, 5.3180E-05, 5.3174E-05, 5.3167E-05, 5.3160E-05,
     &   5.3152E-05, 5.3144E-05, 5.3136E-05, 5.3127E-05, 5.3117E-05,
     &   5.3107E-05, 5.3096E-05, 5.3085E-05, 5.3073E-05, 5.3060E-05,
     &   5.3046E-05, 5.3031E-05, 5.3015E-05, 5.2999E-05, 5.2980E-05,
     &   5.2961E-05, 5.2940E-05, 5.2918E-05, 5.2893E-05, 5.2867E-05,
     &   5.2838E-05, 5.2807E-05, 5.2773E-05, 5.2736E-05, 5.2696E-05,
     &   5.2651E-05, 5.2602E-05, 5.2548E-05, 5.2488E-05, 5.2421E-05,
     &   5.2346E-05, 5.2262E-05, 5.2167E-05, 5.2060E-05, 5.1939E-05,
     &   5.1799E-05, 5.1639E-05, 5.1453E-05, 5.1235E-05, 5.0979E-05,
     &   5.0676E-05, 5.0311E-05, 4.9869E-05, 4.9326E-05, 4.8649E-05,
     &   4.7794E-05, 4.7706E-05, 4.7616E-05, 4.7524E-05, 4.7430E-05,
     &   4.7334E-05, 4.7235E-05, 4.7134E-05, 4.7031E-05, 4.6925E-05,
     &   4.6816E-05, 4.6705E-05, 4.6591E-05, 4.6475E-05, 4.6355E-05,
     &   4.6233E-05, 4.6107E-05, 4.5978E-05, 4.5846E-05, 4.5710E-05/
  
         DATA ((DAT  (I,J), I= 201, 300), J=2,2) /
     &   4.5571E-05, 4.5428E-05, 4.5281E-05, 4.5131E-05, 4.4976E-05,
     &   4.4818E-05, 4.4655E-05, 4.4487E-05, 4.4315E-05, 4.4138E-05,
     &   4.3957E-05, 4.3770E-05, 4.3578E-05, 4.3380E-05, 4.3177E-05,
     &   4.2968E-05, 4.2753E-05, 4.2532E-05, 4.2304E-05, 4.2069E-05,
     &   4.1828E-05, 4.1579E-05, 4.1323E-05, 4.1059E-05, 4.0787E-05,
     &   4.0507E-05, 4.0219E-05, 3.9921E-05, 3.9614E-05, 3.9298E-05,
     &   3.8972E-05, 3.8636E-05, 3.8289E-05, 3.7932E-05, 3.7563E-05,
     &   3.7182E-05, 3.6790E-05, 3.6385E-05, 3.5967E-05, 3.5536E-05,
     &   3.5091E-05, 3.4633E-05, 3.4159E-05, 3.3671E-05, 3.3167E-05,
     &   3.2648E-05, 3.2113E-05, 3.1561E-05, 3.0992E-05, 3.0406E-05,
     &   2.9802E-05, 2.9180E-05, 2.8540E-05, 2.7882E-05, 2.7205E-05,
     &   2.6510E-05, 2.5796E-05, 2.5063E-05, 2.4312E-05, 2.3543E-05,
     &   2.2757E-05, 2.1953E-05, 2.1133E-05, 2.0297E-05, 1.9447E-05,
     &   1.8583E-05, 1.7708E-05, 1.6823E-05, 1.5930E-05, 1.5032E-05,
     &   1.4130E-05, 1.3228E-05, 1.2328E-05, 1.1435E-05, 1.0550E-05,
     &   9.6788E-06, 8.8238E-06, 7.9889E-06, 7.1773E-06, 6.3922E-06,
     &   5.6361E-06, 5.5621E-06, 5.4885E-06, 5.4152E-06, 5.3422E-06,
     &   5.2695E-06, 5.1971E-06, 5.1251E-06, 5.0533E-06, 4.9819E-06,
     &   4.9108E-06, 4.8400E-06, 4.7696E-06, 4.6994E-06, 4.6296E-06,
     &   4.5601E-06, 4.4909E-06, 4.4221E-06, 4.3536E-06, 4.2853E-06/
  
         DATA ((DAT  (I,J), I= 301, 400), J=2,2) /
     &   4.2175E-06, 4.1499E-06, 4.0827E-06, 4.0158E-06, 3.9492E-06,
     &   3.8829E-06, 3.8169E-06, 3.7513E-06, 3.6860E-06, 3.6210E-06,
     &   3.5564E-06, 3.4920E-06, 3.4280E-06, 3.3643E-06, 3.3009E-06,
     &   3.2379E-06, 3.1751E-06, 3.1127E-06, 3.0506E-06, 2.9888E-06,
     &   2.9274E-06, 2.8662E-06, 2.8054E-06, 2.7449E-06, 2.6848E-06,
     &   2.6249E-06, 2.5654E-06, 2.5062E-06, 2.4473E-06, 2.3888E-06,
     &   2.3306E-06, 2.2727E-06, 2.2152E-06, 2.1580E-06, 2.1012E-06,
     &   2.0447E-06, 1.9886E-06, 1.9329E-06, 1.8775E-06, 1.8225E-06,
     &   1.7679E-06, 1.7137E-06, 1.6598E-06, 1.6064E-06, 1.5534E-06,
     &   1.5009E-06, 1.4488E-06, 1.3972E-06, 1.3460E-06, 1.2954E-06,
     &   1.2452E-06, 1.1956E-06, 1.1465E-06, 1.0980E-06, 1.0501E-06,
     &   1.0028E-06, 9.5611E-07, 9.1010E-07, 8.6478E-07, 8.2017E-07,
     &   7.7631E-07, 7.3324E-07, 6.9097E-07, 6.4954E-07, 6.0900E-07,
     &   5.6938E-07, 5.3071E-07, 4.9303E-07, 4.5639E-07, 4.2083E-07,
     &   3.8638E-07, 3.5311E-07, 3.2104E-07, 2.9022E-07, 2.6071E-07,
     &   2.3255E-07, 2.0578E-07, 1.8045E-07, 1.5661E-07, 1.3430E-07,
     &   1.1357E-07, 1.1158E-07, 1.0961E-07, 1.0766E-07, 1.0572E-07,
     &   1.0380E-07, 1.0190E-07, 1.0001E-07, 9.8143E-08, 9.6289E-08,
     &   9.4451E-08, 9.2631E-08, 9.0827E-08, 8.9039E-08, 8.7269E-08,
     &   8.5515E-08, 8.3778E-08, 8.2057E-08, 8.0354E-08, 7.8668E-08/
  
         DATA ((DAT  (I,J), I= 401, 500), J=2,2) /
     &   7.6998E-08, 7.5346E-08, 7.3710E-08, 7.2092E-08, 7.0491E-08,
     &   6.8907E-08, 6.7340E-08, 6.5790E-08, 6.4257E-08, 6.2742E-08,
     &   6.1244E-08, 5.9764E-08, 5.8301E-08, 5.6855E-08, 5.5427E-08,
     &   5.4016E-08, 5.2623E-08, 5.1247E-08, 4.9889E-08, 4.8549E-08,
     &   4.7226E-08, 4.5921E-08, 4.4634E-08, 4.3364E-08, 4.2112E-08,
     &   4.0878E-08, 3.9662E-08, 3.8464E-08, 3.7284E-08, 3.6121E-08,
     &   3.4977E-08, 3.3850E-08, 3.2742E-08, 3.1651E-08, 3.0579E-08,
     &   2.9525E-08, 2.8488E-08, 2.7471E-08, 2.6471E-08, 2.5489E-08,
     &   2.4526E-08, 2.3581E-08, 2.2654E-08, 2.1745E-08, 2.0855E-08,
     &   1.9983E-08, 1.9129E-08, 1.8294E-08, 1.7478E-08, 1.6679E-08,
     &   1.5899E-08, 1.5138E-08, 1.4395E-08, 1.3671E-08, 1.2965E-08,
     &   1.2278E-08, 1.1609E-08, 1.0959E-08, 1.0327E-08, 9.7141E-09,
     &   9.1197E-09, 8.5440E-09, 7.9870E-09, 7.4486E-09, 6.9290E-09,
     &   6.4280E-09, 5.9457E-09, 5.4822E-09, 5.0374E-09, 4.6114E-09,
     &   4.2041E-09, 3.8156E-09, 3.4459E-09, 3.0949E-09, 2.7628E-09,
     &   2.4495E-09, 2.1550E-09, 1.8794E-09, 1.6225E-09, 1.3845E-09,
     &   1.1654E-09, 1.1445E-09, 1.1238E-09, 1.1033E-09, 1.0830E-09,
     &   1.0629E-09, 1.0430E-09, 1.0232E-09, 1.0037E-09, 9.8429E-10,
     &   9.6511E-10, 9.4612E-10, 9.2732E-10, 9.0870E-10, 8.9028E-10,
     &   8.7204E-10, 8.5399E-10, 8.3613E-10, 8.1846E-10, 8.0098E-10/
  
         DATA ((DAT  (I,J), I= 501, 600), J=2,2) /
     &   7.8368E-10, 7.6658E-10, 7.4966E-10, 7.3293E-10, 7.1639E-10,
     &   7.0004E-10, 6.8388E-10, 6.6791E-10, 6.5212E-10, 6.3653E-10,
     &   6.2112E-10, 6.0590E-10, 5.9087E-10, 5.7603E-10, 5.6138E-10,
     &   5.4691E-10, 5.3264E-10, 5.1855E-10, 5.0465E-10, 4.9094E-10,
     &   4.7742E-10, 4.6409E-10, 4.5095E-10, 4.3799E-10, 4.2523E-10,
     &   4.1265E-10, 4.0026E-10, 3.8807E-10, 3.7605E-10, 3.6423E-10,
     &   3.5260E-10, 3.4116E-10, 3.2990E-10, 3.1883E-10, 3.0796E-10,
     &   2.9727E-10, 2.8677E-10, 2.7645E-10, 2.6633E-10, 2.5640E-10,
     &   2.4665E-10, 2.3709E-10, 2.2773E-10, 2.1855E-10, 2.0956E-10,
     &   2.0076E-10, 1.9214E-10, 1.8372E-10, 1.7548E-10, 1.6744E-10,
     &   1.5958E-10, 1.5191E-10, 1.4443E-10, 1.3714E-10, 1.3004E-10,
     &   1.2313E-10, 1.1640E-10, 1.0986E-10, 1.0352E-10, 9.7360E-11,
     &   9.1390E-11, 8.5610E-11, 8.0018E-11, 7.4615E-11, 6.9401E-11,
     &   6.4376E-11, 5.9539E-11, 5.4892E-11, 5.0433E-11, 4.6163E-11,
     &   4.2082E-11, 3.8190E-11, 3.4486E-11, 3.0972E-11, 2.7646E-11,
     &   2.4509E-11, 2.1561E-11, 1.8802E-11, 1.6231E-11, 1.3850E-11,
     &   1.1657E-11, 1.1448E-11, 1.1241E-11, 1.1036E-11, 1.0833E-11,
     &   1.0632E-11, 1.0432E-11, 1.0235E-11, 1.0039E-11, 9.8452E-12,
     &   9.6533E-12, 9.4633E-12, 9.2752E-12, 9.0889E-12, 8.9046E-12,
     &   8.7222E-12, 8.5416E-12, 8.3629E-12, 8.1862E-12, 8.0113E-12/
  
         DATA ((DAT  (I,J), I= 601, 700), J=2,2) /
     &   7.8383E-12, 7.6671E-12, 7.4979E-12, 7.3306E-12, 7.1651E-12,
     &   7.0016E-12, 6.8399E-12, 6.6801E-12, 6.5222E-12, 6.3662E-12,
     &   6.2121E-12, 6.0599E-12, 5.9095E-12, 5.7611E-12, 5.6145E-12,
     &   5.4698E-12, 5.3270E-12, 5.1861E-12, 5.0471E-12, 4.9100E-12,
     &   4.7748E-12, 4.6414E-12, 4.5100E-12, 4.3804E-12, 4.2527E-12,
     &   4.1269E-12, 4.0030E-12, 3.8810E-12, 3.7609E-12, 3.6426E-12,
     &   3.5263E-12, 3.4118E-12, 3.2993E-12, 3.1886E-12, 3.0798E-12,
     &   2.9729E-12, 2.8678E-12, 2.7647E-12, 2.6635E-12, 2.5641E-12,
     &   2.4667E-12, 2.3711E-12, 2.2774E-12, 2.1856E-12, 2.0957E-12,
     &   2.0077E-12, 1.9215E-12, 1.8373E-12, 1.7549E-12, 1.6744E-12,
     &   1.5959E-12, 1.5192E-12, 1.4444E-12, 1.3715E-12, 1.3004E-12,
     &   1.2313E-12, 1.1640E-12, 1.0987E-12, 1.0352E-12, 9.7362E-13,
     &   9.1392E-13, 8.5611E-13, 8.0019E-13, 7.4616E-13, 6.9402E-13,
     &   6.4377E-13, 5.9540E-13, 5.4892E-13, 5.0434E-13, 4.6164E-13,
     &   4.2082E-13, 3.8190E-13, 3.4487E-13, 3.0972E-13, 2.7646E-13,
     &   2.4509E-13, 2.1561E-13, 1.8802E-13, 1.6231E-13, 1.3850E-13,
     &   1.1657E-13, 1.1448E-13, 1.1241E-13, 1.1036E-13, 1.0833E-13,
     &   1.0632E-13, 1.0432E-13, 1.0235E-13, 1.0039E-13, 9.8452E-14,
     &   9.6533E-14, 9.4633E-14, 9.2752E-14, 9.0890E-14, 8.9046E-14,
     &   8.7222E-14, 8.5416E-14, 8.3630E-14, 8.1862E-14, 8.0113E-14/
  
         DATA ((DAT  (I,J), I= 701, 800), J=2,2) /
     &   7.8383E-14, 7.6672E-14, 7.4979E-14, 7.3306E-14, 7.1651E-14,
     &   7.0016E-14, 6.8399E-14, 6.6801E-14, 6.5222E-14, 6.3662E-14,
     &   6.2121E-14, 6.0599E-14, 5.9095E-14, 5.7611E-14, 5.6145E-14,
     &   5.4698E-14, 5.3270E-14, 5.1861E-14, 5.0471E-14, 4.9100E-14,
     &   4.7748E-14, 4.6414E-14, 4.5100E-14, 4.3804E-14, 4.2527E-14,
     &   4.1269E-14, 4.0030E-14, 3.8810E-14, 3.7609E-14, 3.6426E-14,
     &   3.5263E-14, 3.4118E-14, 3.2993E-14, 3.1886E-14, 3.0798E-14,
     &   2.9729E-14, 2.8678E-14, 2.7647E-14, 2.6635E-14, 2.5641E-14,
     &   2.4667E-14, 2.3711E-14, 2.2774E-14, 2.1856E-14, 2.0957E-14,
     &   2.0077E-14, 1.9215E-14, 1.8373E-14, 1.7549E-14, 1.6744E-14,
     &   1.5959E-14, 1.5192E-14, 1.4444E-14, 1.3715E-14, 1.3004E-14,
     &   1.2313E-14, 1.1640E-14, 1.0987E-14, 1.0352E-14, 9.7362E-15,
     &   9.1392E-15, 8.5611E-15, 8.0019E-15, 7.4616E-15, 6.9402E-15,
     &   6.4377E-15, 5.9540E-15, 5.4892E-15, 5.0434E-15, 4.6164E-15,
     &   4.2082E-15, 3.8190E-15, 3.4487E-15, 3.0972E-15, 2.7646E-15,
     &   2.4509E-15, 2.1561E-15, 1.8802E-15, 1.6231E-15, 1.3850E-15,
     &   1.1657E-15, 1.1448E-15, 1.1241E-15, 1.1036E-15, 1.0833E-15,
     &   1.0632E-15, 1.0432E-15, 1.0235E-15, 1.0039E-15, 9.8452E-16,
     &   9.6533E-16, 9.4633E-16, 9.2752E-16, 9.0890E-16, 8.9046E-16,
     &   8.7222E-16, 8.5416E-16, 8.3630E-16, 8.1862E-16, 8.0113E-16/
  
         DATA ((DAT  (I,J), I= 801, 900), J=2,2) /
     &   7.8383E-16, 7.6672E-16, 7.4979E-16, 7.3306E-16, 7.1651E-16,
     &   7.0016E-16, 6.8399E-16, 6.6801E-16, 6.5222E-16, 6.3662E-16,
     &   6.2121E-16, 6.0599E-16, 5.9095E-16, 5.7611E-16, 5.6145E-16,
     &   5.4698E-16, 5.3270E-16, 5.1861E-16, 5.0471E-16, 4.9100E-16,
     &   4.7748E-16, 4.6414E-16, 4.5100E-16, 4.3804E-16, 4.2527E-16,
     &   4.1269E-16, 4.0030E-16, 3.8810E-16, 3.7609E-16, 3.6426E-16,
     &   3.5263E-16, 3.4118E-16, 3.2993E-16, 3.1886E-16, 3.0798E-16,
     &   2.9729E-16, 2.8678E-16, 2.7647E-16, 2.6635E-16, 2.5641E-16,
     &   2.4667E-16, 2.3711E-16, 2.2774E-16, 2.1856E-16, 2.0957E-16,
     &   2.0077E-16, 1.9215E-16, 1.8373E-16, 1.7549E-16, 1.6744E-16,
     &   1.5959E-16, 1.5192E-16, 1.4444E-16, 1.3715E-16, 1.3004E-16,
     &   1.2313E-16, 1.1640E-16, 1.0987E-16, 1.0352E-16, 9.7362E-17,
     &   9.1392E-17, 8.5611E-17, 8.0019E-17, 7.4616E-17, 6.9402E-17,
     &   6.4377E-17, 5.9540E-17, 5.4892E-17, 5.0434E-17, 4.6164E-17,
     &   4.2082E-17, 3.8190E-17, 3.4487E-17, 3.0972E-17, 2.7646E-17,
     &   2.4509E-17, 2.1561E-17, 1.8802E-17, 1.6231E-17, 1.3850E-17,
     &   1.1657E-17, 0.0000E+00, 1.1657E-17, 1.0499E-10, 4.1984E-10,
     &   9.4465E-10, 1.6793E-09, 2.6245E-09, 3.7803E-09, 5.1470E-09,
     &   6.7251E-09, 8.5151E-09, 1.0517E-08, 1.2733E-08, 1.5162E-08,
     &   1.7805E-08, 2.0663E-08, 2.3738E-08, 2.7030E-08, 3.0539E-08/
  
         DATA ((DAT  (I,J), I= 901, 979), J=2,2) /
     &   3.4268E-08, 3.8217E-08, 4.2388E-08, 4.6782E-08, 5.1400E-08,
     &   5.6244E-08, 6.1315E-08, 6.6616E-08, 7.2148E-08, 7.7912E-08,
     &   8.3912E-08, 9.0148E-08, 9.6624E-08, 1.0334E-07, 1.1030E-07,
     &   1.1751E-07, 1.2497E-07, 1.3268E-07, 1.4065E-07, 1.4887E-07,
     &   1.5736E-07, 1.6611E-07, 1.7513E-07, 1.8443E-07, 1.9400E-07,
     &   2.0385E-07, 2.1400E-07, 2.2443E-07, 2.3516E-07, 2.4619E-07,
     &   2.5754E-07, 2.6919E-07, 2.8117E-07, 2.9347E-07, 3.0612E-07,
     &   3.1910E-07, 3.3244E-07, 3.4614E-07, 3.6021E-07, 3.7466E-07,
     &   3.8951E-07, 4.0476E-07, 4.2043E-07, 4.3654E-07, 4.5309E-07,
     &   4.7010E-07, 4.8760E-07, 5.0561E-07, 5.2414E-07, 5.4322E-07,
     &   5.6288E-07, 5.8314E-07, 6.0405E-07, 6.2563E-07, 6.4794E-07,
     &   6.7101E-07, 6.9491E-07, 7.1969E-07, 7.4543E-07, 7.7221E-07,
     &   8.0013E-07, 8.2931E-07, 8.5988E-07, 8.9202E-07, 9.2593E-07,
     &   9.6187E-07, 1.0002E-06, 1.0412E-06, 1.0856E-06, 1.1341E-06,
     &   1.1878E-06, 1.2482E-06, 1.3180E-06, 1.3440E-06, 1.4017E-06,
     &   1.42408296E-06, 1.50956548E-06, 1.52255617E-06, 1.55530583E-06/
  
         DATA ((DAT  (I,J), I=   1, 100), J=3,3) /
     &   9.4407E-05, 9.4406E-05, 9.4406E-05, 9.4405E-05, 9.4405E-05,
     &   9.4404E-05, 9.4404E-05, 9.4403E-05, 9.4403E-05, 9.4402E-05,
     &   9.4402E-05, 9.4401E-05, 9.4400E-05, 9.4400E-05, 9.4399E-05,
     &   9.4399E-05, 9.4398E-05, 9.4398E-05, 9.4397E-05, 9.4396E-05,
     &   9.4396E-05, 9.4395E-05, 9.4394E-05, 9.4394E-05, 9.4393E-05,
     &   9.4392E-05, 9.4392E-05, 9.4391E-05, 9.4390E-05, 9.4389E-05,
     &   9.4389E-05, 9.4388E-05, 9.4387E-05, 9.4386E-05, 9.4385E-05,
     &   9.4385E-05, 9.4384E-05, 9.4383E-05, 9.4382E-05, 9.4381E-05,
     &   9.4380E-05, 9.4379E-05, 9.4378E-05, 9.4377E-05, 9.4376E-05,
     &   9.4375E-05, 9.4374E-05, 9.4373E-05, 9.4372E-05, 9.4371E-05,
     &   9.4369E-05, 9.4368E-05, 9.4367E-05, 9.4366E-05, 9.4364E-05,
     &   9.4363E-05, 9.4361E-05, 9.4360E-05, 9.4358E-05, 9.4357E-05,
     &   9.4355E-05, 9.4353E-05, 9.4351E-05, 9.4350E-05, 9.4348E-05,
     &   9.4346E-05, 9.4343E-05, 9.4341E-05, 9.4339E-05, 9.4336E-05,
     &   9.4334E-05, 9.4331E-05, 9.4328E-05, 9.4325E-05, 9.4322E-05,
     &   9.4318E-05, 9.4314E-05, 9.4310E-05, 9.4306E-05, 9.4301E-05,
     &   9.4295E-05, 9.4289E-05, 9.4283E-05, 9.4275E-05, 9.4267E-05,
     &   9.4257E-05, 9.4246E-05, 9.4233E-05, 9.4217E-05, 9.4198E-05,
     &   9.4174E-05, 9.4171E-05, 9.4168E-05, 9.4165E-05, 9.4162E-05,
     &   9.4159E-05, 9.4156E-05, 9.4153E-05, 9.4149E-05, 9.4146E-05/
  
         DATA ((DAT  (I,J), I= 101, 200), J=3,3) /
     &   9.4142E-05, 9.4139E-05, 9.4135E-05, 9.4131E-05, 9.4127E-05,
     &   9.4123E-05, 9.4119E-05, 9.4115E-05, 9.4110E-05, 9.4105E-05,
     &   9.4101E-05, 9.4096E-05, 9.4091E-05, 9.4085E-05, 9.4080E-05,
     &   9.4074E-05, 9.4068E-05, 9.4062E-05, 9.4056E-05, 9.4049E-05,
     &   9.4042E-05, 9.4035E-05, 9.4028E-05, 9.4020E-05, 9.4012E-05,
     &   9.4004E-05, 9.3995E-05, 9.3986E-05, 9.3977E-05, 9.3967E-05,
     &   9.3957E-05, 9.3946E-05, 9.3934E-05, 9.3923E-05, 9.3910E-05,
     &   9.3897E-05, 9.3883E-05, 9.3869E-05, 9.3854E-05, 9.3838E-05,
     &   9.3821E-05, 9.3803E-05, 9.3784E-05, 9.3764E-05, 9.3742E-05,
     &   9.3720E-05, 9.3696E-05, 9.3670E-05, 9.3643E-05, 9.3614E-05,
     &   9.3583E-05, 9.3549E-05, 9.3514E-05, 9.3475E-05, 9.3434E-05,
     &   9.3389E-05, 9.3341E-05, 9.3289E-05, 9.3232E-05, 9.3170E-05,
     &   9.3103E-05, 9.3029E-05, 9.2948E-05, 9.2859E-05, 9.2761E-05,
     &   9.2653E-05, 9.2532E-05, 9.2398E-05, 9.2247E-05, 9.2078E-05,
     &   9.1888E-05, 9.1671E-05, 9.1424E-05, 9.1140E-05, 9.0811E-05,
     &   9.0429E-05, 8.9979E-05, 8.9445E-05, 8.8804E-05, 8.8025E-05,
     &   8.7062E-05, 8.6964E-05, 8.6864E-05, 8.6762E-05, 8.6658E-05,
     &   8.6552E-05, 8.6444E-05, 8.6333E-05, 8.6219E-05, 8.6104E-05,
     &   8.5985E-05, 8.5864E-05, 8.5740E-05, 8.5614E-05, 8.5484E-05,
     &   8.5352E-05, 8.5216E-05, 8.5077E-05, 8.4935E-05, 8.4789E-05/
  
         DATA ((DAT  (I,J), I= 201, 300), J=3,3) /
     &   8.4640E-05, 8.4488E-05, 8.4331E-05, 8.4171E-05, 8.4006E-05,
     &   8.3838E-05, 8.3665E-05, 8.3488E-05, 8.3306E-05, 8.3120E-05,
     &   8.2928E-05, 8.2732E-05, 8.2530E-05, 8.2322E-05, 8.2110E-05,
     &   8.1891E-05, 8.1666E-05, 8.1435E-05, 8.1197E-05, 8.0953E-05,
     &   8.0702E-05, 8.0443E-05, 8.0177E-05, 7.9903E-05, 7.9620E-05,
     &   7.9330E-05, 7.9030E-05, 7.8722E-05, 7.8404E-05, 7.8076E-05,
     &   7.7737E-05, 7.7388E-05, 7.7028E-05, 7.6656E-05, 7.6272E-05,
     &   7.5876E-05, 7.5466E-05, 7.5043E-05, 7.4605E-05, 7.4152E-05,
     &   7.3683E-05, 7.3199E-05, 7.2697E-05, 7.2177E-05, 7.1638E-05,
     &   7.1080E-05, 7.0501E-05, 6.9900E-05, 6.9277E-05, 6.8629E-05,
     &   6.7956E-05, 6.7257E-05, 6.6530E-05, 6.5773E-05, 6.4985E-05,
     &   6.4164E-05, 6.3309E-05, 6.2416E-05, 6.1483E-05, 6.0509E-05,
     &   5.9491E-05, 5.8425E-05, 5.7309E-05, 5.6139E-05, 5.4913E-05,
     &   5.3625E-05, 5.2273E-05, 5.0852E-05, 4.9357E-05, 4.7784E-05,
     &   4.6129E-05, 4.4386E-05, 4.2551E-05, 4.0621E-05, 3.8591E-05,
     &   3.6458E-05, 3.4221E-05, 3.1880E-05, 2.9435E-05, 2.6893E-05,
     &   2.4260E-05, 2.3992E-05, 2.3724E-05, 2.3454E-05, 2.3184E-05,
     &   2.2914E-05, 2.2642E-05, 2.2370E-05, 2.2097E-05, 2.1824E-05,
     &   2.1550E-05, 2.1275E-05, 2.1000E-05, 2.0724E-05, 2.0448E-05,
     &   2.0171E-05, 1.9893E-05, 1.9616E-05, 1.9338E-05, 1.9059E-05/
  
         DATA ((DAT  (I,J), I= 301, 400), J=3,3) /
     &   1.8780E-05, 1.8501E-05, 1.8221E-05, 1.7941E-05, 1.7661E-05,
     &   1.7381E-05, 1.7100E-05, 1.6820E-05, 1.6539E-05, 1.6258E-05,
     &   1.5977E-05, 1.5696E-05, 1.5416E-05, 1.5135E-05, 1.4854E-05,
     &   1.4574E-05, 1.4294E-05, 1.4014E-05, 1.3735E-05, 1.3456E-05,
     &   1.3177E-05, 1.2899E-05, 1.2621E-05, 1.2344E-05, 1.2068E-05,
     &   1.1793E-05, 1.1518E-05, 1.1244E-05, 1.0971E-05, 1.0699E-05,
     &   1.0429E-05, 1.0159E-05, 9.8907E-06, 9.6237E-06, 9.3580E-06,
     &   9.0938E-06, 8.8312E-06, 8.5702E-06, 8.3109E-06, 8.0535E-06,
     &   7.7980E-06, 7.5445E-06, 7.2931E-06, 7.0439E-06, 6.7970E-06,
     &   6.5526E-06, 6.3106E-06, 6.0714E-06, 5.8348E-06, 5.6011E-06,
     &   5.3703E-06, 5.1427E-06, 4.9182E-06, 4.6971E-06, 4.4794E-06,
     &   4.2653E-06, 4.0548E-06, 3.8482E-06, 3.6455E-06, 3.4469E-06,
     &   3.2525E-06, 3.0624E-06, 2.8768E-06, 2.6958E-06, 2.5195E-06,
     &   2.3481E-06, 2.1816E-06, 2.0203E-06, 1.8643E-06, 1.7136E-06,
     &   1.5685E-06, 1.4291E-06, 1.2954E-06, 1.1676E-06, 1.0459E-06,
     &   9.3028E-07, 8.2097E-07, 7.1805E-07, 6.2163E-07, 5.3182E-07,
     &   4.4872E-07, 4.4078E-07, 4.3291E-07, 4.2511E-07, 4.1738E-07,
     &   4.0971E-07, 4.0212E-07, 3.9459E-07, 3.8713E-07, 3.7974E-07,
     &   3.7242E-07, 3.6517E-07, 3.5799E-07, 3.5087E-07, 3.4383E-07,
     &   3.3686E-07, 3.2995E-07, 3.2311E-07, 3.1635E-07, 3.0965E-07/
  
         DATA ((DAT  (I,J), I= 401, 500), J=3,3) /
     &   3.0302E-07, 2.9647E-07, 2.8998E-07, 2.8356E-07, 2.7721E-07,
     &   2.7093E-07, 2.6473E-07, 2.5859E-07, 2.5252E-07, 2.4653E-07,
     &   2.4060E-07, 2.3475E-07, 2.2896E-07, 2.2325E-07, 2.1761E-07,
     &   2.1203E-07, 2.0653E-07, 2.0110E-07, 1.9574E-07, 1.9046E-07,
     &   1.8524E-07, 1.8009E-07, 1.7502E-07, 1.7002E-07, 1.6508E-07,
     &   1.6023E-07, 1.5544E-07, 1.5072E-07, 1.4608E-07, 1.4150E-07,
     &   1.3700E-07, 1.3257E-07, 1.2821E-07, 1.2393E-07, 1.1972E-07,
     &   1.1557E-07, 1.1151E-07, 1.0751E-07, 1.0358E-07, 9.9731E-08,
     &   9.5951E-08, 9.2243E-08, 8.8608E-08, 8.5046E-08, 8.1556E-08,
     &   7.8138E-08, 7.4793E-08, 7.1521E-08, 6.8322E-08, 6.5195E-08,
     &   6.2141E-08, 5.9160E-08, 5.6252E-08, 5.3417E-08, 5.0655E-08,
     &   4.7965E-08, 4.5349E-08, 4.2806E-08, 4.0336E-08, 3.7939E-08,
     &   3.5616E-08, 3.3365E-08, 3.1188E-08, 2.9084E-08, 2.7053E-08,
     &   2.5096E-08, 2.3211E-08, 2.1401E-08, 1.9663E-08, 1.7999E-08,
     &   1.6409E-08, 1.4892E-08, 1.3448E-08, 1.2078E-08, 1.0782E-08,
     &   9.5587E-09, 8.4093E-09, 7.3333E-09, 6.3310E-09, 5.4022E-09,
     &   4.5471E-09, 4.4656E-09, 4.3849E-09, 4.3049E-09, 4.2256E-09,
     &   4.1471E-09, 4.0693E-09, 3.9922E-09, 3.9159E-09, 3.8403E-09,
     &   3.7655E-09, 3.6914E-09, 3.6180E-09, 3.5454E-09, 3.4735E-09,
     &   3.4023E-09, 3.3319E-09, 3.2622E-09, 3.1933E-09, 3.1251E-09/
  
         DATA ((DAT  (I,J), I= 501, 600), J=3,3) /
     &   3.0576E-09, 2.9908E-09, 2.9248E-09, 2.8596E-09, 2.7950E-09,
     &   2.7312E-09, 2.6682E-09, 2.6058E-09, 2.5443E-09, 2.4834E-09,
     &   2.4233E-09, 2.3639E-09, 2.3053E-09, 2.2474E-09, 2.1902E-09,
     &   2.1337E-09, 2.0781E-09, 2.0231E-09, 1.9689E-09, 1.9154E-09,
     &   1.8626E-09, 1.8106E-09, 1.7593E-09, 1.7088E-09, 1.6590E-09,
     &   1.6099E-09, 1.5616E-09, 1.5140E-09, 1.4671E-09, 1.4210E-09,
     &   1.3756E-09, 1.3310E-09, 1.2871E-09, 1.2439E-09, 1.2014E-09,
     &   1.1597E-09, 1.1188E-09, 1.0785E-09, 1.0390E-09, 1.0003E-09,
     &   9.6226E-10, 9.2498E-10, 8.8843E-10, 8.5262E-10, 8.1754E-10,
     &   7.8321E-10, 7.4960E-10, 7.1674E-10, 6.8461E-10, 6.5322E-10,
     &   6.2257E-10, 5.9265E-10, 5.6347E-10, 5.3502E-10, 5.0731E-10,
     &   4.8034E-10, 4.5411E-10, 4.2861E-10, 4.0385E-10, 3.7982E-10,
     &   3.5653E-10, 3.3398E-10, 3.1217E-10, 2.9109E-10, 2.7075E-10,
     &   2.5114E-10, 2.3228E-10, 2.1414E-10, 1.9675E-10, 1.8009E-10,
     &   1.6417E-10, 1.4899E-10, 1.3454E-10, 1.2083E-10, 1.0785E-10,
     &   9.5615E-11, 8.4114E-11, 7.3349E-11, 6.3322E-11, 5.4031E-11,
     &   4.5477E-11, 4.4662E-11, 4.3854E-11, 4.3054E-11, 4.2261E-11,
     &   4.1476E-11, 4.0698E-11, 3.9927E-11, 3.9164E-11, 3.8408E-11,
     &   3.7659E-11, 3.6918E-11, 3.6184E-11, 3.5458E-11, 3.4739E-11,
     &   3.4027E-11, 3.3322E-11, 3.2625E-11, 3.1936E-11, 3.1254E-11/
  
         DATA ((DAT  (I,J), I= 601, 700), J=3,3) /
     &   3.0579E-11, 2.9911E-11, 2.9251E-11, 2.8598E-11, 2.7953E-11,
     &   2.7314E-11, 2.6684E-11, 2.6060E-11, 2.5444E-11, 2.4836E-11,
     &   2.4235E-11, 2.3641E-11, 2.3054E-11, 2.2475E-11, 2.1903E-11,
     &   2.1339E-11, 2.0782E-11, 2.0232E-11, 1.9690E-11, 1.9155E-11,
     &   1.8627E-11, 1.8107E-11, 1.7594E-11, 1.7089E-11, 1.6591E-11,
     &   1.6100E-11, 1.5617E-11, 1.5141E-11, 1.4672E-11, 1.4211E-11,
     &   1.3757E-11, 1.3310E-11, 1.2871E-11, 1.2439E-11, 1.2015E-11,
     &   1.1598E-11, 1.1188E-11, 1.0786E-11, 1.0391E-11, 1.0003E-11,
     &   9.6229E-12, 9.2500E-12, 8.8845E-12, 8.5264E-12, 8.1756E-12,
     &   7.8322E-12, 7.4962E-12, 7.1676E-12, 6.8463E-12, 6.5323E-12,
     &   6.2258E-12, 5.9266E-12, 5.6348E-12, 5.3503E-12, 5.0732E-12,
     &   4.8035E-12, 4.5411E-12, 4.2861E-12, 4.0385E-12, 3.7983E-12,
     &   3.5654E-12, 3.3399E-12, 3.1217E-12, 2.9109E-12, 2.7075E-12,
     &   2.5115E-12, 2.3228E-12, 2.1415E-12, 1.9675E-12, 1.8009E-12,
     &   1.6417E-12, 1.4899E-12, 1.3454E-12, 1.2083E-12, 1.0785E-12,
     &   9.5615E-13, 8.4114E-13, 7.3350E-13, 6.3322E-13, 5.4031E-13,
     &   4.5477E-13, 4.4662E-13, 4.3854E-13, 4.3054E-13, 4.2261E-13,
     &   4.1476E-13, 4.0698E-13, 3.9927E-13, 3.9164E-13, 3.8408E-13,
     &   3.7659E-13, 3.6918E-13, 3.6184E-13, 3.5458E-13, 3.4739E-13,
     &   3.4027E-13, 3.3322E-13, 3.2625E-13, 3.1936E-13, 3.1254E-13/
  
         DATA ((DAT  (I,J), I= 701, 800), J=3,3) /
     &   3.0579E-13, 2.9911E-13, 2.9251E-13, 2.8598E-13, 2.7953E-13,
     &   2.7315E-13, 2.6684E-13, 2.6060E-13, 2.5444E-13, 2.4836E-13,
     &   2.4235E-13, 2.3641E-13, 2.3054E-13, 2.2475E-13, 2.1903E-13,
     &   2.1339E-13, 2.0782E-13, 2.0232E-13, 1.9690E-13, 1.9155E-13,
     &   1.8627E-13, 1.8107E-13, 1.7594E-13, 1.7089E-13, 1.6591E-13,
     &   1.6100E-13, 1.5617E-13, 1.5141E-13, 1.4672E-13, 1.4211E-13,
     &   1.3757E-13, 1.3310E-13, 1.2871E-13, 1.2439E-13, 1.2015E-13,
     &   1.1598E-13, 1.1188E-13, 1.0786E-13, 1.0391E-13, 1.0003E-13,
     &   9.6229E-14, 9.2500E-14, 8.8845E-14, 8.5264E-14, 8.1756E-14,
     &   7.8322E-14, 7.4962E-14, 7.1676E-14, 6.8463E-14, 6.5323E-14,
     &   6.2258E-14, 5.9266E-14, 5.6348E-14, 5.3503E-14, 5.0732E-14,
     &   4.8035E-14, 4.5411E-14, 4.2861E-14, 4.0385E-14, 3.7983E-14,
     &   3.5654E-14, 3.3399E-14, 3.1217E-14, 2.9109E-14, 2.7075E-14,
     &   2.5115E-14, 2.3228E-14, 2.1415E-14, 1.9675E-14, 1.8009E-14,
     &   1.6417E-14, 1.4899E-14, 1.3454E-14, 1.2083E-14, 1.0785E-14,
     &   9.5615E-15, 8.4114E-15, 7.3350E-15, 6.3322E-15, 5.4031E-15,
     &   4.5477E-15, 4.4662E-15, 4.3854E-15, 4.3054E-15, 4.2261E-15,
     &   4.1476E-15, 4.0698E-15, 3.9927E-15, 3.9164E-15, 3.8408E-15,
     &   3.7659E-15, 3.6918E-15, 3.6184E-15, 3.5458E-15, 3.4739E-15,
     &   3.4027E-15, 3.3322E-15, 3.2625E-15, 3.1936E-15, 3.1254E-15/
  
         DATA ((DAT  (I,J), I= 801, 900), J=3,3) /
     &   3.0579E-15, 2.9911E-15, 2.9251E-15, 2.8598E-15, 2.7953E-15,
     &   2.7315E-15, 2.6684E-15, 2.6060E-15, 2.5444E-15, 2.4836E-15,
     &   2.4235E-15, 2.3641E-15, 2.3054E-15, 2.2475E-15, 2.1903E-15,
     &   2.1339E-15, 2.0782E-15, 2.0232E-15, 1.9690E-15, 1.9155E-15,
     &   1.8627E-15, 1.8107E-15, 1.7594E-15, 1.7089E-15, 1.6591E-15,
     &   1.6100E-15, 1.5617E-15, 1.5141E-15, 1.4672E-15, 1.4211E-15,
     &   1.3757E-15, 1.3310E-15, 1.2871E-15, 1.2439E-15, 1.2015E-15,
     &   1.1598E-15, 1.1188E-15, 1.0786E-15, 1.0391E-15, 1.0003E-15,
     &   9.6229E-16, 9.2500E-16, 8.8845E-16, 8.5264E-16, 8.1756E-16,
     &   7.8322E-16, 7.4962E-16, 7.1676E-16, 6.8463E-16, 6.5323E-16,
     &   6.2258E-16, 5.9266E-16, 5.6348E-16, 5.3503E-16, 5.0732E-16,
     &   4.8035E-16, 4.5411E-16, 4.2861E-16, 4.0385E-16, 3.7983E-16,
     &   3.5654E-16, 3.3399E-16, 3.1217E-16, 2.9109E-16, 2.7075E-16,
     &   2.5115E-16, 2.3228E-16, 2.1415E-16, 1.9675E-16, 1.8009E-16,
     &   1.6417E-16, 1.4899E-16, 1.3454E-16, 1.2083E-16, 1.0785E-16,
     &   9.5615E-17, 8.4114E-17, 7.3350E-17, 6.3322E-17, 5.4031E-17,
     &   4.5477E-17, 0.0000E+00, 4.5477E-17, 4.0957E-10, 1.6378E-09,
     &   3.6849E-09, 6.5500E-09, 1.0235E-08, 1.4741E-08, 2.0067E-08,
     &   2.6215E-08, 3.3186E-08, 4.0980E-08, 4.9599E-08, 5.9043E-08,
     &   6.9316E-08, 8.0417E-08, 9.2349E-08, 1.0511E-07, 1.1871E-07/
  
         DATA ((DAT  (I,J), I= 901, 979), J=3,3) /
     &   1.3315E-07, 1.4842E-07, 1.6454E-07, 1.8150E-07, 1.9930E-07,
     &   2.1796E-07, 2.3746E-07, 2.5782E-07, 2.7904E-07, 3.0113E-07,
     &   3.2407E-07, 3.4789E-07, 3.7258E-07, 3.9815E-07, 4.2460E-07,
     &   4.5193E-07, 4.8016E-07, 5.0928E-07, 5.3931E-07, 5.7024E-07,
     &   6.0208E-07, 6.3484E-07, 6.6852E-07, 7.0314E-07, 7.3869E-07,
     &   7.7518E-07, 8.1263E-07, 8.5103E-07, 8.9040E-07, 9.3074E-07,
     &   9.7206E-07, 1.0144E-06, 1.0577E-06, 1.1020E-06, 1.1474E-06,
     &   1.1937E-06, 1.2412E-06, 1.2896E-06, 1.3392E-06, 1.3898E-06,
     &   1.4415E-06, 1.4943E-06, 1.5482E-06, 1.6033E-06, 1.6595E-06,
     &   1.7169E-06, 1.7755E-06, 1.8352E-06, 1.8962E-06, 1.9585E-06,
     &   2.0220E-06, 2.0868E-06, 2.1530E-06, 2.2204E-06, 2.2893E-06,
     &   2.3596E-06, 2.4313E-06, 2.5046E-06, 2.5793E-06, 2.6556E-06,
     &   2.7336E-06, 2.8132E-06, 2.8946E-06, 2.9778E-06, 3.0628E-06,
     &   3.1499E-06, 3.2390E-06, 3.3303E-06, 3.4239E-06, 3.5199E-06,
     &   3.6187E-06, 3.7202E-06, 3.8250E-06, 3.8606E-06, 3.9332E-06,
     &   3.95903204E-06, 4.04550729E-06, 4.05698823E-06, 4.08397116E-06/

c      ++++ deghadt18 ++++  

c update jun 2019 
c  
c******************************************************************************
c*                                                                            *
c*    --- intRdat1 ---                              Wed Jun 12 23:47:05 2019  *
c*                                                                            *
c***************************# FJ@HU Berlin #***********************************
c  
c  "Delta alpha"               Update version (12/06/2019) 
c  
c ISCAN: -1, Ismooth: 0, IGS: 0, DSET: WAVE, iplot: 0 itestflavorspl: 0
c IKE,Emin,Emax,NP,N,EPSREL:  1, 6.0000E-01, 1.4000E+00, 100, 10, 1.00E-02, 
c ALS(sta)(sys):  0.1184( 0.0007)( 0.0000), MZINP:   91.1876, MTOP:    173.20
c NF,IOR,ICHK: 5,4,2,ISU2: 2,NFL: 5,INAG: 1,inotail:  0, sin2W:   0.23153
c CHPTCUT,EC,ECUT: 0.3180,     5.20,    11.50
c    
         DATA ((DGT  (I,J), I=   1, 100), J=1,1) /
     &   8.2827E-02, 8.2721E-02, 8.2614E-02, 8.2505E-02, 8.2395E-02,
     &   8.2284E-02, 8.2172E-02, 8.2058E-02, 8.1943E-02, 8.1827E-02,
     &   8.1709E-02, 8.1590E-02, 8.1469E-02, 8.1347E-02, 8.1223E-02,
     &   8.1098E-02, 8.0970E-02, 8.0842E-02, 8.0711E-02, 8.0579E-02,
     &   8.0444E-02, 8.0308E-02, 8.0170E-02, 8.0030E-02, 7.9888E-02,
     &   7.9744E-02, 7.9598E-02, 7.9449E-02, 7.9298E-02, 7.9145E-02,
     &   7.8989E-02, 7.8831E-02, 7.8670E-02, 7.8507E-02, 7.8341E-02,
     &   7.8172E-02, 7.8000E-02, 7.7825E-02, 7.7647E-02, 7.7466E-02,
     &   7.7281E-02, 7.7093E-02, 7.6902E-02, 7.6706E-02, 7.6507E-02,
     &   7.6304E-02, 7.6097E-02, 7.5885E-02, 7.5670E-02, 7.5449E-02,
     &   7.5224E-02, 7.4993E-02, 7.4758E-02, 7.4517E-02, 7.4271E-02,
     &   7.4018E-02, 7.3760E-02, 7.3495E-02, 7.3223E-02, 7.2944E-02,
     &   7.2658E-02, 7.2364E-02, 7.2062E-02, 7.1751E-02, 7.1431E-02,
     &   7.1101E-02, 7.0762E-02, 7.0411E-02, 7.0049E-02, 6.9676E-02,
     &   6.9289E-02, 6.8888E-02, 6.8473E-02, 6.8042E-02, 6.7594E-02,
     &   6.7127E-02, 6.6641E-02, 6.6133E-02, 6.5603E-02, 6.5046E-02,
     &   6.4462E-02, 6.3847E-02, 6.3197E-02, 6.2510E-02, 6.1780E-02,
     &   6.1003E-02, 6.0170E-02, 5.9275E-02, 5.8307E-02, 5.7254E-02,
     &   5.6099E-02, 5.5977E-02, 5.5854E-02, 5.5729E-02, 5.5604E-02,
     &   5.5477E-02, 5.5348E-02, 5.5219E-02, 5.5087E-02, 5.4955E-02/
  
         DATA ((DGT  (I,J), I= 101, 200), J=1,1) /
     &   5.4821E-02, 5.4685E-02, 5.4548E-02, 5.4409E-02, 5.4269E-02,
     &   5.4127E-02, 5.3983E-02, 5.3838E-02, 5.3690E-02, 5.3541E-02,
     &   5.3391E-02, 5.3238E-02, 5.3083E-02, 5.2926E-02, 5.2767E-02,
     &   5.2606E-02, 5.2443E-02, 5.2278E-02, 5.2110E-02, 5.1940E-02,
     &   5.1768E-02, 5.1593E-02, 5.1415E-02, 5.1235E-02, 5.1052E-02,
     &   5.0867E-02, 5.0678E-02, 5.0487E-02, 5.0292E-02, 5.0094E-02,
     &   4.9893E-02, 4.9689E-02, 4.9481E-02, 4.9269E-02, 4.9054E-02,
     &   4.8834E-02, 4.8611E-02, 4.8384E-02, 4.8152E-02, 4.7915E-02,
     &   4.7674E-02, 4.7429E-02, 4.7178E-02, 4.6921E-02, 4.6660E-02,
     &   4.6392E-02, 4.6119E-02, 4.5839E-02, 4.5553E-02, 4.5259E-02,
     &   4.4959E-02, 4.4651E-02, 4.4335E-02, 4.4011E-02, 4.3677E-02,
     &   4.3335E-02, 4.2983E-02, 4.2620E-02, 4.2246E-02, 4.1861E-02,
     &   4.1463E-02, 4.1051E-02, 4.0626E-02, 4.0185E-02, 3.9728E-02,
     &   3.9253E-02, 3.8760E-02, 3.8246E-02, 3.7710E-02, 3.7149E-02,
     &   3.6563E-02, 3.5947E-02, 3.5300E-02, 3.4617E-02, 3.3895E-02,
     &   3.3129E-02, 3.2314E-02, 3.1443E-02, 3.0507E-02, 2.9498E-02,
     &   2.8402E-02, 2.8299E-02, 2.8195E-02, 2.8089E-02, 2.7983E-02,
     &   2.7877E-02, 2.7769E-02, 2.7660E-02, 2.7551E-02, 2.7440E-02,
     &   2.7329E-02, 2.7216E-02, 2.7103E-02, 2.6988E-02, 2.6873E-02,
     &   2.6756E-02, 2.6639E-02, 2.6520E-02, 2.6400E-02, 2.6279E-02/
  
         DATA ((DGT  (I,J), I= 201, 300), J=1,1) /
     &   2.6157E-02, 2.6034E-02, 2.5910E-02, 2.5784E-02, 2.5657E-02,
     &   2.5529E-02, 2.5400E-02, 2.5269E-02, 2.5137E-02, 2.5003E-02,
     &   2.4869E-02, 2.4732E-02, 2.4595E-02, 2.4455E-02, 2.4315E-02,
     &   2.4172E-02, 2.4028E-02, 2.3883E-02, 2.3736E-02, 2.3587E-02,
     &   2.3436E-02, 2.3284E-02, 2.3130E-02, 2.2974E-02, 2.2816E-02,
     &   2.2656E-02, 2.2494E-02, 2.2330E-02, 2.2164E-02, 2.1995E-02,
     &   2.1825E-02, 2.1652E-02, 2.1477E-02, 2.1299E-02, 2.1119E-02,
     &   2.0937E-02, 2.0752E-02, 2.0564E-02, 2.0373E-02, 2.0180E-02,
     &   1.9982E-02, 1.9782E-02, 1.9580E-02, 1.9374E-02, 1.9165E-02,
     &   1.8953E-02, 1.8737E-02, 1.8517E-02, 1.8293E-02, 1.8066E-02,
     &   1.7834E-02, 1.7599E-02, 1.7359E-02, 1.7114E-02, 1.6864E-02,
     &   1.6610E-02, 1.6350E-02, 1.6085E-02, 1.5815E-02, 1.5538E-02,
     &   1.5255E-02, 1.4966E-02, 1.4669E-02, 1.4365E-02, 1.4054E-02,
     &   1.3733E-02, 1.3404E-02, 1.3066E-02, 1.2717E-02, 1.2356E-02,
     &   1.1984E-02, 1.1598E-02, 1.1197E-02, 1.0779E-02, 1.0344E-02,
     &   9.8882E-03, 9.4097E-03, 8.9060E-03, 8.3736E-03, 7.8093E-03,
     &   7.2098E-03, 7.1477E-03, 7.0853E-03, 7.0225E-03, 6.9593E-03,
     &   6.8957E-03, 6.8316E-03, 6.7672E-03, 6.7024E-03, 6.6372E-03,
     &   6.5715E-03, 6.5054E-03, 6.4390E-03, 6.3721E-03, 6.3047E-03,
     &   6.2370E-03, 6.1688E-03, 6.1002E-03, 6.0312E-03, 5.9618E-03/
  
         DATA ((DGT  (I,J), I= 301, 400), J=1,1) /
     &   5.8919E-03, 5.8216E-03, 5.7509E-03, 5.6797E-03, 5.6081E-03,
     &   5.5361E-03, 5.4637E-03, 5.3909E-03, 5.3176E-03, 5.2439E-03,
     &   5.1698E-03, 5.0953E-03, 5.0204E-03, 4.9451E-03, 4.8694E-03,
     &   4.7933E-03, 4.7169E-03, 4.6400E-03, 4.5628E-03, 4.4852E-03,
     &   4.4073E-03, 4.3290E-03, 4.2504E-03, 4.1715E-03, 4.0923E-03,
     &   4.0128E-03, 3.9330E-03, 3.8530E-03, 3.7727E-03, 3.6922E-03,
     &   3.6115E-03, 3.5306E-03, 3.4495E-03, 3.3684E-03, 3.2870E-03,
     &   3.2056E-03, 3.1242E-03, 3.0427E-03, 2.9612E-03, 2.8797E-03,
     &   2.7983E-03, 2.7170E-03, 2.6358E-03, 2.5548E-03, 2.4740E-03,
     &   2.3934E-03, 2.3131E-03, 2.2332E-03, 2.1537E-03, 2.0746E-03,
     &   1.9959E-03, 1.9178E-03, 1.8403E-03, 1.7635E-03, 1.6873E-03,
     &   1.6120E-03, 1.5374E-03, 1.4638E-03, 1.3911E-03, 1.3194E-03,
     &   1.2488E-03, 1.1794E-03, 1.1112E-03, 1.0443E-03, 9.7875E-04,
     &   9.1470E-04, 8.5217E-04, 7.9124E-04, 7.3201E-04, 6.7453E-04,
     &   6.1889E-04, 5.6517E-04, 5.1345E-04, 4.6379E-04, 4.1628E-04,
     &   3.7100E-04, 3.2802E-04, 2.8740E-04, 2.4921E-04, 2.1386E-04,
     &   1.8070E-04, 1.7752E-04, 1.7438E-04, 1.7126E-04, 1.6817E-04,
     &   1.6510E-04, 1.6206E-04, 1.5905E-04, 1.5606E-04, 1.5310E-04,
     &   1.5017E-04, 1.4726E-04, 1.4438E-04, 1.4153E-04, 1.3871E-04,
     &   1.3591E-04, 1.3314E-04, 1.3040E-04, 1.2768E-04, 1.2499E-04/
  
         DATA ((DGT  (I,J), I= 401, 500), J=1,1) /
     &   1.2233E-04, 1.1970E-04, 1.1709E-04, 1.1451E-04, 1.1196E-04,
     &   1.0944E-04, 1.0694E-04, 1.0447E-04, 1.0203E-04, 9.9619E-05,
     &   9.7235E-05, 9.4878E-05, 9.2549E-05, 9.0248E-05, 8.7976E-05,
     &   8.5731E-05, 8.3515E-05, 8.1327E-05, 7.9167E-05, 7.7035E-05,
     &   7.4932E-05, 7.2857E-05, 7.0810E-05, 6.8792E-05, 6.6802E-05,
     &   6.4841E-05, 6.2909E-05, 6.1005E-05, 5.9129E-05, 5.7283E-05,
     &   5.5465E-05, 5.3676E-05, 5.1915E-05, 5.0184E-05, 4.8481E-05,
     &   4.6808E-05, 4.5163E-05, 4.3547E-05, 4.1960E-05, 4.0402E-05,
     &   3.8873E-05, 3.7374E-05, 3.5903E-05, 3.4462E-05, 3.3049E-05,
     &   3.1666E-05, 3.0313E-05, 2.8988E-05, 2.7693E-05, 2.6427E-05,
     &   2.5190E-05, 2.3983E-05, 2.2805E-05, 2.1657E-05, 2.0538E-05,
     &   1.9449E-05, 1.8389E-05, 1.7358E-05, 1.6357E-05, 1.5386E-05,
     &   1.4444E-05, 1.3532E-05, 1.2649E-05, 1.1796E-05, 1.0973E-05,
     &   1.0180E-05, 9.4156E-06, 8.6814E-06, 7.9768E-06, 7.3021E-06,
     &   6.6570E-06, 6.0417E-06, 5.4562E-06, 4.9005E-06, 4.3745E-06,
     &   3.8784E-06, 3.4120E-06, 2.9755E-06, 2.5689E-06, 2.1921E-06,
     &   1.8451E-06, 1.8120E-06, 1.7793E-06, 1.7468E-06, 1.7147E-06,
     &   1.6828E-06, 1.6512E-06, 1.6200E-06, 1.5890E-06, 1.5583E-06,
     &   1.5280E-06, 1.4979E-06, 1.4681E-06, 1.4387E-06, 1.4095E-06,
     &   1.3806E-06, 1.3520E-06, 1.3238E-06, 1.2958E-06, 1.2681E-06/
  
         DATA ((DGT  (I,J), I= 501, 600), J=1,1) /
     &   1.2407E-06, 1.2136E-06, 1.1869E-06, 1.1604E-06, 1.1342E-06,
     &   1.1083E-06, 1.0827E-06, 1.0574E-06, 1.0324E-06, 1.0077E-06,
     &   9.8334E-07, 9.5925E-07, 9.3545E-07, 9.1196E-07, 8.8876E-07,
     &   8.6586E-07, 8.4326E-07, 8.2096E-07, 7.9895E-07, 7.7725E-07,
     &   7.5584E-07, 7.3474E-07, 7.1393E-07, 6.9342E-07, 6.7321E-07,
     &   6.5330E-07, 6.3368E-07, 6.1437E-07, 5.9536E-07, 5.7664E-07,
     &   5.5822E-07, 5.4010E-07, 5.2228E-07, 5.0476E-07, 4.8754E-07,
     &   4.7062E-07, 4.5399E-07, 4.3767E-07, 4.2164E-07, 4.0591E-07,
     &   3.9049E-07, 3.7536E-07, 3.6053E-07, 3.4599E-07, 3.3176E-07,
     &   3.1783E-07, 3.0419E-07, 2.9085E-07, 2.7782E-07, 2.6508E-07,
     &   2.5264E-07, 2.4050E-07, 2.2866E-07, 2.1711E-07, 2.0587E-07,
     &   1.9492E-07, 1.8428E-07, 1.7393E-07, 1.6388E-07, 1.5413E-07,
     &   1.4468E-07, 1.3553E-07, 1.2668E-07, 1.1813E-07, 1.0987E-07,
     &   1.0192E-07, 9.4259E-08, 8.6901E-08, 7.9842E-08, 7.3082E-08,
     &   6.6621E-08, 6.0459E-08, 5.4596E-08, 4.9032E-08, 4.3767E-08,
     &   3.8801E-08, 3.4134E-08, 2.9766E-08, 2.5696E-08, 2.1926E-08,
     &   1.8455E-08, 1.8124E-08, 1.7796E-08, 1.7472E-08, 1.7150E-08,
     &   1.6831E-08, 1.6515E-08, 1.6203E-08, 1.5893E-08, 1.5586E-08,
     &   1.5282E-08, 1.4982E-08, 1.4684E-08, 1.4389E-08, 1.4097E-08,
     &   1.3808E-08, 1.3522E-08, 1.3240E-08, 1.2960E-08, 1.2683E-08/
  
         DATA ((DGT  (I,J), I= 601, 700), J=1,1) /
     &   1.2409E-08, 1.2138E-08, 1.1870E-08, 1.1605E-08, 1.1343E-08,
     &   1.1084E-08, 1.0828E-08, 1.0576E-08, 1.0326E-08, 1.0079E-08,
     &   9.8346E-09, 9.5936E-09, 9.3556E-09, 9.1205E-09, 8.8885E-09,
     &   8.6595E-09, 8.4334E-09, 8.2103E-09, 7.9903E-09, 7.7732E-09,
     &   7.5591E-09, 7.3480E-09, 7.1399E-09, 6.9347E-09, 6.7326E-09,
     &   6.5335E-09, 6.3373E-09, 6.1441E-09, 5.9540E-09, 5.7668E-09,
     &   5.5826E-09, 5.4014E-09, 5.2232E-09, 5.0479E-09, 4.8757E-09,
     &   4.7064E-09, 4.5402E-09, 4.3769E-09, 4.2166E-09, 4.0593E-09,
     &   3.9050E-09, 3.7537E-09, 3.6054E-09, 3.4601E-09, 3.3177E-09,
     &   3.1784E-09, 3.0420E-09, 2.9086E-09, 2.7783E-09, 2.6509E-09,
     &   2.5265E-09, 2.4051E-09, 2.2866E-09, 2.1712E-09, 2.0587E-09,
     &   1.9493E-09, 1.8428E-09, 1.7393E-09, 1.6389E-09, 1.5414E-09,
     &   1.4469E-09, 1.3553E-09, 1.2668E-09, 1.1813E-09, 1.0987E-09,
     &   1.0192E-09, 9.4260E-10, 8.6902E-10, 7.9843E-10, 7.3083E-10,
     &   6.6622E-10, 6.0460E-10, 5.4597E-10, 4.9033E-10, 4.3767E-10,
     &   3.8801E-10, 3.4134E-10, 2.9766E-10, 2.5697E-10, 2.1926E-10,
     &   1.8455E-10, 1.8124E-10, 1.7796E-10, 1.7472E-10, 1.7150E-10,
     &   1.6831E-10, 1.6516E-10, 1.6203E-10, 1.5893E-10, 1.5586E-10,
     &   1.5282E-10, 1.4982E-10, 1.4684E-10, 1.4389E-10, 1.4097E-10,
     &   1.3808E-10, 1.3523E-10, 1.3240E-10, 1.2960E-10, 1.2683E-10/
  
         DATA ((DGT  (I,J), I= 701, 800), J=1,1) /
     &   1.2409E-10, 1.2138E-10, 1.1870E-10, 1.1605E-10, 1.1343E-10,
     &   1.1084E-10, 1.0828E-10, 1.0576E-10, 1.0326E-10, 1.0079E-10,
     &   9.8346E-11, 9.5936E-11, 9.3556E-11, 9.1205E-11, 8.8885E-11,
     &   8.6595E-11, 8.4334E-11, 8.2104E-11, 7.9903E-11, 7.7732E-11,
     &   7.5591E-11, 7.3480E-11, 7.1399E-11, 6.9348E-11, 6.7326E-11,
     &   6.5335E-11, 6.3373E-11, 6.1441E-11, 5.9540E-11, 5.7668E-11,
     &   5.5826E-11, 5.4014E-11, 5.2232E-11, 5.0479E-11, 4.8757E-11,
     &   4.7064E-11, 4.5402E-11, 4.3769E-11, 4.2166E-11, 4.0593E-11,
     &   3.9050E-11, 3.7537E-11, 3.6054E-11, 3.4601E-11, 3.3177E-11,
     &   3.1784E-11, 3.0420E-11, 2.9086E-11, 2.7783E-11, 2.6509E-11,
     &   2.5265E-11, 2.4051E-11, 2.2866E-11, 2.1712E-11, 2.0587E-11,
     &   1.9493E-11, 1.8428E-11, 1.7393E-11, 1.6389E-11, 1.5414E-11,
     &   1.4469E-11, 1.3553E-11, 1.2668E-11, 1.1813E-11, 1.0987E-11,
     &   1.0192E-11, 9.4260E-12, 8.6902E-12, 7.9843E-12, 7.3083E-12,
     &   6.6622E-12, 6.0460E-12, 5.4597E-12, 4.9033E-12, 4.3767E-12,
     &   3.8801E-12, 3.4134E-12, 2.9766E-12, 2.5697E-12, 2.1926E-12,
     &   1.8455E-12, 1.8124E-12, 1.7796E-12, 1.7472E-12, 1.7150E-12,
     &   1.6831E-12, 1.6516E-12, 1.6203E-12, 1.5893E-12, 1.5586E-12,
     &   1.5282E-12, 1.4982E-12, 1.4684E-12, 1.4389E-12, 1.4097E-12,
     &   1.3808E-12, 1.3523E-12, 1.3240E-12, 1.2960E-12, 1.2683E-12/
  
         DATA ((DGT  (I,J), I= 801, 900), J=1,1) /
     &   1.2409E-12, 1.2138E-12, 1.1870E-12, 1.1605E-12, 1.1343E-12,
     &   1.1084E-12, 1.0828E-12, 1.0576E-12, 1.0326E-12, 1.0079E-12,
     &   9.8346E-13, 9.5936E-13, 9.3556E-13, 9.1205E-13, 8.8885E-13,
     &   8.6595E-13, 8.4334E-13, 8.2104E-13, 7.9903E-13, 7.7732E-13,
     &   7.5591E-13, 7.3480E-13, 7.1399E-13, 6.9348E-13, 6.7326E-13,
     &   6.5335E-13, 6.3373E-13, 6.1441E-13, 5.9540E-13, 5.7668E-13,
     &   5.5826E-13, 5.4014E-13, 5.2232E-13, 5.0479E-13, 4.8757E-13,
     &   4.7064E-13, 4.5402E-13, 4.3769E-13, 4.2166E-13, 4.0593E-13,
     &   3.9050E-13, 3.7537E-13, 3.6054E-13, 3.4601E-13, 3.3177E-13,
     &   3.1784E-13, 3.0420E-13, 2.9086E-13, 2.7783E-13, 2.6509E-13,
     &   2.5265E-13, 2.4051E-13, 2.2866E-13, 2.1712E-13, 2.0587E-13,
     &   1.9493E-13, 1.8428E-13, 1.7393E-13, 1.6389E-13, 1.5414E-13,
     &   1.4469E-13, 1.3553E-13, 1.2668E-13, 1.1813E-13, 1.0987E-13,
     &   1.0192E-13, 9.4260E-14, 8.6902E-14, 7.9843E-14, 7.3083E-14,
     &   6.6622E-14, 6.0460E-14, 5.4597E-14, 4.9033E-14, 4.3767E-14,
     &   3.8801E-14, 3.4134E-14, 2.9766E-14, 2.5697E-14, 2.1926E-14,
     &   1.8455E-14, 0.0000E+00,-1.8455E-14,-1.6621E-07,-6.6465E-07,
     &  -1.4954E-06,-2.6583E-06,-4.1544E-06,-5.9836E-06,-8.1463E-06,
     &  -1.0643E-05,-1.3475E-05,-1.6642E-05,-2.0145E-05,-2.3985E-05,
     &  -2.8162E-05,-3.2679E-05,-3.7536E-05,-4.2733E-05,-4.8273E-05/
  
         DATA ((DGT  (I,J), I= 901, 979), J=1,1) /
     &  -5.4157E-05,-6.0385E-05,-6.6961E-05,-7.3884E-05,-8.1157E-05,
     &  -8.8782E-05,-9.6761E-05,-1.0509E-04,-1.1379E-04,-1.2284E-04,
     &  -1.3225E-04,-1.4203E-04,-1.5218E-04,-1.6269E-04,-1.7358E-04,
     &  -1.8484E-04,-1.9648E-04,-2.0851E-04,-2.2091E-04,-2.3371E-04,
     &  -2.4690E-04,-2.6048E-04,-2.7446E-04,-2.8885E-04,-3.0364E-04,
     &  -3.1885E-04,-3.3447E-04,-3.5051E-04,-3.6698E-04,-3.8388E-04,
     &  -4.0122E-04,-4.1899E-04,-4.3722E-04,-4.5590E-04,-4.7504E-04,
     &  -4.9465E-04,-5.1473E-04,-5.3529E-04,-5.5634E-04,-5.7788E-04,
     &  -5.9993E-04,-6.2249E-04,-6.4557E-04,-6.6919E-04,-6.9334E-04,
     &  -7.1805E-04,-7.4332E-04,-7.6916E-04,-7.9560E-04,-8.2263E-04,
     &  -8.5027E-04,-8.7854E-04,-9.0746E-04,-9.3704E-04,-9.6730E-04,
     &  -9.9825E-04,-1.0299E-03,-1.0623E-03,-1.0955E-03,-1.1295E-03,
     &  -1.1643E-03,-1.2000E-03,-1.2365E-03,-1.2740E-03,-1.3125E-03,
     &  -1.3520E-03,-1.3926E-03,-1.4343E-03,-1.4774E-03,-1.5218E-03,
     &  -1.5677E-03,-1.6153E-03,-1.6650E-03,-1.6821E-03,-1.7172E-03,
     &  -1.72976053E-03,-1.77272390E-03,-1.77854458E-03,-1.79238201E-03/
  
         DATA ((DGT  (I,J), I=   1, 100), J=2,2) /
     &   9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05,
     &   9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05,
     &   9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05,
     &   9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05,
     &   9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05, 9.1134E-05,
     &   9.1134E-05, 9.1134E-05, 9.1134E-05, 9.1134E-05, 9.1134E-05,
     &   9.1134E-05, 9.1134E-05, 9.1134E-05, 9.1134E-05, 9.1134E-05,
     &   9.1134E-05, 9.1134E-05, 9.1133E-05, 9.1133E-05, 9.1133E-05,
     &   9.1133E-05, 9.1133E-05, 9.1133E-05, 9.1133E-05, 9.1133E-05,
     &   9.1132E-05, 9.1132E-05, 9.1132E-05, 9.1132E-05, 9.1132E-05,
     &   9.1131E-05, 9.1131E-05, 9.1131E-05, 9.1131E-05, 9.1130E-05,
     &   9.1130E-05, 9.1130E-05, 9.1130E-05, 9.1129E-05, 9.1129E-05,
     &   9.1128E-05, 9.1128E-05, 9.1128E-05, 9.1127E-05, 9.1126E-05,
     &   9.1126E-05, 9.1125E-05, 9.1125E-05, 9.1124E-05, 9.1123E-05,
     &   9.1122E-05, 9.1121E-05, 9.1120E-05, 9.1118E-05, 9.1117E-05,
     &   9.1115E-05, 9.1114E-05, 9.1112E-05, 9.1109E-05, 9.1107E-05,
     &   9.1103E-05, 9.1100E-05, 9.1096E-05, 9.1091E-05, 9.1085E-05,
     &   9.1078E-05, 9.1069E-05, 9.1058E-05, 9.1045E-05, 9.1027E-05,
     &   9.1004E-05, 9.1001E-05, 9.0999E-05, 9.0996E-05, 9.0993E-05,
     &   9.0990E-05, 9.0987E-05, 9.0984E-05, 9.0980E-05, 9.0977E-05/
  
         DATA ((DGT  (I,J), I= 101, 200), J=2,2) /
     &   9.0973E-05, 9.0970E-05, 9.0966E-05, 9.0962E-05, 9.0958E-05,
     &   9.0954E-05, 9.0949E-05, 9.0945E-05, 9.0940E-05, 9.0935E-05,
     &   9.0930E-05, 9.0925E-05, 9.0919E-05, 9.0914E-05, 9.0908E-05,
     &   9.0902E-05, 9.0896E-05, 9.0889E-05, 9.0882E-05, 9.0875E-05,
     &   9.0867E-05, 9.0860E-05, 9.0852E-05, 9.0843E-05, 9.0834E-05,
     &   9.0825E-05, 9.0815E-05, 9.0805E-05, 9.0794E-05, 9.0783E-05,
     &   9.0772E-05, 9.0759E-05, 9.0746E-05, 9.0733E-05, 9.0718E-05,
     &   9.0703E-05, 9.0687E-05, 9.0670E-05, 9.0653E-05, 9.0634E-05,
     &   9.0614E-05, 9.0593E-05, 9.0570E-05, 9.0547E-05, 9.0521E-05,
     &   9.0494E-05, 9.0465E-05, 9.0435E-05, 9.0402E-05, 9.0366E-05,
     &   9.0329E-05, 9.0288E-05, 9.0244E-05, 9.0197E-05, 9.0146E-05,
     &   9.0090E-05, 9.0030E-05, 8.9965E-05, 8.9894E-05, 8.9816E-05,
     &   8.9731E-05, 8.9637E-05, 8.9534E-05, 8.9420E-05, 8.9293E-05,
     &   8.9153E-05, 8.8995E-05, 8.8819E-05, 8.8620E-05, 8.8396E-05,
     &   8.8140E-05, 8.7847E-05, 8.7510E-05, 8.7120E-05, 8.6664E-05,
     &   8.6128E-05, 8.5490E-05, 8.4725E-05, 8.3795E-05, 8.2649E-05,
     &   8.1215E-05, 8.1069E-05, 8.0919E-05, 8.0766E-05, 8.0610E-05,
     &   8.0450E-05, 8.0287E-05, 8.0119E-05, 7.9948E-05, 7.9773E-05,
     &   7.9594E-05, 7.9411E-05, 7.9223E-05, 7.9031E-05, 7.8834E-05,
     &   7.8632E-05, 7.8425E-05, 7.8214E-05, 7.7997E-05, 7.7774E-05/
  
         DATA ((DGT  (I,J), I= 201, 300), J=2,2) /
     &   7.7546E-05, 7.7312E-05, 7.7073E-05, 7.6827E-05, 7.6574E-05,
     &   7.6315E-05, 7.6049E-05, 7.5777E-05, 7.5496E-05, 7.5209E-05,
     &   7.4913E-05, 7.4610E-05, 7.4298E-05, 7.3977E-05, 7.3648E-05,
     &   7.3309E-05, 7.2961E-05, 7.2603E-05, 7.2234E-05, 7.1855E-05,
     &   7.1465E-05, 7.1063E-05, 7.0650E-05, 7.0224E-05, 6.9786E-05,
     &   6.9335E-05, 6.8870E-05, 6.8391E-05, 6.7897E-05, 6.7388E-05,
     &   6.6864E-05, 6.6323E-05, 6.5766E-05, 6.5192E-05, 6.4599E-05,
     &   6.3988E-05, 6.3358E-05, 6.2708E-05, 6.2038E-05, 6.1346E-05,
     &   6.0633E-05, 5.9897E-05, 5.9138E-05, 5.8355E-05, 5.7547E-05,
     &   5.6715E-05, 5.5856E-05, 5.4971E-05, 5.4058E-05, 5.3118E-05,
     &   5.2149E-05, 5.1151E-05, 5.0123E-05, 4.9066E-05, 4.7978E-05,
     &   4.6860E-05, 4.5711E-05, 4.4531E-05, 4.3321E-05, 4.2080E-05,
     &   4.0809E-05, 3.9508E-05, 3.8178E-05, 3.6820E-05, 3.5436E-05,
     &   3.4027E-05, 3.2594E-05, 3.1139E-05, 2.9666E-05, 2.8176E-05,
     &   2.6672E-05, 2.5158E-05, 2.3636E-05, 2.2112E-05, 2.0587E-05,
     &   1.9067E-05, 1.7555E-05, 1.6055E-05, 1.4571E-05, 1.3106E-05,
     &   1.1664E-05, 1.1521E-05, 1.1379E-05, 1.1237E-05, 1.1095E-05,
     &   1.0953E-05, 1.0812E-05, 1.0671E-05, 1.0530E-05, 1.0389E-05,
     &   1.0249E-05, 1.0109E-05, 9.9695E-06, 9.8302E-06, 9.6912E-06,
     &   9.5525E-06, 9.4141E-06, 9.2761E-06, 9.1384E-06, 9.0010E-06/
  
         DATA ((DGT  (I,J), I= 301, 400), J=2,2) /
     &   8.8640E-06, 8.7273E-06, 8.5909E-06, 8.4549E-06, 8.3193E-06,
     &   8.1840E-06, 8.0492E-06, 7.9146E-06, 7.7805E-06, 7.6467E-06,
     &   7.5134E-06, 7.3804E-06, 7.2479E-06, 7.1158E-06, 6.9841E-06,
     &   6.8528E-06, 6.7220E-06, 6.5916E-06, 6.4616E-06, 6.3322E-06,
     &   6.2032E-06, 6.0747E-06, 5.9467E-06, 5.8192E-06, 5.6922E-06,
     &   5.5657E-06, 5.4398E-06, 5.3145E-06, 5.1897E-06, 5.0655E-06,
     &   4.9419E-06, 4.8189E-06, 4.6966E-06, 4.5749E-06, 4.4539E-06,
     &   4.3335E-06, 4.2139E-06, 4.0950E-06, 3.9769E-06, 3.8595E-06,
     &   3.7429E-06, 3.6272E-06, 3.5123E-06, 3.3983E-06, 3.2853E-06,
     &   3.1731E-06, 3.0620E-06, 2.9518E-06, 2.8427E-06, 2.7347E-06,
     &   2.6278E-06, 2.5221E-06, 2.4177E-06, 2.3144E-06, 2.2125E-06,
     &   2.1120E-06, 2.0128E-06, 1.9151E-06, 1.8190E-06, 1.7245E-06,
     &   1.6315E-06, 1.5404E-06, 1.4509E-06, 1.3634E-06, 1.2778E-06,
     &   1.1941E-06, 1.1126E-06, 1.0332E-06, 9.5603E-07, 8.8120E-07,
     &   8.0878E-07, 7.3886E-07, 6.7152E-07, 6.0687E-07, 5.4498E-07,
     &   4.8596E-07, 4.2989E-07, 3.7688E-07, 3.2700E-07, 2.8035E-07,
     &   2.3701E-07, 2.3286E-07, 2.2875E-07, 2.2467E-07, 2.2063E-07,
     &   2.1662E-07, 2.1264E-07, 2.0870E-07, 2.0479E-07, 2.0092E-07,
     &   1.9708E-07, 1.9328E-07, 1.8951E-07, 1.8578E-07, 1.8208E-07,
     &   1.7842E-07, 1.7479E-07, 1.7120E-07, 1.6764E-07, 1.6412E-07/
  
         DATA ((DGT  (I,J), I= 401, 500), J=2,2) /
     &   1.6063E-07, 1.5718E-07, 1.5377E-07, 1.5039E-07, 1.4705E-07,
     &   1.4374E-07, 1.4047E-07, 1.3723E-07, 1.3403E-07, 1.3087E-07,
     &   1.2775E-07, 1.2466E-07, 1.2160E-07, 1.1858E-07, 1.1560E-07,
     &   1.1266E-07, 1.0975E-07, 1.0688E-07, 1.0405E-07, 1.0125E-07,
     &   9.8491E-08, 9.5768E-08, 9.3082E-08, 9.0433E-08, 8.7821E-08,
     &   8.5247E-08, 8.2710E-08, 8.0210E-08, 7.7747E-08, 7.5322E-08,
     &   7.2935E-08, 7.0585E-08, 6.8273E-08, 6.5998E-08, 6.3761E-08,
     &   6.1562E-08, 5.9401E-08, 5.7278E-08, 5.5193E-08, 5.3146E-08,
     &   5.1136E-08, 4.9165E-08, 4.7232E-08, 4.5338E-08, 4.3481E-08,
     &   4.1663E-08, 3.9883E-08, 3.8141E-08, 3.6438E-08, 3.4774E-08,
     &   3.3147E-08, 3.1560E-08, 3.0011E-08, 2.8500E-08, 2.7029E-08,
     &   2.5595E-08, 2.4201E-08, 2.2846E-08, 2.1529E-08, 2.0251E-08,
     &   1.9012E-08, 1.7811E-08, 1.6650E-08, 1.5528E-08, 1.4444E-08,
     &   1.3400E-08, 1.2394E-08, 1.1428E-08, 1.0501E-08, 9.6127E-09,
     &   8.7637E-09, 7.9538E-09, 7.1831E-09, 6.4515E-09, 5.7592E-09,
     &   5.1060E-09, 4.4922E-09, 3.9175E-09, 3.3822E-09, 2.8861E-09,
     &   2.4293E-09, 2.3857E-09, 2.3426E-09, 2.2999E-09, 2.2575E-09,
     &   2.2156E-09, 2.1740E-09, 2.1329E-09, 2.0921E-09, 2.0517E-09,
     &   2.0118E-09, 1.9722E-09, 1.9330E-09, 1.8942E-09, 1.8558E-09,
     &   1.8177E-09, 1.7801E-09, 1.7429E-09, 1.7061E-09, 1.6696E-09/
  
         DATA ((DGT  (I,J), I= 501, 600), J=2,2) /
     &   1.6336E-09, 1.5979E-09, 1.5627E-09, 1.5278E-09, 1.4933E-09,
     &   1.4592E-09, 1.4255E-09, 1.3922E-09, 1.3593E-09, 1.3268E-09,
     &   1.2947E-09, 1.2630E-09, 1.2317E-09, 1.2007E-09, 1.1702E-09,
     &   1.1400E-09, 1.1103E-09, 1.0809E-09, 1.0519E-09, 1.0234E-09,
     &   9.9518E-10, 9.6739E-10, 9.3999E-10, 9.1299E-10, 8.8638E-10,
     &   8.6016E-10, 8.3434E-10, 8.0891E-10, 7.8387E-10, 7.5923E-10,
     &   7.3498E-10, 7.1113E-10, 6.8767E-10, 6.6460E-10, 6.4192E-10,
     &   6.1964E-10, 5.9775E-10, 5.7626E-10, 5.5516E-10, 5.3445E-10,
     &   5.1414E-10, 4.9422E-10, 4.7469E-10, 4.5556E-10, 4.3682E-10,
     &   4.1847E-10, 4.0052E-10, 3.8296E-10, 3.6579E-10, 3.4902E-10,
     &   3.3264E-10, 3.1665E-10, 3.0106E-10, 2.8587E-10, 2.7106E-10,
     &   2.5665E-10, 2.4263E-10, 2.2901E-10, 2.1578E-10, 2.0294E-10,
     &   1.9050E-10, 1.7845E-10, 1.6679E-10, 1.5553E-10, 1.4466E-10,
     &   1.3419E-10, 1.2411E-10, 1.1442E-10, 1.0513E-10, 9.6225E-11,
     &   8.7718E-11, 7.9605E-11, 7.1885E-11, 6.4559E-11, 5.7627E-11,
     &   5.1088E-11, 4.4943E-11, 3.9192E-11, 3.3834E-11, 2.8869E-11,
     &   2.4299E-11, 2.3863E-11, 2.3432E-11, 2.3004E-11, 2.2581E-11,
     &   2.2161E-11, 2.1745E-11, 2.1334E-11, 2.0926E-11, 2.0522E-11,
     &   2.0122E-11, 1.9726E-11, 1.9334E-11, 1.8946E-11, 1.8561E-11,
     &   1.8181E-11, 1.7805E-11, 1.7432E-11, 1.7064E-11, 1.6699E-11/
  
         DATA ((DGT  (I,J), I= 601, 700), J=2,2) /
     &   1.6339E-11, 1.5982E-11, 1.5629E-11, 1.5280E-11, 1.4935E-11,
     &   1.4595E-11, 1.4258E-11, 1.3924E-11, 1.3595E-11, 1.3270E-11,
     &   1.2949E-11, 1.2632E-11, 1.2318E-11, 1.2009E-11, 1.1703E-11,
     &   1.1402E-11, 1.1104E-11, 1.0810E-11, 1.0521E-11, 1.0235E-11,
     &   9.9528E-12, 9.6749E-12, 9.4008E-12, 9.1308E-12, 8.8646E-12,
     &   8.6024E-12, 8.3441E-12, 8.0898E-12, 7.8394E-12, 7.5929E-12,
     &   7.3504E-12, 7.1118E-12, 6.8772E-12, 6.6464E-12, 6.4197E-12,
     &   6.1968E-12, 5.9779E-12, 5.7629E-12, 5.5519E-12, 5.3448E-12,
     &   5.1416E-12, 4.9424E-12, 4.7471E-12, 4.5558E-12, 4.3684E-12,
     &   4.1849E-12, 4.0053E-12, 3.8297E-12, 3.6581E-12, 3.4903E-12,
     &   3.3265E-12, 3.1667E-12, 3.0107E-12, 2.8587E-12, 2.7107E-12,
     &   2.5666E-12, 2.4264E-12, 2.2901E-12, 2.1578E-12, 2.0295E-12,
     &   1.9050E-12, 1.7845E-12, 1.6680E-12, 1.5553E-12, 1.4467E-12,
     &   1.3419E-12, 1.2411E-12, 1.1442E-12, 1.0513E-12, 9.6226E-13,
     &   8.7719E-13, 7.9606E-13, 7.1886E-13, 6.4560E-13, 5.7627E-13,
     &   5.1088E-13, 4.4943E-13, 3.9192E-13, 3.3834E-13, 2.8870E-13,
     &   2.4299E-13, 2.3863E-13, 2.3432E-13, 2.3004E-13, 2.2581E-13,
     &   2.2161E-13, 2.1745E-13, 2.1334E-13, 2.0926E-13, 2.0522E-13,
     &   2.0122E-13, 1.9726E-13, 1.9334E-13, 1.8946E-13, 1.8561E-13,
     &   1.8181E-13, 1.7805E-13, 1.7432E-13, 1.7064E-13, 1.6699E-13/
  
         DATA ((DGT  (I,J), I= 701, 800), J=2,2) /
     &   1.6339E-13, 1.5982E-13, 1.5629E-13, 1.5280E-13, 1.4935E-13,
     &   1.4595E-13, 1.4258E-13, 1.3924E-13, 1.3595E-13, 1.3270E-13,
     &   1.2949E-13, 1.2632E-13, 1.2318E-13, 1.2009E-13, 1.1703E-13,
     &   1.1402E-13, 1.1104E-13, 1.0810E-13, 1.0521E-13, 1.0235E-13,
     &   9.9528E-14, 9.6749E-14, 9.4009E-14, 9.1308E-14, 8.8646E-14,
     &   8.6024E-14, 8.3441E-14, 8.0898E-14, 7.8394E-14, 7.5929E-14,
     &   7.3504E-14, 7.1118E-14, 6.8772E-14, 6.6465E-14, 6.4197E-14,
     &   6.1968E-14, 5.9779E-14, 5.7629E-14, 5.5519E-14, 5.3448E-14,
     &   5.1416E-14, 4.9424E-14, 4.7471E-14, 4.5558E-14, 4.3684E-14,
     &   4.1849E-14, 4.0053E-14, 3.8297E-14, 3.6581E-14, 3.4903E-14,
     &   3.3265E-14, 3.1667E-14, 3.0107E-14, 2.8587E-14, 2.7107E-14,
     &   2.5666E-14, 2.4264E-14, 2.2901E-14, 2.1578E-14, 2.0295E-14,
     &   1.9050E-14, 1.7845E-14, 1.6680E-14, 1.5553E-14, 1.4467E-14,
     &   1.3419E-14, 1.2411E-14, 1.1442E-14, 1.0513E-14, 9.6226E-15,
     &   8.7719E-15, 7.9606E-15, 7.1886E-15, 6.4560E-15, 5.7627E-15,
     &   5.1088E-15, 4.4943E-15, 3.9192E-15, 3.3834E-15, 2.8870E-15,
     &   2.4299E-15, 2.3863E-15, 2.3432E-15, 2.3004E-15, 2.2581E-15,
     &   2.2161E-15, 2.1745E-15, 2.1334E-15, 2.0926E-15, 2.0522E-15,
     &   2.0122E-15, 1.9726E-15, 1.9334E-15, 1.8946E-15, 1.8561E-15,
     &   1.8181E-15, 1.7805E-15, 1.7432E-15, 1.7064E-15, 1.6699E-15/
  
         DATA ((DGT  (I,J), I= 801, 900), J=2,2) /
     &   1.6339E-15, 1.5982E-15, 1.5629E-15, 1.5280E-15, 1.4935E-15,
     &   1.4595E-15, 1.4258E-15, 1.3924E-15, 1.3595E-15, 1.3270E-15,
     &   1.2949E-15, 1.2632E-15, 1.2318E-15, 1.2009E-15, 1.1703E-15,
     &   1.1402E-15, 1.1104E-15, 1.0810E-15, 1.0521E-15, 1.0235E-15,
     &   9.9528E-16, 9.6749E-16, 9.4009E-16, 9.1308E-16, 8.8646E-16,
     &   8.6024E-16, 8.3441E-16, 8.0898E-16, 7.8394E-16, 7.5929E-16,
     &   7.3504E-16, 7.1118E-16, 6.8772E-16, 6.6465E-16, 6.4197E-16,
     &   6.1968E-16, 5.9779E-16, 5.7629E-16, 5.5519E-16, 5.3448E-16,
     &   5.1416E-16, 4.9424E-16, 4.7471E-16, 4.5558E-16, 4.3684E-16,
     &   4.1849E-16, 4.0053E-16, 3.8297E-16, 3.6581E-16, 3.4903E-16,
     &   3.3265E-16, 3.1667E-16, 3.0107E-16, 2.8587E-16, 2.7107E-16,
     &   2.5666E-16, 2.4264E-16, 2.2901E-16, 2.1578E-16, 2.0295E-16,
     &   1.9050E-16, 1.7845E-16, 1.6680E-16, 1.5553E-16, 1.4467E-16,
     &   1.3419E-16, 1.2411E-16, 1.1442E-16, 1.0513E-16, 9.6226E-17,
     &   8.7719E-17, 7.9606E-17, 7.1886E-17, 6.4560E-17, 5.7627E-17,
     &   5.1088E-17, 4.4943E-17, 3.9192E-17, 3.3834E-17, 2.8870E-17,
     &   2.4299E-17, 0.0000E+00, 2.4299E-17, 2.1884E-10, 8.7513E-10,
     &   1.9691E-09, 3.5004E-09, 5.4705E-09, 7.8795E-09, 1.0728E-08,
     &   1.4017E-08, 1.7748E-08, 2.1921E-08, 2.6537E-08, 3.1599E-08,
     &   3.7107E-08, 4.3063E-08, 4.9468E-08, 5.6326E-08, 6.3637E-08/
  
         DATA ((DGT  (I,J), I= 901, 979), J=2,2) /
     &   7.1404E-08, 7.9630E-08, 8.8316E-08, 9.7466E-08, 1.0708E-07,
     &   1.1717E-07, 1.2773E-07, 1.3876E-07, 1.5027E-07, 1.6227E-07,
     &   1.7475E-07, 1.8773E-07, 2.0120E-07, 2.1518E-07, 2.2965E-07,
     &   2.4464E-07, 2.6015E-07, 2.7618E-07, 2.9274E-07, 3.0983E-07,
     &   3.2746E-07, 3.4565E-07, 3.6439E-07, 3.8369E-07, 4.0357E-07,
     &   4.2403E-07, 4.4508E-07, 4.6673E-07, 4.8899E-07, 5.1188E-07,
     &   5.3540E-07, 5.5957E-07, 5.8440E-07, 6.0991E-07, 6.3610E-07,
     &   6.6301E-07, 6.9064E-07, 7.1901E-07, 7.4814E-07, 7.7806E-07,
     &   8.0879E-07, 8.4035E-07, 8.7276E-07, 9.0607E-07, 9.4030E-07,
     &   9.7549E-07, 1.0117E-06, 1.0489E-06, 1.0872E-06, 1.1266E-06,
     &   1.1672E-06, 1.2091E-06, 1.2523E-06, 1.2969E-06, 1.3430E-06,
     &   1.3907E-06, 1.4401E-06, 1.4913E-06, 1.5445E-06, 1.5999E-06,
     &   1.6577E-06, 1.7182E-06, 1.7816E-06, 1.8482E-06, 1.9187E-06,
     &   1.9935E-06, 2.0733E-06, 2.1591E-06, 2.2520E-06, 2.3539E-06,
     &   2.4670E-06, 2.5948E-06, 2.7432E-06, 2.7988E-06, 2.9223E-06,
     &   2.97039460E-06, 3.15475236E-06, 3.18287132E-06, 3.25387931E-06/
  
         DATA ((DGT  (I,J), I=   1, 100), J=3,3) /
     &   1.4118E-04, 1.4117E-04, 1.4117E-04, 1.4117E-04, 1.4117E-04,
     &   1.4117E-04, 1.4117E-04, 1.4116E-04, 1.4116E-04, 1.4116E-04,
     &   1.4116E-04, 1.4116E-04, 1.4116E-04, 1.4115E-04, 1.4115E-04,
     &   1.4115E-04, 1.4115E-04, 1.4115E-04, 1.4114E-04, 1.4114E-04,
     &   1.4114E-04, 1.4114E-04, 1.4114E-04, 1.4113E-04, 1.4113E-04,
     &   1.4113E-04, 1.4113E-04, 1.4112E-04, 1.4112E-04, 1.4112E-04,
     &   1.4112E-04, 1.4112E-04, 1.4111E-04, 1.4111E-04, 1.4111E-04,
     &   1.4110E-04, 1.4110E-04, 1.4110E-04, 1.4110E-04, 1.4109E-04,
     &   1.4109E-04, 1.4109E-04, 1.4108E-04, 1.4108E-04, 1.4108E-04,
     &   1.4107E-04, 1.4107E-04, 1.4107E-04, 1.4106E-04, 1.4106E-04,
     &   1.4106E-04, 1.4105E-04, 1.4105E-04, 1.4104E-04, 1.4104E-04,
     &   1.4103E-04, 1.4103E-04, 1.4102E-04, 1.4102E-04, 1.4101E-04,
     &   1.4101E-04, 1.4100E-04, 1.4100E-04, 1.4099E-04, 1.4098E-04,
     &   1.4098E-04, 1.4097E-04, 1.4096E-04, 1.4095E-04, 1.4094E-04,
     &   1.4094E-04, 1.4093E-04, 1.4092E-04, 1.4091E-04, 1.4089E-04,
     &   1.4088E-04, 1.4087E-04, 1.4085E-04, 1.4084E-04, 1.4082E-04,
     &   1.4080E-04, 1.4078E-04, 1.4076E-04, 1.4073E-04, 1.4070E-04,
     &   1.4067E-04, 1.4063E-04, 1.4058E-04, 1.4052E-04, 1.4045E-04,
     &   1.4036E-04, 1.4035E-04, 1.4034E-04, 1.4033E-04, 1.4032E-04,
     &   1.4031E-04, 1.4029E-04, 1.4028E-04, 1.4027E-04, 1.4026E-04/
  
         DATA ((DGT  (I,J), I= 101, 200), J=3,3) /
     &   1.4024E-04, 1.4023E-04, 1.4022E-04, 1.4020E-04, 1.4019E-04,
     &   1.4017E-04, 1.4016E-04, 1.4014E-04, 1.4012E-04, 1.4011E-04,
     &   1.4009E-04, 1.4007E-04, 1.4005E-04, 1.4003E-04, 1.4001E-04,
     &   1.3999E-04, 1.3997E-04, 1.3994E-04, 1.3992E-04, 1.3990E-04,
     &   1.3987E-04, 1.3984E-04, 1.3982E-04, 1.3979E-04, 1.3976E-04,
     &   1.3973E-04, 1.3970E-04, 1.3966E-04, 1.3963E-04, 1.3959E-04,
     &   1.3955E-04, 1.3951E-04, 1.3947E-04, 1.3942E-04, 1.3938E-04,
     &   1.3933E-04, 1.3928E-04, 1.3922E-04, 1.3917E-04, 1.3911E-04,
     &   1.3905E-04, 1.3898E-04, 1.3891E-04, 1.3884E-04, 1.3876E-04,
     &   1.3867E-04, 1.3859E-04, 1.3849E-04, 1.3839E-04, 1.3829E-04,
     &   1.3817E-04, 1.3805E-04, 1.3792E-04, 1.3778E-04, 1.3764E-04,
     &   1.3748E-04, 1.3730E-04, 1.3712E-04, 1.3692E-04, 1.3670E-04,
     &   1.3646E-04, 1.3621E-04, 1.3593E-04, 1.3562E-04, 1.3529E-04,
     &   1.3493E-04, 1.3452E-04, 1.3408E-04, 1.3359E-04, 1.3305E-04,
     &   1.3245E-04, 1.3178E-04, 1.3103E-04, 1.3019E-04, 1.2925E-04,
     &   1.2818E-04, 1.2697E-04, 1.2559E-04, 1.2400E-04, 1.2217E-04,
     &   1.2002E-04, 1.1981E-04, 1.1959E-04, 1.1938E-04, 1.1915E-04,
     &   1.1893E-04, 1.1870E-04, 1.1847E-04, 1.1823E-04, 1.1799E-04,
     &   1.1775E-04, 1.1750E-04, 1.1725E-04, 1.1699E-04, 1.1673E-04,
     &   1.1646E-04, 1.1619E-04, 1.1591E-04, 1.1563E-04, 1.1535E-04/
  
         DATA ((DGT  (I,J), I= 201, 300), J=3,3) /
     &   1.1505E-04, 1.1476E-04, 1.1445E-04, 1.1415E-04, 1.1383E-04,
     &   1.1351E-04, 1.1318E-04, 1.1285E-04, 1.1251E-04, 1.1216E-04,
     &   1.1181E-04, 1.1145E-04, 1.1108E-04, 1.1070E-04, 1.1031E-04,
     &   1.0992E-04, 1.0952E-04, 1.0910E-04, 1.0868E-04, 1.0825E-04,
     &   1.0781E-04, 1.0736E-04, 1.0690E-04, 1.0642E-04, 1.0594E-04,
     &   1.0544E-04, 1.0494E-04, 1.0442E-04, 1.0388E-04, 1.0333E-04,
     &   1.0277E-04, 1.0220E-04, 1.0161E-04, 1.0100E-04, 1.0038E-04,
     &   9.9743E-05, 9.9088E-05, 9.8416E-05, 9.7725E-05, 9.7016E-05,
     &   9.6287E-05, 9.5538E-05, 9.4768E-05, 9.3977E-05, 9.3163E-05,
     &   9.2327E-05, 9.1467E-05, 9.0582E-05, 8.9672E-05, 8.8735E-05,
     &   8.7771E-05, 8.6780E-05, 8.5759E-05, 8.4707E-05, 8.3624E-05,
     &   8.2509E-05, 8.1360E-05, 8.0175E-05, 7.8953E-05, 7.7692E-05,
     &   7.6391E-05, 7.5046E-05, 7.3657E-05, 7.2219E-05, 7.0731E-05,
     &   6.9187E-05, 6.7586E-05, 6.5921E-05, 6.4188E-05, 6.2381E-05,
     &   6.0492E-05, 5.8516E-05, 5.6442E-05, 5.4261E-05, 5.1962E-05,
     &   4.9535E-05, 4.6966E-05, 4.4244E-05, 4.1354E-05, 3.8287E-05,
     &   3.5034E-05, 3.4698E-05, 3.4361E-05, 3.4021E-05, 3.3680E-05,
     &   3.3337E-05, 3.2991E-05, 3.2644E-05, 3.2295E-05, 3.1945E-05,
     &   3.1592E-05, 3.1238E-05, 3.0881E-05, 3.0523E-05, 3.0163E-05,
     &   2.9802E-05, 2.9438E-05, 2.9073E-05, 2.8706E-05, 2.8337E-05/
  
         DATA ((DGT  (I,J), I= 301, 400), J=3,3) /
     &   2.7967E-05, 2.7595E-05, 2.7221E-05, 2.6846E-05, 2.6469E-05,
     &   2.6091E-05, 2.5711E-05, 2.5330E-05, 2.4947E-05, 2.4563E-05,
     &   2.4178E-05, 2.3791E-05, 2.3403E-05, 2.3014E-05, 2.2624E-05,
     &   2.2233E-05, 2.1841E-05, 2.1448E-05, 2.1054E-05, 2.0659E-05,
     &   2.0264E-05, 1.9868E-05, 1.9472E-05, 1.9075E-05, 1.8677E-05,
     &   1.8280E-05, 1.7882E-05, 1.7485E-05, 1.7087E-05, 1.6690E-05,
     &   1.6292E-05, 1.5896E-05, 1.5500E-05, 1.5104E-05, 1.4709E-05,
     &   1.4316E-05, 1.3923E-05, 1.3532E-05, 1.3142E-05, 1.2753E-05,
     &   1.2367E-05, 1.1982E-05, 1.1599E-05, 1.1219E-05, 1.0841E-05,
     &   1.0466E-05, 1.0093E-05, 9.7235E-06, 9.3572E-06, 8.9944E-06,
     &   8.6352E-06, 8.2798E-06, 7.9286E-06, 7.5816E-06, 7.2392E-06,
     &   6.9016E-06, 6.5689E-06, 6.2416E-06, 5.9197E-06, 5.6035E-06,
     &   5.2934E-06, 4.9895E-06, 4.6921E-06, 4.4014E-06, 4.1178E-06,
     &   3.8414E-06, 3.5726E-06, 3.3116E-06, 3.0586E-06, 2.8139E-06,
     &   2.5778E-06, 2.3505E-06, 2.1323E-06, 1.9235E-06, 1.7242E-06,
     &   1.5347E-06, 1.3552E-06, 1.1861E-06, 1.0274E-06, 8.7943E-07,
     &   7.4238E-07, 7.2928E-07, 7.1630E-07, 7.0342E-07, 6.9066E-07,
     &   6.7801E-07, 6.6547E-07, 6.5304E-07, 6.4073E-07, 6.2853E-07,
     &   6.1644E-07, 6.0446E-07, 5.9260E-07, 5.8085E-07, 5.6921E-07,
     &   5.5769E-07, 5.4628E-07, 5.3498E-07, 5.2380E-07, 5.1273E-07/
  
         DATA ((DGT  (I,J), I= 401, 500), J=3,3) /
     &   5.0178E-07, 4.9094E-07, 4.8021E-07, 4.6960E-07, 4.5911E-07,
     &   4.4873E-07, 4.3847E-07, 4.2832E-07, 4.1828E-07, 4.0837E-07,
     &   3.9857E-07, 3.8888E-07, 3.7931E-07, 3.6986E-07, 3.6052E-07,
     &   3.5130E-07, 3.4220E-07, 3.3321E-07, 3.2434E-07, 3.1559E-07,
     &   3.0696E-07, 2.9844E-07, 2.9004E-07, 2.8176E-07, 2.7359E-07,
     &   2.6555E-07, 2.5762E-07, 2.4981E-07, 2.4212E-07, 2.3454E-07,
     &   2.2709E-07, 2.1975E-07, 2.1254E-07, 2.0544E-07, 1.9846E-07,
     &   1.9160E-07, 1.8486E-07, 1.7824E-07, 1.7173E-07, 1.6535E-07,
     &   1.5909E-07, 1.5294E-07, 1.4692E-07, 1.4101E-07, 1.3523E-07,
     &   1.2957E-07, 1.2402E-07, 1.1860E-07, 1.1330E-07, 1.0811E-07,
     &   1.0305E-07, 9.8109E-08, 9.3288E-08, 8.8588E-08, 8.4008E-08,
     &   7.9550E-08, 7.5212E-08, 7.0995E-08, 6.6900E-08, 6.2925E-08,
     &   5.9072E-08, 5.5340E-08, 5.1729E-08, 4.8240E-08, 4.4873E-08,
     &   4.1626E-08, 3.8502E-08, 3.5498E-08, 3.2617E-08, 2.9857E-08,
     &   2.7219E-08, 2.4703E-08, 2.2309E-08, 2.0036E-08, 1.7885E-08,
     &   1.5857E-08, 1.3950E-08, 1.2165E-08, 1.0502E-08, 8.9618E-09,
     &   7.5432E-09, 7.4081E-09, 7.2741E-09, 7.1414E-09, 7.0099E-09,
     &   6.8797E-09, 6.7506E-09, 6.6228E-09, 6.4962E-09, 6.3709E-09,
     &   6.2467E-09, 6.1238E-09, 6.0021E-09, 5.8816E-09, 5.7623E-09,
     &   5.6442E-09, 5.5274E-09, 5.4118E-09, 5.2974E-09, 5.1843E-09/
  
         DATA ((DGT  (I,J), I= 501, 600), J=3,3) /
     &   5.0723E-09, 4.9616E-09, 4.8521E-09, 4.7438E-09, 4.6368E-09,
     &   4.5309E-09, 4.4263E-09, 4.3229E-09, 4.2208E-09, 4.1198E-09,
     &   4.0201E-09, 3.9216E-09, 3.8243E-09, 3.7282E-09, 3.6334E-09,
     &   3.5398E-09, 3.4474E-09, 3.3562E-09, 3.2662E-09, 3.1775E-09,
     &   3.0900E-09, 3.0037E-09, 2.9186E-09, 2.8348E-09, 2.7522E-09,
     &   2.6708E-09, 2.5906E-09, 2.5116E-09, 2.4339E-09, 2.3574E-09,
     &   2.2821E-09, 2.2080E-09, 2.1352E-09, 2.0635E-09, 1.9931E-09,
     &   1.9239E-09, 1.8560E-09, 1.7892E-09, 1.7237E-09, 1.6594E-09,
     &   1.5963E-09, 1.5345E-09, 1.4739E-09, 1.4145E-09, 1.3563E-09,
     &   1.2993E-09, 1.2436E-09, 1.1890E-09, 1.1357E-09, 1.0837E-09,
     &   1.0328E-09, 9.8318E-10, 9.3477E-10, 8.8758E-10, 8.4161E-10,
     &   7.9687E-10, 7.5335E-10, 7.1105E-10, 6.6997E-10, 6.3011E-10,
     &   5.9148E-10, 5.5406E-10, 5.1788E-10, 4.8291E-10, 4.4916E-10,
     &   4.1664E-10, 3.8534E-10, 3.5526E-10, 3.2640E-10, 2.9877E-10,
     &   2.7235E-10, 2.4716E-10, 2.2319E-10, 2.0045E-10, 1.7892E-10,
     &   1.5862E-10, 1.3954E-10, 1.2168E-10, 1.0505E-10, 8.9635E-11,
     &   7.5444E-11, 7.4092E-11, 7.2753E-11, 7.1425E-11, 7.0110E-11,
     &   6.8807E-11, 6.7516E-11, 6.6238E-11, 6.4971E-11, 6.3717E-11,
     &   6.2475E-11, 6.1246E-11, 6.0028E-11, 5.8823E-11, 5.7630E-11,
     &   5.6449E-11, 5.5281E-11, 5.4124E-11, 5.2980E-11, 5.1848E-11/
  
         DATA ((DGT  (I,J), I= 601, 700), J=3,3) /
     &   5.0729E-11, 4.9621E-11, 4.8526E-11, 4.7443E-11, 4.6372E-11,
     &   4.5314E-11, 4.4267E-11, 4.3233E-11, 4.2211E-11, 4.1202E-11,
     &   4.0204E-11, 3.9219E-11, 3.8246E-11, 3.7285E-11, 3.6337E-11,
     &   3.5400E-11, 3.4476E-11, 3.3564E-11, 3.2665E-11, 3.1777E-11,
     &   3.0902E-11, 3.0039E-11, 2.9188E-11, 2.8350E-11, 2.7523E-11,
     &   2.6709E-11, 2.5907E-11, 2.5118E-11, 2.4340E-11, 2.3575E-11,
     &   2.2822E-11, 2.2081E-11, 2.1353E-11, 2.0636E-11, 1.9932E-11,
     &   1.9240E-11, 1.8561E-11, 1.7893E-11, 1.7238E-11, 1.6595E-11,
     &   1.5964E-11, 1.5345E-11, 1.4739E-11, 1.4145E-11, 1.3563E-11,
     &   1.2993E-11, 1.2436E-11, 1.1891E-11, 1.1358E-11, 1.0837E-11,
     &   1.0328E-11, 9.8320E-12, 9.3479E-12, 8.8760E-12, 8.4163E-12,
     &   7.9688E-12, 7.5336E-12, 7.1106E-12, 6.6998E-12, 6.3012E-12,
     &   5.9148E-12, 5.5407E-12, 5.1788E-12, 4.8291E-12, 4.4917E-12,
     &   4.1664E-12, 3.8534E-12, 3.5526E-12, 3.2640E-12, 2.9877E-12,
     &   2.7235E-12, 2.4716E-12, 2.2319E-12, 2.0045E-12, 1.7892E-12,
     &   1.5862E-12, 1.3954E-12, 1.2168E-12, 1.0505E-12, 8.9636E-13,
     &   7.5444E-13, 7.4093E-13, 7.2753E-13, 7.1425E-13, 7.0110E-13,
     &   6.8807E-13, 6.7516E-13, 6.6238E-13, 6.4972E-13, 6.3717E-13,
     &   6.2476E-13, 6.1246E-13, 6.0028E-13, 5.8823E-13, 5.7630E-13,
     &   5.6449E-13, 5.5281E-13, 5.4125E-13, 5.2980E-13, 5.1849E-13/
  
         DATA ((DGT  (I,J), I= 701, 800), J=3,3) /
     &   5.0729E-13, 4.9621E-13, 4.8526E-13, 4.7443E-13, 4.6372E-13,
     &   4.5314E-13, 4.4267E-13, 4.3233E-13, 4.2211E-13, 4.1202E-13,
     &   4.0204E-13, 3.9219E-13, 3.8246E-13, 3.7285E-13, 3.6337E-13,
     &   3.5400E-13, 3.4476E-13, 3.3564E-13, 3.2665E-13, 3.1777E-13,
     &   3.0902E-13, 3.0039E-13, 2.9188E-13, 2.8350E-13, 2.7523E-13,
     &   2.6709E-13, 2.5907E-13, 2.5118E-13, 2.4340E-13, 2.3575E-13,
     &   2.2822E-13, 2.2081E-13, 2.1353E-13, 2.0636E-13, 1.9932E-13,
     &   1.9240E-13, 1.8561E-13, 1.7893E-13, 1.7238E-13, 1.6595E-13,
     &   1.5964E-13, 1.5345E-13, 1.4739E-13, 1.4145E-13, 1.3563E-13,
     &   1.2993E-13, 1.2436E-13, 1.1891E-13, 1.1358E-13, 1.0837E-13,
     &   1.0328E-13, 9.8320E-14, 9.3479E-14, 8.8760E-14, 8.4163E-14,
     &   7.9688E-14, 7.5336E-14, 7.1106E-14, 6.6998E-14, 6.3012E-14,
     &   5.9148E-14, 5.5407E-14, 5.1788E-14, 4.8291E-14, 4.4917E-14,
     &   4.1664E-14, 3.8534E-14, 3.5526E-14, 3.2640E-14, 2.9877E-14,
     &   2.7235E-14, 2.4716E-14, 2.2319E-14, 2.0045E-14, 1.7892E-14,
     &   1.5862E-14, 1.3954E-14, 1.2168E-14, 1.0505E-14, 8.9636E-15,
     &   7.5444E-15, 7.4093E-15, 7.2753E-15, 7.1425E-15, 7.0110E-15,
     &   6.8807E-15, 6.7516E-15, 6.6238E-15, 6.4972E-15, 6.3717E-15,
     &   6.2476E-15, 6.1246E-15, 6.0028E-15, 5.8823E-15, 5.7630E-15,
     &   5.6449E-15, 5.5281E-15, 5.4125E-15, 5.2980E-15, 5.1849E-15/
  
         DATA ((DGT  (I,J), I= 801, 900), J=3,3) /
     &   5.0729E-15, 4.9621E-15, 4.8526E-15, 4.7443E-15, 4.6372E-15,
     &   4.5314E-15, 4.4267E-15, 4.3233E-15, 4.2211E-15, 4.1202E-15,
     &   4.0204E-15, 3.9219E-15, 3.8246E-15, 3.7285E-15, 3.6337E-15,
     &   3.5400E-15, 3.4476E-15, 3.3564E-15, 3.2665E-15, 3.1777E-15,
     &   3.0902E-15, 3.0039E-15, 2.9188E-15, 2.8350E-15, 2.7523E-15,
     &   2.6709E-15, 2.5907E-15, 2.5118E-15, 2.4340E-15, 2.3575E-15,
     &   2.2822E-15, 2.2081E-15, 2.1353E-15, 2.0636E-15, 1.9932E-15,
     &   1.9240E-15, 1.8561E-15, 1.7893E-15, 1.7238E-15, 1.6595E-15,
     &   1.5964E-15, 1.5345E-15, 1.4739E-15, 1.4145E-15, 1.3563E-15,
     &   1.2993E-15, 1.2436E-15, 1.1891E-15, 1.1358E-15, 1.0837E-15,
     &   1.0328E-15, 9.8320E-16, 9.3479E-16, 8.8760E-16, 8.4163E-16,
     &   7.9688E-16, 7.5336E-16, 7.1106E-16, 6.6998E-16, 6.3012E-16,
     &   5.9148E-16, 5.5407E-16, 5.1788E-16, 4.8291E-16, 4.4917E-16,
     &   4.1664E-16, 3.8534E-16, 3.5526E-16, 3.2640E-16, 2.9877E-16,
     &   2.7235E-16, 2.4716E-16, 2.2319E-16, 2.0045E-16, 1.7892E-16,
     &   1.5862E-16, 1.3954E-16, 1.2168E-16, 1.0505E-16, 8.9636E-17,
     &   7.5444E-17, 0.0000E+00, 7.5444E-17, 6.7946E-10, 2.7171E-09,
     &   6.1132E-09, 1.0867E-08, 1.6981E-08, 2.4457E-08, 3.3295E-08,
     &   4.3497E-08, 5.5065E-08, 6.8001E-08, 8.2307E-08, 9.7986E-08,
     &   1.1504E-07, 1.3347E-07, 1.5329E-07, 1.7449E-07, 1.9708E-07/
  
         DATA ((DGT  (I,J), I= 901, 979), J=3,3) /
     &   2.2107E-07, 2.4645E-07, 2.7324E-07, 3.0143E-07, 3.3104E-07,
     &   3.6207E-07, 3.9452E-07, 4.2840E-07, 4.6372E-07, 5.0049E-07,
     &   5.3870E-07, 5.7838E-07, 6.1952E-07, 6.6214E-07, 7.0624E-07,
     &   7.5184E-07, 7.9894E-07, 8.4755E-07, 8.9769E-07, 9.4935E-07,
     &   1.0026E-06, 1.0573E-06, 1.1137E-06, 1.1716E-06, 1.2311E-06,
     &   1.2922E-06, 1.3550E-06, 1.4193E-06, 1.4854E-06, 1.5531E-06,
     &   1.6224E-06, 1.6935E-06, 1.7663E-06, 1.8409E-06, 1.9172E-06,
     &   1.9953E-06, 2.0752E-06, 2.1569E-06, 2.2405E-06, 2.3259E-06,
     &   2.4133E-06, 2.5026E-06, 2.5938E-06, 2.6870E-06, 2.7823E-06,
     &   2.8796E-06, 2.9790E-06, 3.0806E-06, 3.1843E-06, 3.2902E-06,
     &   3.3984E-06, 3.5089E-06, 3.6218E-06, 3.7371E-06, 3.8549E-06,
     &   3.9752E-06, 4.0981E-06, 4.2238E-06, 4.3522E-06, 4.4835E-06,
     &   4.6178E-06, 4.7551E-06, 4.8957E-06, 5.0396E-06, 5.1870E-06,
     &   5.3381E-06, 5.4931E-06, 5.6521E-06, 5.8156E-06, 5.9837E-06,
     &   6.1569E-06, 6.3357E-06, 6.5207E-06, 6.5838E-06, 6.7126E-06,
     &   6.75854016E-06, 6.91280364E-06, 6.93334437E-06, 6.98168357E-06/

c      ++++ dalhadthigh19 ++++  

c update jun 2019 
c  
c******************************************************************************
c*                                                                            *
c*    --- intRdat1 ---                              Fri Jun 14 12:37:40 2019  *
c*                                                                            *
c***************************# FJ@HU Berlin #***********************************
c  
c  "Delta alpha"               Update version (12/06/2019) 
c  
c ISCAN: -2, Ismooth: 0, IGS: 0, DSET: WAVE, iplot: 0 itestflavorspl: 0
c IKE,Emin,Emax,NP,N,EPSREL:  1,-2.0000E+04,-1.0000E+03, 100, 10, 1.00E-02, 
c ALS(sta)(sys):  0.1184( 0.0007)( 0.0000), MZINP:   91.1876, MTOP:    173.20
c NF,IOR,ICHK: 5,4,2,ISU2: 0,NFL: 5,INAG: 1,inotail:  0, sin2W:   0.23153
c CHPTCUT,EC,ECUT: 0.3180,     5.20,    11.50
c  
  
       DATA  (XXX  (I), I=   1, 100) /
     &  -2.0000E+04,-1.9701E+04,-1.9407E+04,-1.9117E+04,-1.8831E+04,
     &  -1.8550E+04,-1.8273E+04,-1.8000E+04,-1.7731E+04,-1.7466E+04,
     &  -1.7205E+04,-1.6948E+04,-1.6695E+04,-1.6445E+04,-1.6199E+04,
     &  -1.5957E+04,-1.5719E+04,-1.5484E+04,-1.5253E+04,-1.5025E+04,
     &  -1.4800E+04,-1.4579E+04,-1.4361E+04,-1.4147E+04,-1.3935E+04,
     &  -1.3727E+04,-1.3522E+04,-1.3320E+04,-1.3121E+04,-1.2925E+04,
     &  -1.2732E+04,-1.2542E+04,-1.2354E+04,-1.2170E+04,-1.1988E+04,
     &  -1.1809E+04,-1.1632E+04,-1.1459E+04,-1.1287E+04,-1.1119E+04,
     &  -1.0953E+04,-1.0789E+04,-1.0628E+04,-1.0469E+04,-1.0313E+04,
     &  -1.0158E+04,-1.0007E+04,-9.8572E+03,-9.7099E+03,-9.5648E+03,
     &  -9.4219E+03,-9.2811E+03,-9.1424E+03,-9.0058E+03,-8.8713E+03,
     &  -8.7387E+03,-8.6082E+03,-8.4796E+03,-8.3529E+03,-8.2281E+03,
     &  -8.1051E+03,-7.9840E+03,-7.8647E+03,-7.7472E+03,-7.6315E+03,
     &  -7.5174E+03,-7.4051E+03,-7.2945E+03,-7.1855E+03,-7.0781E+03,
     &  -6.9724E+03,-6.8682E+03,-6.7656E+03,-6.6645E+03,-6.5649E+03,
     &  -6.4668E+03,-6.3702E+03,-6.2750E+03,-6.1813E+03,-6.0889E+03,
     &  -5.9980E+03,-5.9083E+03,-5.8201E+03,-5.7331E+03,-5.6474E+03,
     &  -5.5631E+03,-5.4799E+03,-5.3981E+03,-5.3174E+03,-5.2380E+03,
     &  -5.1597E+03,-5.0826E+03,-5.0067E+03,-4.9319E+03,-4.8582E+03,
     &  -4.7856E+03,-4.7141E+03,-4.6437E+03,-4.5743E+03,-4.5059E+03/
  
       DATA  (XXX  (I), I= 101, 200) /
     &  -4.4386E+03,-4.3723E+03,-4.3070E+03,-4.2426E+03,-4.1792E+03,
     &  -4.1168E+03,-4.0553E+03,-3.9947E+03,-3.9350E+03,-3.8762E+03,
     &  -3.8183E+03,-3.7612E+03,-3.7050E+03,-3.6497E+03,-3.5951E+03,
     &  -3.5414E+03,-3.4885E+03,-3.4364E+03,-3.3850E+03,-3.3345E+03,
     &  -3.2847E+03,-3.2356E+03,-3.1872E+03,-3.1396E+03,-3.0927E+03,
     &  -3.0465E+03,-3.0010E+03,-2.9561E+03,-2.9120E+03,-2.8685E+03,
     &  -2.8256E+03,-2.7834E+03,-2.7418E+03,-2.7008E+03,-2.6605E+03,
     &  -2.6207E+03,-2.5816E+03,-2.5430E+03,-2.5050E+03,-2.4676E+03,
     &  -2.4307E+03,-2.3944E+03,-2.3586E+03,-2.3234E+03,-2.2887E+03,
     &  -2.2545E+03,-2.2208E+03,-2.1876E+03,-2.1549E+03,-2.1227E+03,
     &  -2.0910E+03,-2.0598E+03,-2.0290E+03,-1.9987E+03,-1.9688E+03,
     &  -1.9394E+03,-1.9104E+03,-1.8819E+03,-1.8538E+03,-1.8261E+03,
     &  -1.7988E+03,-1.7719E+03,-1.7454E+03,-1.7193E+03,-1.6937E+03,
     &  -1.6683E+03,-1.6434E+03,-1.6189E+03,-1.5947E+03,-1.5709E+03,
     &  -1.5474E+03,-1.5243E+03,-1.5015E+03,-1.4791E+03,-1.4570E+03,
     &  -1.4352E+03,-1.4137E+03,-1.3926E+03,-1.3718E+03,-1.3513E+03,
     &  -1.3311E+03,-1.3112E+03,-1.2916E+03,-1.2723E+03,-1.2533E+03,
     &  -1.2346E+03,-1.2162E+03,-1.1980E+03,-1.1801E+03,-1.1625E+03,
     &  -1.1451E+03,-1.1280E+03,-1.1111E+03,-1.0945E+03,-1.0782E+03,
     &  -1.0621E+03,-1.0462E+03,-1.0306E+03,-1.0152E+03,-1.0000E+03/
  
  
         DATA ((YGG  (I,J), I=   1, 100), J=1,1) /
     &   5.7096E-02, 5.7009E-02, 5.6923E-02, 5.6837E-02, 5.6750E-02,
     &   5.6664E-02, 5.6577E-02, 5.6491E-02, 5.6405E-02, 5.6318E-02,
     &   5.6232E-02, 5.6146E-02, 5.6059E-02, 5.5973E-02, 5.5887E-02,
     &   5.5801E-02, 5.5715E-02, 5.5629E-02, 5.5543E-02, 5.5457E-02,
     &   5.5371E-02, 5.5285E-02, 5.5199E-02, 5.5113E-02, 5.5027E-02,
     &   5.4941E-02, 5.4855E-02, 5.4769E-02, 5.4684E-02, 5.4598E-02,
     &   5.4512E-02, 5.4427E-02, 5.4341E-02, 5.4255E-02, 5.4170E-02,
     &   5.4084E-02, 5.3999E-02, 5.3914E-02, 5.3828E-02, 5.3743E-02,
     &   5.3658E-02, 5.3573E-02, 5.3487E-02, 5.3402E-02, 5.3317E-02,
     &   5.3232E-02, 5.3147E-02, 5.3062E-02, 5.2977E-02, 5.2893E-02,
     &   5.2808E-02, 5.2723E-02, 5.2639E-02, 5.2554E-02, 5.2470E-02,
     &   5.2385E-02, 5.2301E-02, 5.2216E-02, 5.2132E-02, 5.2048E-02,
     &   5.1964E-02, 5.1880E-02, 5.1796E-02, 5.1712E-02, 5.1628E-02,
     &   5.1544E-02, 5.1460E-02, 5.1377E-02, 5.1293E-02, 5.1210E-02,
     &   5.1126E-02, 5.1043E-02, 5.0960E-02, 5.0876E-02, 5.0793E-02,
     &   5.0710E-02, 5.0627E-02, 5.0544E-02, 5.0462E-02, 5.0379E-02,
     &   5.0296E-02, 5.0214E-02, 5.0131E-02, 5.0049E-02, 4.9967E-02,
     &   4.9885E-02, 4.9803E-02, 4.9721E-02, 4.9639E-02, 4.9557E-02,
     &   4.9475E-02, 4.9394E-02, 4.9312E-02, 4.9231E-02, 4.9150E-02,
     &   4.9068E-02, 4.8987E-02, 4.8906E-02, 4.8825E-02, 4.8745E-02/
  
         DATA ((YGG  (I,J), I= 101, 200), J=1,1) /
     &   4.8664E-02, 4.8583E-02, 4.8503E-02, 4.8423E-02, 4.8342E-02,
     &   4.8262E-02, 4.8182E-02, 4.8102E-02, 4.8022E-02, 4.7943E-02,
     &   4.7863E-02, 4.7784E-02, 4.7704E-02, 4.7625E-02, 4.7546E-02,
     &   4.7467E-02, 4.7388E-02, 4.7309E-02, 4.7230E-02, 4.7152E-02,
     &   4.7073E-02, 4.6995E-02, 4.6917E-02, 4.6838E-02, 4.6760E-02,
     &   4.6682E-02, 4.6605E-02, 4.6527E-02, 4.6449E-02, 4.6372E-02,
     &   4.6294E-02, 4.6217E-02, 4.6140E-02, 4.6063E-02, 4.5986E-02,
     &   4.5909E-02, 4.5832E-02, 4.5755E-02, 4.5678E-02, 4.5602E-02,
     &   4.5525E-02, 4.5449E-02, 4.5373E-02, 4.5297E-02, 4.5220E-02,
     &   4.5144E-02, 4.5068E-02, 4.4992E-02, 4.4917E-02, 4.4841E-02,
     &   4.4765E-02, 4.4689E-02, 4.4614E-02, 4.4538E-02, 4.4463E-02,
     &   4.4387E-02, 4.4312E-02, 4.4237E-02, 4.4161E-02, 4.4086E-02,
     &   4.4011E-02, 4.3935E-02, 4.3860E-02, 4.3785E-02, 4.3710E-02,
     &   4.3635E-02, 4.3560E-02, 4.3485E-02, 4.3409E-02, 4.3334E-02,
     &   4.3259E-02, 4.3184E-02, 4.3109E-02, 4.3034E-02, 4.2958E-02,
     &   4.2883E-02, 4.2808E-02, 4.2733E-02, 4.2657E-02, 4.2582E-02,
     &   4.2507E-02, 4.2431E-02, 4.2356E-02, 4.2280E-02, 4.2204E-02,
     &   4.2129E-02, 4.2053E-02, 4.1977E-02, 4.1901E-02, 4.1825E-02,
     &   4.1749E-02, 4.1673E-02, 4.1596E-02, 4.1520E-02, 4.1444E-02,
     &   4.1367E-02, 4.1290E-02, 4.1214E-02, 4.1137E-02, 4.1060E-02/
  
  
         DATA ((YGG  (I,J), I=   1, 100), J=2,2) /
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05/
  
         DATA ((YGG  (I,J), I= 101, 200), J=2,2) /
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3370E-05,
     &   5.3370E-05, 5.3370E-05, 5.3370E-05, 5.3369E-05, 5.3369E-05,
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05,
     &   5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05, 5.3369E-05/
  
  
         DATA ((YGG  (I,J), I=   1, 100), J=3,3) /
     &   9.4527E-05, 9.4526E-05, 9.4525E-05, 9.4525E-05, 9.4524E-05,
     &   9.4524E-05, 9.4523E-05, 9.4523E-05, 9.4522E-05, 9.4522E-05,
     &   9.4521E-05, 9.4520E-05, 9.4520E-05, 9.4519E-05, 9.4519E-05,
     &   9.4518E-05, 9.4518E-05, 9.4517E-05, 9.4517E-05, 9.4516E-05,
     &   9.4515E-05, 9.4515E-05, 9.4514E-05, 9.4514E-05, 9.4513E-05,
     &   9.4513E-05, 9.4512E-05, 9.4512E-05, 9.4511E-05, 9.4510E-05,
     &   9.4510E-05, 9.4509E-05, 9.4509E-05, 9.4508E-05, 9.4508E-05,
     &   9.4507E-05, 9.4506E-05, 9.4506E-05, 9.4505E-05, 9.4505E-05,
     &   9.4504E-05, 9.4504E-05, 9.4503E-05, 9.4502E-05, 9.4502E-05,
     &   9.4501E-05, 9.4501E-05, 9.4500E-05, 9.4500E-05, 9.4499E-05,
     &   9.4498E-05, 9.4498E-05, 9.4497E-05, 9.4497E-05, 9.4496E-05,
     &   9.4496E-05, 9.4495E-05, 9.4494E-05, 9.4494E-05, 9.4493E-05,
     &   9.4493E-05, 9.4492E-05, 9.4491E-05, 9.4491E-05, 9.4490E-05,
     &   9.4490E-05, 9.4489E-05, 9.4489E-05, 9.4488E-05, 9.4487E-05,
     &   9.4487E-05, 9.4486E-05, 9.4486E-05, 9.4485E-05, 9.4484E-05,
     &   9.4484E-05, 9.4483E-05, 9.4483E-05, 9.4482E-05, 9.4482E-05,
     &   9.4481E-05, 9.4480E-05, 9.4480E-05, 9.4479E-05, 9.4479E-05,
     &   9.4478E-05, 9.4477E-05, 9.4477E-05, 9.4476E-05, 9.4476E-05,
     &   9.4475E-05, 9.4474E-05, 9.4474E-05, 9.4473E-05, 9.4473E-05,
     &   9.4472E-05, 9.4471E-05, 9.4471E-05, 9.4470E-05, 9.4470E-05/
  
         DATA ((YGG  (I,J), I= 101, 200), J=3,3) /
     &   9.4469E-05, 9.4469E-05, 9.4468E-05, 9.4467E-05, 9.4467E-05,
     &   9.4466E-05, 9.4466E-05, 9.4465E-05, 9.4464E-05, 9.4464E-05,
     &   9.4463E-05, 9.4463E-05, 9.4462E-05, 9.4461E-05, 9.4461E-05,
     &   9.4460E-05, 9.4460E-05, 9.4459E-05, 9.4458E-05, 9.4458E-05,
     &   9.4457E-05, 9.4457E-05, 9.4456E-05, 9.4455E-05, 9.4455E-05,
     &   9.4454E-05, 9.4454E-05, 9.4453E-05, 9.4452E-05, 9.4452E-05,
     &   9.4451E-05, 9.4451E-05, 9.4450E-05, 9.4449E-05, 9.4449E-05,
     &   9.4448E-05, 9.4448E-05, 9.4447E-05, 9.4446E-05, 9.4446E-05,
     &   9.4445E-05, 9.4444E-05, 9.4444E-05, 9.4443E-05, 9.4443E-05,
     &   9.4442E-05, 9.4441E-05, 9.4441E-05, 9.4440E-05, 9.4440E-05,
     &   9.4439E-05, 9.4438E-05, 9.4438E-05, 9.4437E-05, 9.4436E-05,
     &   9.4436E-05, 9.4435E-05, 9.4435E-05, 9.4434E-05, 9.4433E-05,
     &   9.4433E-05, 9.4432E-05, 9.4431E-05, 9.4431E-05, 9.4430E-05,
     &   9.4430E-05, 9.4429E-05, 9.4428E-05, 9.4428E-05, 9.4427E-05,
     &   9.4426E-05, 9.4426E-05, 9.4425E-05, 9.4424E-05, 9.4424E-05,
     &   9.4423E-05, 9.4422E-05, 9.4422E-05, 9.4421E-05, 9.4420E-05,
     &   9.4420E-05, 9.4419E-05, 9.4418E-05, 9.4418E-05, 9.4417E-05,
     &   9.4416E-05, 9.4416E-05, 9.4415E-05, 9.4414E-05, 9.4414E-05,
     &   9.4413E-05, 9.4412E-05, 9.4412E-05, 9.4411E-05, 9.4410E-05,
     &   9.4410E-05, 9.4409E-05, 9.4408E-05, 9.4407E-05, 9.4407E-05/
  
c      ++++ deghadthigh19 ++++  

c update jun 2019 
c  
c******************************************************************************
c*                                                                            *
c*    --- intRdat1 ---                              Fri Jun 14 13:14:28 2019  *
c*                                                                            *
c***************************# FJ@HU Berlin #***********************************
c  
c  "Delta alpha"               Update version (12/06/2019) 
c  
c ISCAN: -2, Ismooth: 0, IGS: 0, DSET: WAVE, iplot: 0 itestflavorspl: 0
c IKE,Emin,Emax,NP,N,EPSREL:  1,-2.0000E+04,-1.0000E+03, 100, 10, 1.00E-02, 
c ALS(sta)(sys):  0.1184( 0.0007)( 0.0000), MZINP:   91.1876, MTOP:    173.20
c NF,IOR,ICHK: 5,4,2,ISU2: 2,NFL: 5,INAG: 1,inotail:  0, sin2W:   0.23153
c CHPTCUT,EC,ECUT: 0.3180,     5.20,    11.50
c  
  
         DATA ((YGG  (I,J), I=   1, 100), J=1,1) /
     &   1.1589E-01, 1.1571E-01, 1.1553E-01, 1.1535E-01, 1.1517E-01,
     &   1.1499E-01, 1.1482E-01, 1.1464E-01, 1.1446E-01, 1.1428E-01,
     &   1.1410E-01, 1.1393E-01, 1.1375E-01, 1.1357E-01, 1.1339E-01,
     &   1.1322E-01, 1.1304E-01, 1.1286E-01, 1.1268E-01, 1.1251E-01,
     &   1.1233E-01, 1.1215E-01, 1.1197E-01, 1.1180E-01, 1.1162E-01,
     &   1.1144E-01, 1.1127E-01, 1.1109E-01, 1.1091E-01, 1.1074E-01,
     &   1.1056E-01, 1.1038E-01, 1.1021E-01, 1.1003E-01, 1.0985E-01,
     &   1.0968E-01, 1.0950E-01, 1.0932E-01, 1.0915E-01, 1.0897E-01,
     &   1.0880E-01, 1.0862E-01, 1.0845E-01, 1.0827E-01, 1.0810E-01,
     &   1.0792E-01, 1.0774E-01, 1.0757E-01, 1.0740E-01, 1.0722E-01,
     &   1.0705E-01, 1.0687E-01, 1.0670E-01, 1.0652E-01, 1.0635E-01,
     &   1.0617E-01, 1.0600E-01, 1.0583E-01, 1.0565E-01, 1.0548E-01,
     &   1.0531E-01, 1.0513E-01, 1.0496E-01, 1.0479E-01, 1.0461E-01,
     &   1.0444E-01, 1.0427E-01, 1.0410E-01, 1.0392E-01, 1.0375E-01,
     &   1.0358E-01, 1.0341E-01, 1.0324E-01, 1.0306E-01, 1.0289E-01,
     &   1.0272E-01, 1.0255E-01, 1.0238E-01, 1.0221E-01, 1.0204E-01,
     &   1.0187E-01, 1.0170E-01, 1.0153E-01, 1.0136E-01, 1.0119E-01,
     &   1.0102E-01, 1.0085E-01, 1.0068E-01, 1.0051E-01, 1.0034E-01,
     &   1.0018E-01, 1.0001E-01, 9.9839E-02, 9.9671E-02, 9.9504E-02,
     &   9.9336E-02, 9.9169E-02, 9.9002E-02, 9.8836E-02, 9.8669E-02/
  
         DATA ((YGG  (I,J), I= 101, 200), J=1,1) /
     &   9.8503E-02, 9.8337E-02, 9.8171E-02, 9.8005E-02, 9.7840E-02,
     &   9.7675E-02, 9.7510E-02, 9.7345E-02, 9.7180E-02, 9.7016E-02,
     &   9.6852E-02, 9.6688E-02, 9.6525E-02, 9.6361E-02, 9.6198E-02,
     &   9.6035E-02, 9.5872E-02, 9.5710E-02, 9.5548E-02, 9.5386E-02,
     &   9.5224E-02, 9.5062E-02, 9.4901E-02, 9.4740E-02, 9.4579E-02,
     &   9.4418E-02, 9.4258E-02, 9.4097E-02, 9.3937E-02, 9.3778E-02,
     &   9.3618E-02, 9.3459E-02, 9.3299E-02, 9.3140E-02, 9.2982E-02,
     &   9.2823E-02, 9.2665E-02, 9.2506E-02, 9.2348E-02, 9.2190E-02,
     &   9.2033E-02, 9.1875E-02, 9.1718E-02, 9.1561E-02, 9.1404E-02,
     &   9.1247E-02, 9.1091E-02, 9.0934E-02, 9.0778E-02, 9.0621E-02,
     &   9.0465E-02, 9.0309E-02, 9.0154E-02, 8.9998E-02, 8.9842E-02,
     &   8.9687E-02, 8.9531E-02, 8.9376E-02, 8.9221E-02, 8.9065E-02,
     &   8.8910E-02, 8.8755E-02, 8.8600E-02, 8.8445E-02, 8.8290E-02,
     &   8.8135E-02, 8.7980E-02, 8.7826E-02, 8.7671E-02, 8.7516E-02,
     &   8.7361E-02, 8.7206E-02, 8.7051E-02, 8.6896E-02, 8.6741E-02,
     &   8.6586E-02, 8.6431E-02, 8.6276E-02, 8.6120E-02, 8.5965E-02,
     &   8.5809E-02, 8.5654E-02, 8.5498E-02, 8.5342E-02, 8.5186E-02,
     &   8.5030E-02, 8.4874E-02, 8.4718E-02, 8.4561E-02, 8.4405E-02,
     &   8.4248E-02, 8.4091E-02, 8.3933E-02, 8.3776E-02, 8.3618E-02,
     &   8.3460E-02, 8.3302E-02, 8.3144E-02, 8.2986E-02, 8.2827E-02/
  
  
         DATA ((YGG  (I,J), I=   1, 100), J=2,2) /
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05/
  
         DATA ((YGG  (I,J), I= 101, 200), J=2,2) /
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05,
     &   9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1137E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05, 9.1136E-05,
     &   9.1136E-05, 9.1136E-05, 9.1135E-05, 9.1135E-05, 9.1135E-05/
  
  
         DATA ((YGG  (I,J), I=   1, 100), J=3,3) /
     &   1.4155E-04, 1.4155E-04, 1.4155E-04, 1.4155E-04, 1.4154E-04,
     &   1.4154E-04, 1.4154E-04, 1.4154E-04, 1.4154E-04, 1.4154E-04,
     &   1.4153E-04, 1.4153E-04, 1.4153E-04, 1.4153E-04, 1.4153E-04,
     &   1.4152E-04, 1.4152E-04, 1.4152E-04, 1.4152E-04, 1.4152E-04,
     &   1.4152E-04, 1.4151E-04, 1.4151E-04, 1.4151E-04, 1.4151E-04,
     &   1.4151E-04, 1.4151E-04, 1.4150E-04, 1.4150E-04, 1.4150E-04,
     &   1.4150E-04, 1.4150E-04, 1.4150E-04, 1.4149E-04, 1.4149E-04,
     &   1.4149E-04, 1.4149E-04, 1.4149E-04, 1.4148E-04, 1.4148E-04,
     &   1.4148E-04, 1.4148E-04, 1.4148E-04, 1.4148E-04, 1.4147E-04,
     &   1.4147E-04, 1.4147E-04, 1.4147E-04, 1.4147E-04, 1.4147E-04,
     &   1.4146E-04, 1.4146E-04, 1.4146E-04, 1.4146E-04, 1.4146E-04,
     &   1.4145E-04, 1.4145E-04, 1.4145E-04, 1.4145E-04, 1.4145E-04,
     &   1.4145E-04, 1.4144E-04, 1.4144E-04, 1.4144E-04, 1.4144E-04,
     &   1.4144E-04, 1.4143E-04, 1.4143E-04, 1.4143E-04, 1.4143E-04,
     &   1.4143E-04, 1.4143E-04, 1.4142E-04, 1.4142E-04, 1.4142E-04,
     &   1.4142E-04, 1.4142E-04, 1.4141E-04, 1.4141E-04, 1.4141E-04,
     &   1.4141E-04, 1.4141E-04, 1.4141E-04, 1.4140E-04, 1.4140E-04,
     &   1.4140E-04, 1.4140E-04, 1.4140E-04, 1.4139E-04, 1.4139E-04,
     &   1.4139E-04, 1.4139E-04, 1.4139E-04, 1.4138E-04, 1.4138E-04,
     &   1.4138E-04, 1.4138E-04, 1.4138E-04, 1.4138E-04, 1.4137E-04/
  
         DATA ((YGG  (I,J), I= 101, 200), J=3,3) /
     &   1.4137E-04, 1.4137E-04, 1.4137E-04, 1.4137E-04, 1.4136E-04,
     &   1.4136E-04, 1.4136E-04, 1.4136E-04, 1.4136E-04, 1.4136E-04,
     &   1.4135E-04, 1.4135E-04, 1.4135E-04, 1.4135E-04, 1.4135E-04,
     &   1.4134E-04, 1.4134E-04, 1.4134E-04, 1.4134E-04, 1.4134E-04,
     &   1.4133E-04, 1.4133E-04, 1.4133E-04, 1.4133E-04, 1.4133E-04,
     &   1.4133E-04, 1.4132E-04, 1.4132E-04, 1.4132E-04, 1.4132E-04,
     &   1.4132E-04, 1.4131E-04, 1.4131E-04, 1.4131E-04, 1.4131E-04,
     &   1.4131E-04, 1.4130E-04, 1.4130E-04, 1.4130E-04, 1.4130E-04,
     &   1.4130E-04, 1.4129E-04, 1.4129E-04, 1.4129E-04, 1.4129E-04,
     &   1.4129E-04, 1.4129E-04, 1.4128E-04, 1.4128E-04, 1.4128E-04,
     &   1.4128E-04, 1.4128E-04, 1.4127E-04, 1.4127E-04, 1.4127E-04,
     &   1.4127E-04, 1.4127E-04, 1.4126E-04, 1.4126E-04, 1.4126E-04,
     &   1.4126E-04, 1.4126E-04, 1.4125E-04, 1.4125E-04, 1.4125E-04,
     &   1.4125E-04, 1.4125E-04, 1.4124E-04, 1.4124E-04, 1.4124E-04,
     &   1.4124E-04, 1.4124E-04, 1.4123E-04, 1.4123E-04, 1.4123E-04,
     &   1.4123E-04, 1.4123E-04, 1.4122E-04, 1.4122E-04, 1.4122E-04,
     &   1.4122E-04, 1.4122E-04, 1.4121E-04, 1.4121E-04, 1.4121E-04,
     &   1.4121E-04, 1.4120E-04, 1.4120E-04, 1.4120E-04, 1.4120E-04,
     &   1.4120E-04, 1.4119E-04, 1.4119E-04, 1.4119E-04, 1.4119E-04,
     &   1.4118E-04, 1.4118E-04, 1.4118E-04, 1.4118E-04, 1.4118E-04/
    
      save
      RETURN
      END
