c;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -*- Mode: Fortran -*- ;;;;;;;;;;;;;;;;;;;;;;;;;;; c;; hadr5x26.f --- c;; Author : Friedrich Jegerlehner c;; Created On : Thu Jul 6 12:20:17 2017 c;; Last Modified By: Fred Jegerlehner c;; Last Modified On: Sun Jun 14 12:09:39 2026 c;; RCS: $Id$ c;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; c;; Copyright (C) 2023 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: 23/12/2019 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 IMPLICIT NONE INTEGER NA,NB,NC,IJ,I,ini PARAMETER(NA=979,NB=2180,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 /DATM26x/EMA,DAM,DGM COMMON /DATT26x/ETA,DAT,DGT COMMON /DATS26x/ESA,DAS,DGS COMMON /DATH26x/XXX,YGG,Y3G data ini/0/ C initialize data call dalhad_spacelike26x call dalhad_spacelike1h26x call dalhad_timelike26x call dalhad_timelike1h26x c boundaries of data sets c space-like high region -2.0000E+04 - -1.0000E+03 (XXX,YGG) [200] c space-like and unphysical region -1.0000E+03 - 0.27599999D0 (ETA,DAT) [979] c time-like R data range 0.28207018D0 - 38.29000000D0 (ESA,DAS) [2180] c time-like1 pQCD range 1.3005E+01 - 2.0000E+04 (EMA,DAM) [200] c 2 pion threshold at 0.27914.... c XXX(1) --- XXX(NC),ETA(1) --- ETA(NA),ESA(1) --- ESA(NB),EMA(1) --- EMA(NC) if (st2.eq.0.0) then fac=1.0 else fac=0.23153d0/st2 endif 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 c### end point else if (e.eq.EMA(NC)) then ij=NC DO I=1,3 dal(i)=DAM(IJ,I) dg2(i)=DGM(IJ,I) ENDDO der=dal(1) errdersta=dal(2) errdersys=dal(3) deg=dg2(1)*fac errdegsta=dg2(2)*fac errdegsys=dg2(3)*fac return c ## 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 hadr5x to double precision variables in dhadr5x 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 ++++ dalhadt26 ++++ c update 05/28/26 subroutine dalhad_spacelike26x IMPLICIT NONE INTEGER NA,I,J PARAMETER(NA=979) REAL ETA(NA),DAT(NA,3),DGT(NA,3) COMMON /DATT26x/ETA,DAT,DGT c****************************************************************************** c* * c* --- intRdatx --- Thu May 28 14:55:30 2026 * c* * c***************************# FJ@HU Berlin #*********************************** c "Delta alpha" Update version (24/02/2026) c ISCAN: -1, Ismooth: 0, IGS: 0, DSET: EPM2, 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.1880, MTOP: 172.40 c NF,IOR,ICHK: 5,4,2,ISU2: 0,NFL: 5,INAG: 1,inotail: 0, sin2W_ref: 0.23153 c CHPTCUT,EC,ECUT: 0.3180, 5.20, 11.50, sin2W_eff: 0.23153, s2W_ref/eff: 1.000 c iintRd,IUNMIX,iomegaphidat,iresonances,IRESON:1, 1, 3, 1, 1 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.1100E-02, 4.1049E-02, 4.0997E-02, 4.0944E-02, 4.0891E-02, & 4.0837E-02, 4.0783E-02, 4.0727E-02, 4.0672E-02, 4.0615E-02, & 4.0558E-02, 4.0500E-02, 4.0442E-02, 4.0382E-02, 4.0322E-02, & 4.0261E-02, 4.0200E-02, 4.0137E-02, 4.0074E-02, 4.0010E-02, & 3.9944E-02, 3.9878E-02, 3.9811E-02, 3.9744E-02, 3.9675E-02, & 3.9605E-02, 3.9534E-02, 3.9462E-02, 3.9388E-02, 3.9314E-02, & 3.9239E-02, 3.9162E-02, 3.9084E-02, 3.9005E-02, 3.8924E-02, & 3.8842E-02, 3.8759E-02, 3.8674E-02, 3.8587E-02, 3.8500E-02, & 3.8410E-02, 3.8319E-02, 3.8226E-02, 3.8131E-02, 3.8035E-02, & 3.7936E-02, 3.7836E-02, 3.7733E-02, 3.7628E-02, 3.7521E-02, & 3.7412E-02, 3.7300E-02, 3.7186E-02, 3.7069E-02, 3.6950E-02, & 3.6827E-02, 3.6702E-02, 3.6573E-02, 3.6441E-02, 3.6306E-02, & 3.6167E-02, 3.6025E-02, 3.5878E-02, 3.5727E-02, 3.5572E-02, & 3.5412E-02, 3.5247E-02, 3.5077E-02, 3.4902E-02, 3.4721E-02, & 3.4533E-02, 3.4339E-02, 3.4137E-02, 3.3928E-02, 3.3711E-02, & 3.3484E-02, 3.3249E-02, 3.3002E-02, 3.2745E-02, 3.2475E-02, & 3.2191E-02, 3.1893E-02, 3.1578E-02, 3.1245E-02, 3.0891E-02, & 3.0514E-02, 3.0110E-02, 2.9675E-02, 2.9206E-02, 2.8695E-02, & 2.8135E-02, 2.8076E-02, 2.8016E-02, 2.7956E-02, 2.7895E-02, & 2.7833E-02, 2.7771E-02, 2.7708E-02, 2.7644E-02, 2.7580E-02/ DATA ((DAT (I,J), I= 101, 200), J=1,1) / & 2.7515E-02, 2.7449E-02, 2.7383E-02, 2.7315E-02, 2.7247E-02, & 2.7178E-02, 2.7109E-02, 2.7038E-02, 2.6967E-02, 2.6894E-02, & 2.6821E-02, 2.6747E-02, 2.6672E-02, 2.6596E-02, 2.6519E-02, & 2.6441E-02, 2.6362E-02, 2.6281E-02, 2.6200E-02, 2.6118E-02, & 2.6034E-02, 2.5949E-02, 2.5863E-02, 2.5776E-02, 2.5687E-02, & 2.5597E-02, 2.5505E-02, 2.5412E-02, 2.5318E-02, 2.5222E-02, & 2.5125E-02, 2.5025E-02, 2.4924E-02, 2.4822E-02, 2.4717E-02, & 2.4611E-02, 2.4503E-02, 2.4392E-02, 2.4280E-02, 2.4165E-02, & 2.4048E-02, 2.3929E-02, 2.3807E-02, 2.3683E-02, 2.3556E-02, & 2.3426E-02, 2.3293E-02, 2.3158E-02, 2.3019E-02, 2.2876E-02, & 2.2731E-02, 2.2581E-02, 2.2428E-02, 2.2270E-02, 2.2109E-02, & 2.1943E-02, 2.1771E-02, 2.1595E-02, 2.1414E-02, 2.1227E-02, & 2.1033E-02, 2.0834E-02, 2.0627E-02, 2.0413E-02, 2.0191E-02, & 1.9960E-02, 1.9720E-02, 1.9470E-02, 1.9209E-02, 1.8937E-02, & 1.8651E-02, 1.8351E-02, 1.8036E-02, 1.7703E-02, 1.7350E-02, & 1.6976E-02, 1.6577E-02, 1.6150E-02, 1.5691E-02, 1.5195E-02, & 1.4654E-02, 1.4603E-02, 1.4552E-02, 1.4500E-02, 1.4447E-02, & 1.4394E-02, 1.4341E-02, 1.4287E-02, 1.4233E-02, 1.4178E-02, & 1.4123E-02, 1.4067E-02, 1.4011E-02, 1.3954E-02, 1.3897E-02, & 1.3839E-02, 1.3781E-02, 1.3722E-02, 1.3662E-02, 1.3602E-02/ DATA ((DAT (I,J), I= 201, 300), J=1,1) / & 1.3541E-02, 1.3480E-02, 1.3418E-02, 1.3355E-02, 1.3292E-02, & 1.3228E-02, 1.3164E-02, 1.3099E-02, 1.3033E-02, 1.2966E-02, & 1.2899E-02, 1.2830E-02, 1.2761E-02, 1.2692E-02, 1.2621E-02, & 1.2550E-02, 1.2478E-02, 1.2405E-02, 1.2331E-02, 1.2256E-02, & 1.2180E-02, 1.2104E-02, 1.2026E-02, 1.1948E-02, 1.1868E-02, & 1.1787E-02, 1.1706E-02, 1.1623E-02, 1.1539E-02, 1.1454E-02, & 1.1367E-02, 1.1280E-02, 1.1191E-02, 1.1101E-02, 1.1010E-02, & 1.0917E-02, 1.0823E-02, 1.0727E-02, 1.0630E-02, 1.0531E-02, & 1.0431E-02, 1.0329E-02, 1.0225E-02, 1.0120E-02, 1.0013E-02, & 9.9038E-03, 9.7928E-03, 9.6798E-03, 9.5647E-03, 9.4474E-03, & 9.3279E-03, 9.2061E-03, 9.0818E-03, 8.9550E-03, 8.8256E-03, & 8.6934E-03, 8.5584E-03, 8.4203E-03, 8.2791E-03, 8.1346E-03, & 7.9866E-03, 7.8349E-03, 7.6794E-03, 7.5198E-03, 7.3558E-03, & 7.1871E-03, 7.0135E-03, 6.8346E-03, 6.6500E-03, 6.4593E-03, & 6.2618E-03, 6.0570E-03, 5.8443E-03, 5.6229E-03, 5.3918E-03, & 5.1509E-03, 4.8972E-03, 4.6303E-03, 4.3487E-03, 4.0508E-03, & 3.7349E-03, 3.7023E-03, 3.6695E-03, 3.6364E-03, 3.6032E-03, & 3.5698E-03, 3.5361E-03, 3.5023E-03, 3.4682E-03, 3.4340E-03, & 3.3995E-03, 3.3649E-03, 3.3300E-03, 3.2949E-03, 3.2596E-03, & 3.2241E-03, 3.1884E-03, 3.1525E-03, 3.1163E-03, 3.0800E-03/ DATA ((DAT (I,J), I= 301, 400), J=1,1) / & 3.0434E-03, 3.0066E-03, 2.9696E-03, 2.9324E-03, 2.8950E-03, & 2.8574E-03, 2.8196E-03, 2.7815E-03, 2.7433E-03, 2.7048E-03, & 2.6661E-03, 2.6273E-03, 2.5882E-03, 2.5490E-03, 2.5095E-03, & 2.4699E-03, 2.4301E-03, 2.3901E-03, 2.3499E-03, 2.3095E-03, & 2.2690E-03, 2.2283E-03, 2.1874E-03, 2.1464E-03, 2.1053E-03, & 2.0640E-03, 2.0226E-03, 1.9811E-03, 1.9394E-03, 1.8977E-03, & 1.8559E-03, 1.8139E-03, 1.7720E-03, 1.7299E-03, 1.6878E-03, & 1.6457E-03, 1.6036E-03, 1.5614E-03, 1.5193E-03, 1.4772E-03, & 1.4351E-03, 1.3931E-03, 1.3513E-03, 1.3094E-03, 1.2678E-03, & 1.2262E-03, 1.1848E-03, 1.1436E-03, 1.1027E-03, 1.0619E-03, & 1.0214E-03, 9.8127E-04, 9.4141E-04, 9.0190E-04, 8.6276E-04, & 8.8256E-04, 7.8575E-04, 7.4794E-04, 7.1063E-04, 6.7387E-04, & 6.3767E-04, 6.0208E-04, 5.6714E-04, 5.3288E-04, 4.9935E-04, & 4.6656E-04, 4.3458E-04, 4.0342E-04, 3.7314E-04, 3.4378E-04, & 3.1536E-04, 2.8793E-04, 2.6153E-04, 2.3619E-04, 2.1196E-04, & 1.8887E-04, 1.6696E-04, 1.4626E-04, 1.2681E-04, 1.0864E-04, & 9.1780E-05, 9.0168E-05, 8.8569E-05, 8.6983E-05, 8.5411E-05, & 8.3853E-05, 8.2308E-05, 8.0777E-05, 7.9259E-05, 7.7755E-05, & 7.6265E-05, 7.4788E-05, 7.3325E-05, 7.1876E-05, 7.0441E-05, & 6.9019E-05, 6.7612E-05, 6.6218E-05, 6.4838E-05, 6.3472E-05/ DATA ((DAT (I,J), I= 401, 500), J=1,1) / & 6.2120E-05, 6.0782E-05, 5.9457E-05, 5.8147E-05, 5.6851E-05, & 5.5569E-05, 5.4301E-05, 5.3048E-05, 5.1808E-05, 5.0583E-05, & 4.9371E-05, 4.8174E-05, 4.6991E-05, 4.5823E-05, 4.4668E-05, & 4.3528E-05, 4.2403E-05, 4.1291E-05, 4.0194E-05, 3.9112E-05, & 3.8043E-05, 3.6990E-05, 3.5950E-05, 3.4925E-05, 3.3915E-05, & 3.2919E-05, 3.1938E-05, 3.0971E-05, 3.0018E-05, 2.9081E-05, & 2.8158E-05, 2.7249E-05, 2.6355E-05, 2.5476E-05, 2.4612E-05, & 2.3762E-05, 2.2927E-05, 2.2106E-05, 2.1300E-05, 2.0509E-05, & 1.9733E-05, 1.8972E-05, 1.8225E-05, 1.7493E-05, 1.6776E-05, & 1.6074E-05, 1.5387E-05, 1.4715E-05, 1.4057E-05, 1.3414E-05, & 1.2787E-05, 1.2174E-05, 1.1576E-05, 1.0993E-05, 1.0425E-05, & 9.8719E-06, 9.3338E-06, 8.8107E-06, 8.3027E-06, 7.8096E-06, & 7.3315E-06, 6.8685E-06, 6.4205E-06, 5.9875E-06, 5.5696E-06, & 5.1668E-06, 4.7790E-06, 4.4064E-06, 4.0488E-06, 3.7062E-06, & 3.3788E-06, 3.0665E-06, 2.7693E-06, 2.4873E-06, 2.2203E-06, & 1.9685E-06, 1.7318E-06, 1.5102E-06, 1.3038E-06, 1.1126E-06, & 9.3647E-07, 9.1970E-07, 9.0307E-07, 8.8660E-07, 8.7027E-07, & 8.5410E-07, 8.3808E-07, 8.2221E-07, 8.0650E-07, 7.9093E-07, & 7.7552E-07, 7.6026E-07, 7.4515E-07, 7.3019E-07, 7.1538E-07, & 7.0073E-07, 6.8623E-07, 6.7187E-07, 6.5767E-07, 6.4362E-07/ DATA ((DAT (I,J), I= 501, 600), J=1,1) / & 6.2973E-07, 6.1598E-07, 6.0239E-07, 5.8895E-07, 5.7565E-07, & 5.6252E-07, 5.4953E-07, 5.3669E-07, 5.2401E-07, 5.1148E-07, & 4.9909E-07, 4.8687E-07, 4.7479E-07, 4.6286E-07, 4.5109E-07, & 4.3946E-07, 4.2799E-07, 4.1667E-07, 4.0551E-07, 3.9449E-07, & 3.8363E-07, 3.7291E-07, 3.6235E-07, 3.5194E-07, 3.4169E-07, & 3.3158E-07, 3.2162E-07, 3.1182E-07, 3.0217E-07, 2.9267E-07, & 2.8332E-07, 2.7413E-07, 2.6508E-07, 2.5619E-07, 2.4745E-07, & 2.3886E-07, 2.3042E-07, 2.2214E-07, 2.1400E-07, 2.0602E-07, & 1.9819E-07, 1.9051E-07, 1.8298E-07, 1.7561E-07, 1.6838E-07, & 1.6131E-07, 1.5439E-07, 1.4762E-07, 1.4101E-07, 1.3454E-07, & 1.2823E-07, 1.2206E-07, 1.1605E-07, 1.1020E-07, 1.0449E-07, & 9.8933E-08, 9.3530E-08, 8.8278E-08, 8.3178E-08, 7.8230E-08, & 7.3434E-08, 6.8789E-08, 6.4296E-08, 5.9954E-08, 5.5765E-08, & 5.1727E-08, 4.7841E-08, 4.4106E-08, 4.0524E-08, 3.7093E-08, & 3.3813E-08, 3.0686E-08, 2.7710E-08, 2.4886E-08, 2.2214E-08, & 1.9693E-08, 1.7325E-08, 1.5107E-08, 1.3042E-08, 1.1129E-08, & 9.3667E-09, 9.1988E-09, 9.0325E-09, 8.8677E-09, 8.7044E-09, & 8.5426E-09, 8.3824E-09, 8.2236E-09, 8.0664E-09, 7.9107E-09, & 7.7565E-09, 7.6039E-09, 7.4527E-09, 7.3031E-09, 7.1550E-09, & 7.0084E-09, 6.8633E-09, 6.7197E-09, 6.5777E-09, 6.4372E-09/ DATA ((DAT (I,J), I= 601, 700), J=1,1) / & 6.2981E-09, 6.1606E-09, 6.0247E-09, 5.8902E-09, 5.7573E-09, & 5.6259E-09, 5.4959E-09, 5.3676E-09, 5.2407E-09, 5.1153E-09, & 4.9915E-09, 4.8692E-09, 4.7484E-09, 4.6291E-09, 4.5113E-09, & 4.3951E-09, 4.2803E-09, 4.1671E-09, 4.0554E-09, 3.9452E-09, & 3.8366E-09, 3.7294E-09, 3.6238E-09, 3.5197E-09, 3.4171E-09, & 3.3160E-09, 3.2165E-09, 3.1184E-09, 3.0219E-09, 2.9269E-09, & 2.8334E-09, 2.7414E-09, 2.6510E-09, 2.5621E-09, 2.4746E-09, & 2.3887E-09, 2.3043E-09, 2.2215E-09, 2.1401E-09, 2.0603E-09, & 1.9820E-09, 1.9052E-09, 1.8299E-09, 1.7561E-09, 1.6839E-09, & 1.6132E-09, 1.5440E-09, 1.4763E-09, 1.4101E-09, 1.3454E-09, & 1.2823E-09, 1.2207E-09, 1.1606E-09, 1.1020E-09, 1.0449E-09, & 9.8935E-10, 9.3532E-10, 8.8280E-10, 8.3180E-10, 7.8231E-10, & 7.3435E-10, 6.8790E-10, 6.4297E-10, 5.9955E-10, 5.5765E-10, & 5.1727E-10, 4.7841E-10, 4.4107E-10, 4.0524E-10, 3.7093E-10, & 3.3814E-10, 3.0686E-10, 2.7710E-10, 2.4886E-10, 2.2214E-10, & 1.9693E-10, 1.7325E-10, 1.5108E-10, 1.3042E-10, 1.1129E-10, & 9.3667E-11, 9.1988E-11, 9.0325E-11, 8.8677E-11, 8.7044E-11, & 8.5426E-11, 8.3824E-11, 8.2236E-11, 8.0664E-11, 7.9107E-11, & 7.7565E-11, 7.6039E-11, 7.4527E-11, 7.3031E-11, 7.1550E-11, & 7.0084E-11, 6.8633E-11, 6.7197E-11, 6.5777E-11, 6.4372E-11/ DATA ((DAT (I,J), I= 701, 800), J=1,1) / & 6.2981E-11, 6.1607E-11, 6.0247E-11, 5.8902E-11, 5.7573E-11, & 5.6259E-11, 5.4960E-11, 5.3676E-11, 5.2407E-11, 5.1153E-11, & 4.9915E-11, 4.8692E-11, 4.7484E-11, 4.6291E-11, 4.5113E-11, & 4.3951E-11, 4.2803E-11, 4.1671E-11, 4.0554E-11, 3.9453E-11, & 3.8366E-11, 3.7294E-11, 3.6238E-11, 3.5197E-11, 3.4171E-11, & 3.3160E-11, 3.2165E-11, 3.1184E-11, 3.0219E-11, 2.9269E-11, & 2.8334E-11, 2.7414E-11, 2.6510E-11, 2.5621E-11, 2.4746E-11, & 2.3887E-11, 2.3044E-11, 2.2215E-11, 2.1401E-11, 2.0603E-11, & 1.9820E-11, 1.9052E-11, 1.8299E-11, 1.7561E-11, 1.6839E-11, & 1.6132E-11, 1.5440E-11, 1.4763E-11, 1.4101E-11, 1.3454E-11, & 1.2823E-11, 1.2207E-11, 1.1606E-11, 1.1020E-11, 1.0449E-11, & 9.8935E-12, 9.3532E-12, 8.8280E-12, 8.3180E-12, 7.8231E-12, & 7.3435E-12, 6.8790E-12, 6.4297E-12, 5.9955E-12, 5.5765E-12, & 5.1727E-12, 4.7841E-12, 4.4107E-12, 4.0524E-12, 3.7093E-12, & 3.3814E-12, 3.0686E-12, 2.7710E-12, 2.4886E-12, 2.2214E-12, & 1.9693E-12, 1.7325E-12, 1.5108E-12, 1.3042E-12, 1.1129E-12, & 9.3667E-13, 9.1988E-13, 9.0325E-13, 8.8677E-13, 8.7044E-13, & 8.5426E-13, 8.3824E-13, 8.2236E-13, 8.0664E-13, 7.9107E-13, & 7.7565E-13, 7.6039E-13, 7.4527E-13, 7.3031E-13, 7.1550E-13, & 7.0084E-13, 6.8633E-13, 6.7197E-13, 6.5777E-13, 6.4372E-13/ DATA ((DAT (I,J), I= 801, 900), J=1,1) / & 6.2981E-13, 6.1607E-13, 6.0247E-13, 5.8902E-13, 5.7573E-13, & 5.6259E-13, 5.4960E-13, 5.3676E-13, 5.2407E-13, 5.1153E-13, & 4.9915E-13, 4.8692E-13, 4.7484E-13, 4.6291E-13, 4.5113E-13, & 4.3951E-13, 4.2803E-13, 4.1671E-13, 4.0554E-13, 3.9453E-13, & 3.8366E-13, 3.7294E-13, 3.6238E-13, 3.5197E-13, 3.4171E-13, & 3.3160E-13, 3.2165E-13, 3.1184E-13, 3.0219E-13, 2.9269E-13, & 2.8334E-13, 2.7414E-13, 2.6510E-13, 2.5621E-13, 2.4746E-13, & 2.3887E-13, 2.3044E-13, 2.2215E-13, 2.1401E-13, 2.0603E-13, & 1.9820E-13, 1.9052E-13, 1.8299E-13, 1.7561E-13, 1.6839E-13, & 1.6132E-13, 1.5440E-13, 1.4763E-13, 1.4101E-13, 1.3454E-13, & 1.2823E-13, 1.2207E-13, 1.1606E-13, 1.1020E-13, 1.0449E-13, & 9.8935E-14, 9.3532E-14, 8.8280E-14, 8.3180E-14, 7.8231E-14, & 7.3435E-14, 6.8790E-14, 6.4297E-14, 5.9955E-14, 5.5765E-14, & 5.1727E-14, 4.7841E-14, 4.4107E-14, 4.0524E-14, 3.7093E-14, & 3.3814E-14, 3.0686E-14, 2.7710E-14, 2.4886E-14, 2.2214E-14, & 1.9693E-14, 1.7325E-14, 1.5108E-14, 1.3042E-14, 1.1129E-14, & 9.3667E-15, 0.0000E+00,-9.3667E-15,-8.4358E-08,-3.3734E-07, & -7.5900E-07,-1.3492E-06,-2.1085E-06,-3.0368E-06,-4.1345E-06, & -5.4017E-06,-6.8387E-06,-8.4458E-06,-1.0223E-05,-1.2172E-05, & -1.4292E-05,-1.6584E-05,-1.9048E-05,-2.1685E-05,-2.4496E-05/ DATA ((DAT (I,J), I= 901, 979), J=1,1) / & -2.7481E-05,-3.0640E-05,-3.3976E-05,-3.7487E-05,-4.1176E-05, & -4.5044E-05,-4.9090E-05,-5.3316E-05,-5.7723E-05,-6.2312E-05, & -6.7085E-05,-7.2042E-05,-7.7184E-05,-8.2514E-05,-8.8032E-05, & -9.3739E-05,-9.9637E-05,-1.0573E-04,-1.1201E-04,-1.1849E-04, & -1.2517E-04,-1.3205E-04,-1.3913E-04,-1.4641E-04,-1.5390E-04, & -1.6160E-04,-1.6950E-04,-1.7762E-04,-1.8595E-04,-1.9449E-04, & -2.0326E-04,-2.1224E-04,-2.2146E-04,-2.3090E-04,-2.4056E-04, & -2.5047E-04,-2.6061E-04,-2.7099E-04,-2.8161E-04,-2.9248E-04, & -3.0360E-04,-3.1498E-04,-3.2662E-04,-3.3852E-04,-3.5069E-04, & -3.6314E-04,-3.7586E-04,-3.8887E-04,-4.0216E-04,-4.1575E-04, & -4.2965E-04,-4.4385E-04,-4.5837E-04,-4.7322E-04,-4.8839E-04, & -5.0391E-04,-5.1977E-04,-5.3600E-04,-5.5260E-04,-5.6958E-04, & -5.8695E-04,-6.0474E-04,-6.2295E-04,-6.4160E-04,-6.6071E-04, & -6.8031E-04,-7.0042E-04,-7.2106E-04,-7.4227E-04,-7.6409E-04, & -7.8658E-04,-8.0978E-04,-8.3379E-04,-8.4200E-04,-8.5874E-04, & -8.64718545E-04,-8.84859503E-04,-8.87551381E-04,-8.93901948E-04/ DATA ((DAT (I,J), I= 1, 100), J=2,2) / & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3213E-05, 1.3213E-05, 1.3213E-05, & 1.3213E-05, 1.3213E-05, 1.3213E-05, 1.3213E-05, 1.3213E-05, & 1.3213E-05, 1.3213E-05, 1.3213E-05, 1.3213E-05, 1.3213E-05, & 1.3213E-05, 1.3213E-05, 1.3213E-05, 1.3213E-05, 1.3213E-05, & 1.3213E-05, 1.3213E-05, 1.3213E-05, 1.3212E-05, 1.3212E-05, & 1.3212E-05, 1.3212E-05, 1.3212E-05, 1.3212E-05, 1.3212E-05, & 1.3212E-05, 1.3212E-05, 1.3211E-05, 1.3211E-05, 1.3211E-05, & 1.3211E-05, 1.3211E-05, 1.3210E-05, 1.3210E-05, 1.3210E-05, & 1.3209E-05, 1.3209E-05, 1.3208E-05, 1.3208E-05, 1.3207E-05, & 1.3206E-05, 1.3206E-05, 1.3205E-05, 1.3203E-05, 1.3202E-05, & 1.3200E-05, 1.3198E-05, 1.3196E-05, 1.3193E-05, 1.3188E-05, & 1.3183E-05, 1.3182E-05, 1.3182E-05, 1.3181E-05, 1.3180E-05, & 1.3180E-05, 1.3179E-05, 1.3178E-05, 1.3177E-05, 1.3177E-05/ DATA ((DAT (I,J), I= 101, 200), J=2,2) / & 1.3176E-05, 1.3175E-05, 1.3174E-05, 1.3173E-05, 1.3172E-05, & 1.3171E-05, 1.3170E-05, 1.3169E-05, 1.3168E-05, 1.3167E-05, & 1.3166E-05, 1.3164E-05, 1.3163E-05, 1.3162E-05, 1.3160E-05, & 1.3159E-05, 1.3157E-05, 1.3156E-05, 1.3154E-05, 1.3153E-05, & 1.3151E-05, 1.3149E-05, 1.3147E-05, 1.3145E-05, 1.3143E-05, & 1.3141E-05, 1.3138E-05, 1.3136E-05, 1.3134E-05, 1.3131E-05, & 1.3128E-05, 1.3125E-05, 1.3122E-05, 1.3119E-05, 1.3116E-05, & 1.3112E-05, 1.3108E-05, 1.3104E-05, 1.3100E-05, 1.3096E-05, & 1.3091E-05, 1.3086E-05, 1.3081E-05, 1.3075E-05, 1.3069E-05, & 1.3063E-05, 1.3056E-05, 1.3049E-05, 1.3041E-05, 1.3032E-05, & 1.3023E-05, 1.3014E-05, 1.3004E-05, 1.2992E-05, 1.2980E-05, & 1.2967E-05, 1.2953E-05, 1.2938E-05, 1.2921E-05, 1.2902E-05, & 1.2882E-05, 1.2860E-05, 1.2836E-05, 1.2809E-05, 1.2779E-05, & 1.2745E-05, 1.2708E-05, 1.2667E-05, 1.2620E-05, 1.2567E-05, & 1.2506E-05, 1.2437E-05, 1.2358E-05, 1.2267E-05, 1.2160E-05, & 1.2035E-05, 1.1888E-05, 1.1713E-05, 1.1502E-05, 1.1247E-05, & 1.0935E-05, 1.0904E-05, 1.0872E-05, 1.0839E-05, 1.0806E-05, & 1.0772E-05, 1.0738E-05, 1.0703E-05, 1.0667E-05, 1.0630E-05, & 1.0593E-05, 1.0555E-05, 1.0516E-05, 1.0476E-05, 1.0436E-05, & 1.0395E-05, 1.0353E-05, 1.0310E-05, 1.0266E-05, 1.0222E-05/ DATA ((DAT (I,J), I= 201, 300), J=2,2) / & 1.0176E-05, 1.0130E-05, 1.0082E-05, 1.0034E-05, 9.9846E-06, & 9.9343E-06, 9.8829E-06, 9.8305E-06, 9.7770E-06, 9.7224E-06, & 9.6667E-06, 9.6099E-06, 9.5518E-06, 9.4926E-06, 9.4322E-06, & 9.3706E-06, 9.3077E-06, 9.2435E-06, 9.1781E-06, 9.1113E-06, & 9.0431E-06, 8.9736E-06, 8.9027E-06, 8.8304E-06, 8.7566E-06, & 8.6814E-06, 8.6048E-06, 8.5266E-06, 8.4470E-06, 8.3658E-06, & 8.2831E-06, 8.1989E-06, 8.1131E-06, 8.0257E-06, 7.9367E-06, & 7.8462E-06, 7.7541E-06, 7.6604E-06, 7.5651E-06, 7.4682E-06, & 7.3698E-06, 7.2697E-06, 7.1682E-06, 7.0651E-06, 6.9604E-06, & 6.8543E-06, 6.7467E-06, 6.6376E-06, 6.5271E-06, 6.4153E-06, & 6.3021E-06, 6.1875E-06, 6.0717E-06, 5.9547E-06, 5.8365E-06, & 5.7172E-06, 5.5967E-06, 5.4753E-06, 5.3528E-06, 5.2293E-06, & 5.1050E-06, 4.9797E-06, 4.8536E-06, 4.7267E-06, 4.5990E-06, & 4.4704E-06, 4.3411E-06, 4.2110E-06, 4.0800E-06, 3.9482E-06, & 3.8154E-06, 3.6815E-06, 3.5464E-06, 3.4098E-06, 3.2715E-06, & 3.1311E-06, 2.9879E-06, 2.8412E-06, 2.6900E-06, 2.5330E-06, & 2.3683E-06, 2.3513E-06, 2.3343E-06, 2.3171E-06, 2.2998E-06, & 2.2825E-06, 2.2650E-06, 2.2474E-06, 2.2296E-06, 2.2118E-06, & 2.1938E-06, 2.1758E-06, 2.1575E-06, 2.1392E-06, 2.1207E-06, & 2.1021E-06, 2.0834E-06, 2.0645E-06, 2.0455E-06, 2.0263E-06/ DATA ((DAT (I,J), I= 301, 400), J=2,2) / & 2.0069E-06, 1.9875E-06, 1.9678E-06, 1.9480E-06, 1.9280E-06, & 1.9079E-06, 1.8876E-06, 1.8671E-06, 1.8465E-06, 1.8256E-06, & 1.8046E-06, 1.7834E-06, 1.7620E-06, 1.7405E-06, 1.7187E-06, & 1.6967E-06, 1.6746E-06, 1.6522E-06, 1.6297E-06, 1.6069E-06, & 1.5839E-06, 1.5608E-06, 1.5374E-06, 1.5138E-06, 1.4900E-06, & 1.4660E-06, 1.4417E-06, 1.4173E-06, 1.3927E-06, 1.3678E-06, & 1.3427E-06, 1.3174E-06, 1.2920E-06, 1.2663E-06, 1.2404E-06, & 1.2143E-06, 1.1880E-06, 1.1616E-06, 1.1349E-06, 1.1081E-06, & 1.0811E-06, 1.0539E-06, 1.0266E-06, 9.9917E-07, 9.7158E-07, & 9.4388E-07, 9.1606E-07, 8.8815E-07, 8.6016E-07, 8.3211E-07, & 8.0401E-07, 7.7588E-07, 7.4774E-07, 7.1962E-07, 6.9152E-07, & 6.6349E-07, 6.3554E-07, 6.0771E-07, 5.8001E-07, 5.5248E-07, & 5.2516E-07, 4.9806E-07, 4.7124E-07, 4.4472E-07, 4.1854E-07, & 3.9275E-07, 3.6737E-07, 3.4246E-07, 3.1806E-07, 2.9420E-07, & 2.7094E-07, 2.4833E-07, 2.2640E-07, 2.0521E-07, 1.8480E-07, & 1.6522E-07, 1.4653E-07, 1.2876E-07, 1.1196E-07, 9.6181E-08, & 8.1465E-08, 8.0054E-08, 7.8654E-08, 7.7264E-08, 7.5886E-08, & 7.4520E-08, 7.3164E-08, 7.1820E-08, 7.0487E-08, 6.9165E-08, & 6.7855E-08, 6.6557E-08, 6.5270E-08, 6.3994E-08, 6.2730E-08, & 6.1478E-08, 6.0237E-08, 5.9008E-08, 5.7790E-08, 5.6585E-08/ DATA ((DAT (I,J), I= 401, 500), J=2,2) / & 5.5391E-08, 5.4209E-08, 5.3039E-08, 5.1881E-08, 5.0735E-08, & 4.9601E-08, 4.8479E-08, 4.7369E-08, 4.6271E-08, 4.5185E-08, & 4.4111E-08, 4.3050E-08, 4.2000E-08, 4.0963E-08, 3.9939E-08, & 3.8926E-08, 3.7926E-08, 3.6939E-08, 3.5964E-08, 3.5001E-08, & 3.4051E-08, 3.3113E-08, 3.2188E-08, 3.1275E-08, 3.0375E-08, & 2.9488E-08, 2.8613E-08, 2.7751E-08, 2.6902E-08, 2.6066E-08, & 2.5242E-08, 2.4431E-08, 2.3633E-08, 2.2848E-08, 2.2075E-08, & 2.1316E-08, 2.0569E-08, 1.9836E-08, 1.9115E-08, 1.8408E-08, & 1.7713E-08, 1.7032E-08, 1.6364E-08, 1.5708E-08, 1.5066E-08, & 1.4437E-08, 1.3822E-08, 1.3219E-08, 1.2630E-08, 1.2053E-08, & 1.1491E-08, 1.0941E-08, 1.0405E-08, 9.8815E-09, 9.3717E-09, & 8.8754E-09, 8.3923E-09, 7.9227E-09, 7.4664E-09, 7.0235E-09, & 6.5941E-09, 6.1781E-09, 5.7756E-09, 5.3865E-09, 5.0109E-09, & 4.6487E-09, 4.3001E-09, 3.9650E-09, 3.6434E-09, 3.3354E-09, & 3.0409E-09, 2.7600E-09, 2.4926E-09, 2.2388E-09, 1.9986E-09, & 1.7720E-09, 1.5590E-09, 1.3596E-09, 1.1738E-09, 1.0017E-09, & 8.4314E-10, 8.2804E-10, 8.1307E-10, 7.9824E-10, 7.8355E-10, & 7.6899E-10, 7.5457E-10, 7.4029E-10, 7.2614E-10, 7.1213E-10, & 6.9825E-10, 6.8451E-10, 6.7091E-10, 6.5744E-10, 6.4411E-10, & 6.3092E-10, 6.1786E-10, 6.0494E-10, 5.9216E-10, 5.7951E-10/ DATA ((DAT (I,J), I= 501, 600), J=2,2) / & 5.6700E-10, 5.5462E-10, 5.4238E-10, 5.3028E-10, 5.1832E-10, & 5.0649E-10, 4.9479E-10, 4.8324E-10, 4.7182E-10, 4.6053E-10, & 4.4939E-10, 4.3838E-10, 4.2750E-10, 4.1677E-10, 4.0616E-10, & 3.9570E-10, 3.8537E-10, 3.7518E-10, 3.6513E-10, 3.5521E-10, & 3.4542E-10, 3.3578E-10, 3.2627E-10, 3.1690E-10, 3.0766E-10, & 2.9856E-10, 2.8960E-10, 2.8077E-10, 2.7208E-10, 2.6353E-10, & 2.5511E-10, 2.4683E-10, 2.3869E-10, 2.3068E-10, 2.2281E-10, & 2.1508E-10, 2.0748E-10, 2.0002E-10, 1.9270E-10, 1.8551E-10, & 1.7846E-10, 1.7155E-10, 1.6477E-10, 1.5813E-10, 1.5162E-10, & 1.4525E-10, 1.3902E-10, 1.3293E-10, 1.2697E-10, 1.2115E-10, & 1.1546E-10, 1.0991E-10, 1.0450E-10, 9.9226E-11, 9.4088E-11, & 8.9086E-11, 8.4220E-11, 7.9491E-11, 7.4899E-11, 7.0443E-11, & 6.6124E-11, 6.1942E-11, 5.7896E-11, 5.3987E-11, 5.0214E-11, & 4.6578E-11, 4.3079E-11, 3.9716E-11, 3.6490E-11, 3.3401E-11, & 3.0448E-11, 2.7632E-11, 2.4952E-11, 2.2409E-11, 2.0003E-11, & 1.7733E-11, 1.5600E-11, 1.3604E-11, 1.1744E-11, 1.0021E-11, & 8.4344E-12, 8.2833E-12, 8.1335E-12, 7.9851E-12, 7.8381E-12, & 7.6924E-12, 7.5481E-12, 7.4052E-12, 7.2636E-12, 7.1234E-12, & 6.9846E-12, 6.8471E-12, 6.7110E-12, 6.5762E-12, 6.4429E-12, & 6.3109E-12, 6.1802E-12, 6.0509E-12, 5.9230E-12, 5.7965E-12/ DATA ((DAT (I,J), I= 601, 700), J=2,2) / & 5.6713E-12, 5.5475E-12, 5.4251E-12, 5.3040E-12, 5.1843E-12, & 5.0659E-12, 4.9490E-12, 4.8334E-12, 4.7191E-12, 4.6062E-12, & 4.4947E-12, 4.3846E-12, 4.2758E-12, 4.1684E-12, 4.0623E-12, & 3.9577E-12, 3.8543E-12, 3.7524E-12, 3.6518E-12, 3.5526E-12, & 3.4548E-12, 3.3583E-12, 3.2632E-12, 3.1694E-12, 3.0770E-12, & 2.9860E-12, 2.8964E-12, 2.8081E-12, 2.7212E-12, 2.6356E-12, & 2.5514E-12, 2.4686E-12, 2.3872E-12, 2.3071E-12, 2.2283E-12, & 2.1510E-12, 2.0750E-12, 2.0004E-12, 1.9271E-12, 1.8553E-12, & 1.7847E-12, 1.7156E-12, 1.6478E-12, 1.5814E-12, 1.5163E-12, & 1.4526E-12, 1.3903E-12, 1.3293E-12, 1.2698E-12, 1.2115E-12, & 1.1547E-12, 1.0992E-12, 1.0451E-12, 9.9231E-13, 9.4091E-13, & 8.9089E-13, 8.4223E-13, 7.9494E-13, 7.4901E-13, 7.0445E-13, & 6.6126E-13, 6.1944E-13, 5.7898E-13, 5.3988E-13, 5.0215E-13, & 4.6579E-13, 4.3080E-13, 3.9717E-13, 3.6491E-13, 3.3401E-13, & 3.0448E-13, 2.7632E-13, 2.4953E-13, 2.2410E-13, 2.0003E-13, & 1.7733E-13, 1.5600E-13, 1.3604E-13, 1.1744E-13, 1.0021E-13, & 8.4345E-14, 8.2833E-14, 8.1336E-14, 7.9852E-14, 7.8381E-14, & 7.6924E-14, 7.5481E-14, 7.4052E-14, 7.2636E-14, 7.1234E-14, & 6.9846E-14, 6.8471E-14, 6.7110E-14, 6.5763E-14, 6.4429E-14, & 6.3109E-14, 6.1802E-14, 6.0510E-14, 5.9231E-14, 5.7965E-14/ DATA ((DAT (I,J), I= 701, 800), J=2,2) / & 5.6713E-14, 5.5475E-14, 5.4251E-14, 5.3040E-14, 5.1843E-14, & 5.0660E-14, 4.9490E-14, 4.8334E-14, 4.7191E-14, 4.6062E-14, & 4.4947E-14, 4.3846E-14, 4.2758E-14, 4.1684E-14, 4.0623E-14, & 3.9577E-14, 3.8543E-14, 3.7524E-14, 3.6518E-14, 3.5526E-14, & 3.4548E-14, 3.3583E-14, 3.2632E-14, 3.1694E-14, 3.0770E-14, & 2.9860E-14, 2.8964E-14, 2.8081E-14, 2.7212E-14, 2.6356E-14, & 2.5514E-14, 2.4686E-14, 2.3872E-14, 2.3071E-14, 2.2284E-14, & 2.1510E-14, 2.0750E-14, 2.0004E-14, 1.9271E-14, 1.8553E-14, & 1.7847E-14, 1.7156E-14, 1.6478E-14, 1.5814E-14, 1.5163E-14, & 1.4526E-14, 1.3903E-14, 1.3293E-14, 1.2698E-14, 1.2115E-14, & 1.1547E-14, 1.0992E-14, 1.0451E-14, 9.9231E-15, 9.4092E-15, & 8.9089E-15, 8.4223E-15, 7.9494E-15, 7.4901E-15, 7.0445E-15, & 6.6126E-15, 6.1944E-15, 5.7898E-15, 5.3988E-15, 5.0215E-15, & 4.6579E-15, 4.3080E-15, 3.9717E-15, 3.6491E-15, 3.3401E-15, & 3.0448E-15, 2.7632E-15, 2.4953E-15, 2.2410E-15, 2.0003E-15, & 1.7733E-15, 1.5600E-15, 1.3604E-15, 1.1744E-15, 1.0021E-15, & 8.4345E-16, 8.2833E-16, 8.1336E-16, 7.9852E-16, 7.8381E-16, & 7.6924E-16, 7.5481E-16, 7.4052E-16, 7.2636E-16, 7.1234E-16, & 6.9846E-16, 6.8471E-16, 6.7110E-16, 6.5763E-16, 6.4429E-16, & 6.3109E-16, 6.1802E-16, 6.0510E-16, 5.9231E-16, 5.7965E-16/ DATA ((DAT (I,J), I= 801, 900), J=2,2) / & 5.6713E-16, 5.5475E-16, 5.4251E-16, 5.3040E-16, 5.1843E-16, & 5.0660E-16, 4.9490E-16, 4.8334E-16, 4.7191E-16, 4.6062E-16, & 4.4947E-16, 4.3846E-16, 4.2758E-16, 4.1684E-16, 4.0623E-16, & 3.9577E-16, 3.8543E-16, 3.7524E-16, 3.6518E-16, 3.5526E-16, & 3.4548E-16, 3.3583E-16, 3.2632E-16, 3.1694E-16, 3.0770E-16, & 2.9860E-16, 2.8964E-16, 2.8081E-16, 2.7212E-16, 2.6356E-16, & 2.5514E-16, 2.4686E-16, 2.3872E-16, 2.3071E-16, 2.2284E-16, & 2.1510E-16, 2.0750E-16, 2.0004E-16, 1.9271E-16, 1.8553E-16, & 1.7847E-16, 1.7156E-16, 1.6478E-16, 1.5814E-16, 1.5163E-16, & 1.4526E-16, 1.3903E-16, 1.3293E-16, 1.2698E-16, 1.2115E-16, & 1.1547E-16, 1.0992E-16, 1.0451E-16, 9.9231E-17, 9.4092E-17, & 8.9089E-17, 8.4223E-17, 7.9494E-17, 7.4901E-17, 7.0445E-17, & 6.6126E-17, 6.1944E-17, 5.7898E-17, 5.3988E-17, 5.0215E-17, & 4.6579E-17, 4.3080E-17, 3.9717E-17, 3.6491E-17, 3.3401E-17, & 3.0448E-17, 2.7632E-17, 2.4953E-17, 2.2410E-17, 2.0003E-17, & 1.7733E-17, 1.5600E-17, 1.3604E-17, 1.1744E-17, 1.0021E-17, & 8.4345E-18, 0.0000E+00, 8.4345E-18, 7.5963E-11, 3.0378E-10, & 6.8354E-10, 1.2152E-09, 1.8993E-09, 2.7359E-09, 3.7255E-09, & 4.8683E-09, 6.1648E-09, 7.6156E-09, 9.2212E-09, 1.0982E-08, & 1.2899E-08, 1.4973E-08, 1.7205E-08, 1.9595E-08, 2.2145E-08/ DATA ((DAT (I,J), I= 901, 979), J=2,2) / & 2.4856E-08, 2.7728E-08, 3.0763E-08, 3.3962E-08, 3.7327E-08, & 4.0859E-08, 4.4559E-08, 4.8429E-08, 5.2470E-08, 5.6685E-08, & 6.1075E-08, 6.5642E-08, 7.0389E-08, 7.5316E-08, 8.0428E-08, & 8.5725E-08, 9.1210E-08, 9.6886E-08, 1.0276E-07, 1.0882E-07, & 1.1509E-07, 1.2156E-07, 1.2823E-07, 1.3512E-07, 1.4221E-07, & 1.4953E-07, 1.5706E-07, 1.6482E-07, 1.7281E-07, 1.8103E-07, & 1.8949E-07, 1.9819E-07, 2.0715E-07, 2.1635E-07, 2.2582E-07, & 2.3556E-07, 2.4556E-07, 2.5585E-07, 2.6643E-07, 2.7730E-07, & 2.8847E-07, 2.9996E-07, 3.1176E-07, 3.2390E-07, 3.3638E-07, & 3.4921E-07, 3.6241E-07, 3.7599E-07, 3.8995E-07, 4.0432E-07, & 4.1912E-07, 4.3435E-07, 4.5004E-07, 4.6620E-07, 4.8287E-07, & 5.0006E-07, 5.1779E-07, 5.3611E-07, 5.5504E-07, 5.7461E-07, & 5.9486E-07, 6.1584E-07, 6.3760E-07, 6.6020E-07, 6.8369E-07, & 7.0815E-07, 7.3366E-07, 7.6032E-07, 7.8826E-07, 8.1759E-07, & 8.4850E-07, 8.8117E-07, 9.1587E-07, 9.2794E-07, 9.5292E-07, & 9.61940932E-07, 9.92728474E-07, 9.96882837E-07, 1.00670956E-06/ DATA ((DAT (I,J), I= 1, 100), J=3,3) / & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3501E-04, 1.3501E-04, 1.3501E-04, 1.3501E-04, & 1.3501E-04, 1.3501E-04, 1.3501E-04, 1.3501E-04, 1.3501E-04, & 1.3501E-04, 1.3501E-04, 1.3501E-04, 1.3501E-04, 1.3501E-04, & 1.3501E-04, 1.3501E-04, 1.3501E-04, 1.3501E-04, 1.3500E-04, & 1.3500E-04, 1.3500E-04, 1.3500E-04, 1.3500E-04, 1.3500E-04, & 1.3500E-04, 1.3500E-04, 1.3500E-04, 1.3500E-04, 1.3500E-04, & 1.3500E-04, 1.3500E-04, 1.3499E-04, 1.3499E-04, 1.3499E-04, & 1.3499E-04, 1.3499E-04, 1.3499E-04, 1.3499E-04, 1.3499E-04, & 1.3499E-04, 1.3498E-04, 1.3498E-04, 1.3498E-04, 1.3498E-04, & 1.3498E-04, 1.3498E-04, 1.3498E-04, 1.3497E-04, 1.3497E-04, & 1.3497E-04, 1.3497E-04, 1.3497E-04, 1.3496E-04, 1.3496E-04, & 1.3496E-04, 1.3495E-04, 1.3495E-04, 1.3495E-04, 1.3494E-04, & 1.3494E-04, 1.3494E-04, 1.3493E-04, 1.3492E-04, 1.3492E-04, & 1.3491E-04, 1.3490E-04, 1.3490E-04, 1.3489E-04, 1.3487E-04, & 1.3486E-04, 1.3484E-04, 1.3482E-04, 1.3480E-04, 1.3477E-04, & 1.3473E-04, 1.3472E-04, 1.3472E-04, 1.3471E-04, 1.3471E-04, & 1.3470E-04, 1.3469E-04, 1.3469E-04, 1.3468E-04, 1.3468E-04/ DATA ((DAT (I,J), I= 101, 200), J=3,3) / & 1.3467E-04, 1.3467E-04, 1.3466E-04, 1.3465E-04, 1.3464E-04, & 1.3464E-04, 1.3463E-04, 1.3462E-04, 1.3461E-04, 1.3461E-04, & 1.3460E-04, 1.3459E-04, 1.3458E-04, 1.3457E-04, 1.3456E-04, & 1.3455E-04, 1.3454E-04, 1.3453E-04, 1.3452E-04, 1.3451E-04, & 1.3449E-04, 1.3448E-04, 1.3447E-04, 1.3445E-04, 1.3444E-04, & 1.3442E-04, 1.3441E-04, 1.3439E-04, 1.3437E-04, 1.3435E-04, & 1.3433E-04, 1.3431E-04, 1.3429E-04, 1.3427E-04, 1.3425E-04, & 1.3422E-04, 1.3420E-04, 1.3417E-04, 1.3414E-04, 1.3411E-04, & 1.3408E-04, 1.3404E-04, 1.3400E-04, 1.3397E-04, 1.3392E-04, & 1.3388E-04, 1.3383E-04, 1.3378E-04, 1.3373E-04, 1.3367E-04, & 1.3361E-04, 1.3355E-04, 1.3348E-04, 1.3340E-04, 1.3332E-04, & 1.3323E-04, 1.3313E-04, 1.3303E-04, 1.3291E-04, 1.3279E-04, & 1.3265E-04, 1.3251E-04, 1.3234E-04, 1.3216E-04, 1.3196E-04, & 1.3174E-04, 1.3149E-04, 1.3121E-04, 1.3090E-04, 1.3055E-04, & 1.3015E-04, 1.2969E-04, 1.2917E-04, 1.2856E-04, 1.2786E-04, & 1.2704E-04, 1.2607E-04, 1.2493E-04, 1.2354E-04, 1.2187E-04, & 1.1982E-04, 1.1961E-04, 1.1940E-04, 1.1918E-04, 1.1896E-04, & 1.1874E-04, 1.1851E-04, 1.1828E-04, 1.1804E-04, 1.1780E-04, & 1.1755E-04, 1.1730E-04, 1.1704E-04, 1.1678E-04, 1.1651E-04, & 1.1623E-04, 1.1595E-04, 1.1566E-04, 1.1537E-04, 1.1507E-04/ DATA ((DAT (I,J), I= 201, 300), J=3,3) / & 1.1477E-04, 1.1446E-04, 1.1414E-04, 1.1381E-04, 1.1348E-04, & 1.1314E-04, 1.1279E-04, 1.1244E-04, 1.1208E-04, 1.1170E-04, & 1.1133E-04, 1.1094E-04, 1.1054E-04, 1.1014E-04, 1.0972E-04, & 1.0930E-04, 1.0886E-04, 1.0842E-04, 1.0796E-04, 1.0750E-04, & 1.0702E-04, 1.0654E-04, 1.0604E-04, 1.0553E-04, 1.0501E-04, & 1.0448E-04, 1.0393E-04, 1.0337E-04, 1.0280E-04, 1.0221E-04, & 1.0161E-04, 1.0100E-04, 1.0037E-04, 9.9726E-05, 9.9066E-05, & 9.8391E-05, 9.7699E-05, 9.6990E-05, 9.6263E-05, 9.5519E-05, & 9.4756E-05, 9.3975E-05, 9.3173E-05, 9.2352E-05, 9.1509E-05, & 9.0645E-05, 8.9758E-05, 8.8847E-05, 8.7913E-05, 8.6953E-05, & 8.5966E-05, 8.4952E-05, 8.3909E-05, 8.2836E-05, 8.1731E-05, & 8.0591E-05, 7.9417E-05, 7.8204E-05, 7.6952E-05, 7.5656E-05, & 7.4316E-05, 7.2927E-05, 7.1486E-05, 6.9989E-05, 6.8434E-05, & 6.6815E-05, 6.5127E-05, 6.3367E-05, 6.1529E-05, 5.9609E-05, & 5.7599E-05, 5.5496E-05, 5.3293E-05, 5.0986E-05, 4.8570E-05, & 4.6040E-05, 4.3392E-05, 4.0624E-05, 3.7735E-05, 3.4722E-05, & 3.1590E-05, 3.1270E-05, 3.0949E-05, 3.0627E-05, 3.0304E-05, & 2.9980E-05, 2.9655E-05, 2.9328E-05, 2.9000E-05, 2.8672E-05, & 2.8342E-05, 2.8011E-05, 2.7679E-05, 2.7346E-05, 2.7012E-05, & 2.6677E-05, 2.6341E-05, 2.6004E-05, 2.5666E-05, 2.5327E-05/ DATA ((DAT (I,J), I= 301, 400), J=3,3) / & 2.4988E-05, 2.4647E-05, 2.4305E-05, 2.3963E-05, 2.3619E-05, & 2.3275E-05, 2.2930E-05, 2.2584E-05, 2.2238E-05, 2.1891E-05, & 2.1543E-05, 2.1194E-05, 2.0845E-05, 2.0496E-05, 2.0145E-05, & 1.9795E-05, 1.9444E-05, 1.9092E-05, 1.8740E-05, 1.8388E-05, & 1.8036E-05, 1.7683E-05, 1.7330E-05, 1.6978E-05, 1.6625E-05, & 1.6272E-05, 1.5919E-05, 1.5567E-05, 1.5215E-05, 1.4863E-05, & 1.4512E-05, 1.4161E-05, 1.3811E-05, 1.3461E-05, 1.3112E-05, & 1.2765E-05, 1.2418E-05, 1.2072E-05, 1.1728E-05, 1.1385E-05, & 1.1044E-05, 1.0704E-05, 1.0366E-05, 1.0030E-05, 9.6961E-06, & 9.3643E-06, 9.0349E-06, 8.7080E-06, 8.3838E-06, 8.0625E-06, & 7.7442E-06, 7.4292E-06, 7.1176E-06, 6.8096E-06, 6.5054E-06, & 6.2052E-06, 5.9093E-06, 5.6178E-06, 5.3309E-06, 5.0489E-06, & 4.7720E-06, 4.5005E-06, 4.2345E-06, 3.9743E-06, 3.7202E-06, & 3.4723E-06, 3.2310E-06, 2.9964E-06, 2.7689E-06, 2.5486E-06, & 2.3359E-06, 2.1309E-06, 1.9340E-06, 1.7453E-06, 1.5651E-06, & 1.3936E-06, 1.2311E-06, 1.0778E-06, 9.3397E-07, 7.9972E-07, & 6.7529E-07, 6.6340E-07, 6.5160E-07, 6.3991E-07, 6.2831E-07, & 6.1682E-07, 6.0543E-07, 5.9414E-07, 5.8295E-07, 5.7187E-07, & 5.6088E-07, 5.5000E-07, 5.3922E-07, 5.2854E-07, 5.1796E-07, & 5.0749E-07, 4.9712E-07, 4.8685E-07, 4.7668E-07, 4.6662E-07/ DATA ((DAT (I,J), I= 401, 500), J=3,3) / & 4.5667E-07, 4.4681E-07, 4.3706E-07, 4.2741E-07, 4.1787E-07, & 4.0843E-07, 3.9910E-07, 3.8987E-07, 3.8075E-07, 3.7173E-07, & 3.6281E-07, 3.5400E-07, 3.4530E-07, 3.3670E-07, 3.2821E-07, & 3.1982E-07, 3.1154E-07, 3.0337E-07, 2.9530E-07, 2.8733E-07, & 2.7948E-07, 2.7173E-07, 2.6409E-07, 2.5655E-07, 2.4912E-07, & 2.4180E-07, 2.3458E-07, 2.2747E-07, 2.2047E-07, 2.1358E-07, & 2.0680E-07, 2.0012E-07, 1.9355E-07, 1.8709E-07, 1.8073E-07, & 1.7449E-07, 1.6835E-07, 1.6232E-07, 1.5640E-07, 1.5059E-07, & 1.4489E-07, 1.3930E-07, 1.3381E-07, 1.2844E-07, 1.2317E-07, & 1.1801E-07, 1.1296E-07, 1.0803E-07, 1.0320E-07, 9.8477E-08, & 9.3867E-08, 8.9367E-08, 8.4976E-08, 8.0695E-08, 7.6524E-08, & 7.2464E-08, 6.8513E-08, 6.4673E-08, 6.0942E-08, 5.7322E-08, & 5.3813E-08, 5.0413E-08, 4.7125E-08, 4.3946E-08, 4.0879E-08, & 3.7921E-08, 3.5075E-08, 3.2339E-08, 2.9715E-08, 2.7201E-08, & 2.4797E-08, 2.2505E-08, 2.0324E-08, 1.8254E-08, 1.6294E-08, & 1.4446E-08, 1.2709E-08, 1.1083E-08, 9.5684E-09, 8.1648E-09, & 6.8724E-09, 6.7492E-09, 6.6272E-09, 6.5063E-09, 6.3865E-09, & 6.2679E-09, 6.1503E-09, 6.0339E-09, 5.9185E-09, 5.8043E-09, & 5.6912E-09, 5.5792E-09, 5.4683E-09, 5.3585E-09, 5.2499E-09, & 5.1423E-09, 5.0359E-09, 4.9305E-09, 4.8263E-09, 4.7232E-09/ DATA ((DAT (I,J), I= 501, 600), J=3,3) / & 4.6212E-09, 4.5204E-09, 4.4206E-09, 4.3220E-09, 4.2244E-09, & 4.1280E-09, 4.0327E-09, 3.9385E-09, 3.8454E-09, 3.7534E-09, & 3.6626E-09, 3.5728E-09, 3.4842E-09, 3.3967E-09, 3.3103E-09, & 3.2250E-09, 3.1408E-09, 3.0577E-09, 2.9758E-09, 2.8949E-09, & 2.8152E-09, 2.7366E-09, 2.6591E-09, 2.5827E-09, 2.5074E-09, & 2.4333E-09, 2.3602E-09, 2.2883E-09, 2.2175E-09, 2.1477E-09, & 2.0792E-09, 2.0117E-09, 1.9453E-09, 1.8800E-09, 1.8159E-09, & 1.7529E-09, 1.6909E-09, 1.6301E-09, 1.5704E-09, 1.5119E-09, & 1.4544E-09, 1.3980E-09, 1.3428E-09, 1.2887E-09, 1.2357E-09, & 1.1838E-09, 1.1330E-09, 1.0833E-09, 1.0348E-09, 9.8731E-10, & 9.4097E-10, 8.9575E-10, 8.5165E-10, 8.0866E-10, 7.6678E-10, & 7.2601E-10, 6.8636E-10, 6.4782E-10, 6.1039E-10, 5.7408E-10, & 5.3888E-10, 5.0480E-10, 4.7183E-10, 4.3997E-10, 4.0922E-10, & 3.7959E-10, 3.5107E-10, 3.2367E-10, 2.9738E-10, 2.7220E-10, & 2.4814E-10, 2.2518E-10, 2.0335E-10, 1.8262E-10, 1.6301E-10, & 1.4452E-10, 1.2713E-10, 1.1086E-10, 9.5708E-11, 8.1665E-11, & 6.8736E-11, 6.7504E-11, 6.6284E-11, 6.5074E-11, 6.3876E-11, & 6.2689E-11, 6.1513E-11, 6.0348E-11, 5.9194E-11, 5.8052E-11, & 5.6920E-11, 5.5800E-11, 5.4691E-11, 5.3593E-11, 5.2506E-11, & 5.1430E-11, 5.0365E-11, 4.9312E-11, 4.8269E-11, 4.7238E-11/ DATA ((DAT (I,J), I= 601, 700), J=3,3) / & 4.6218E-11, 4.5209E-11, 4.4211E-11, 4.3225E-11, 4.2249E-11, & 4.1285E-11, 4.0331E-11, 3.9389E-11, 3.8458E-11, 3.7538E-11, & 3.6629E-11, 3.5732E-11, 3.4845E-11, 3.3970E-11, 3.3106E-11, & 3.2253E-11, 3.1411E-11, 3.0580E-11, 2.9760E-11, 2.8952E-11, & 2.8154E-11, 2.7368E-11, 2.6593E-11, 2.5829E-11, 2.5076E-11, & 2.4334E-11, 2.3604E-11, 2.2884E-11, 2.2176E-11, 2.1479E-11, & 2.0793E-11, 2.0118E-11, 1.9454E-11, 1.8801E-11, 1.8160E-11, & 1.7529E-11, 1.6910E-11, 1.6302E-11, 1.5705E-11, 1.5119E-11, & 1.4545E-11, 1.3981E-11, 1.3429E-11, 1.2887E-11, 1.2357E-11, & 1.1838E-11, 1.1330E-11, 1.0833E-11, 1.0348E-11, 9.8733E-12, & 9.4100E-12, 8.9577E-12, 8.5167E-12, 8.0867E-12, 7.6679E-12, & 7.2602E-12, 6.8637E-12, 6.4783E-12, 6.1040E-12, 5.7409E-12, & 5.3889E-12, 5.0480E-12, 4.7183E-12, 4.3997E-12, 4.0923E-12, & 3.7959E-12, 3.5108E-12, 3.2367E-12, 2.9738E-12, 2.7220E-12, & 2.4814E-12, 2.2519E-12, 2.0335E-12, 1.8262E-12, 1.6301E-12, & 1.4452E-12, 1.2713E-12, 1.1086E-12, 9.5708E-13, 8.1665E-13, & 6.8736E-13, 6.7504E-13, 6.6284E-13, 6.5074E-13, 6.3876E-13, & 6.2689E-13, 6.1513E-13, 6.0348E-13, 5.9194E-13, 5.8052E-13, & 5.6920E-13, 5.5800E-13, 5.4691E-13, 5.3593E-13, 5.2506E-13, & 5.1430E-13, 5.0365E-13, 4.9312E-13, 4.8269E-13, 4.7238E-13/ DATA ((DAT (I,J), I= 701, 800), J=3,3) / & 4.6218E-13, 4.5209E-13, 4.4211E-13, 4.3225E-13, 4.2249E-13, & 4.1285E-13, 4.0331E-13, 3.9389E-13, 3.8458E-13, 3.7538E-13, & 3.6629E-13, 3.5732E-13, 3.4845E-13, 3.3970E-13, 3.3106E-13, & 3.2253E-13, 3.1411E-13, 3.0580E-13, 2.9760E-13, 2.8952E-13, & 2.8154E-13, 2.7368E-13, 2.6593E-13, 2.5829E-13, 2.5076E-13, & 2.4334E-13, 2.3604E-13, 2.2884E-13, 2.2176E-13, 2.1479E-13, & 2.0793E-13, 2.0118E-13, 1.9454E-13, 1.8801E-13, 1.8160E-13, & 1.7529E-13, 1.6910E-13, 1.6302E-13, 1.5705E-13, 1.5119E-13, & 1.4545E-13, 1.3981E-13, 1.3429E-13, 1.2887E-13, 1.2357E-13, & 1.1838E-13, 1.1330E-13, 1.0833E-13, 1.0348E-13, 9.8733E-14, & 9.4100E-14, 8.9578E-14, 8.5167E-14, 8.0867E-14, 7.6679E-14, & 7.2602E-14, 6.8637E-14, 6.4783E-14, 6.1040E-14, 5.7409E-14, & 5.3889E-14, 5.0480E-14, 4.7183E-14, 4.3997E-14, 4.0923E-14, & 3.7959E-14, 3.5108E-14, 3.2367E-14, 2.9738E-14, 2.7220E-14, & 2.4814E-14, 2.2519E-14, 2.0335E-14, 1.8262E-14, 1.6301E-14, & 1.4452E-14, 1.2713E-14, 1.1086E-14, 9.5708E-15, 8.1665E-15, & 6.8736E-15, 6.7504E-15, 6.6284E-15, 6.5074E-15, 6.3876E-15, & 6.2689E-15, 6.1513E-15, 6.0348E-15, 5.9194E-15, 5.8052E-15, & 5.6920E-15, 5.5800E-15, 5.4691E-15, 5.3593E-15, 5.2506E-15, & 5.1430E-15, 5.0365E-15, 4.9312E-15, 4.8269E-15, 4.7238E-15/ DATA ((DAT (I,J), I= 801, 900), J=3,3) / & 4.6218E-15, 4.5209E-15, 4.4211E-15, 4.3225E-15, 4.2249E-15, & 4.1285E-15, 4.0331E-15, 3.9389E-15, 3.8458E-15, 3.7538E-15, & 3.6629E-15, 3.5732E-15, 3.4845E-15, 3.3970E-15, 3.3106E-15, & 3.2253E-15, 3.1411E-15, 3.0580E-15, 2.9760E-15, 2.8952E-15, & 2.8154E-15, 2.7368E-15, 2.6593E-15, 2.5829E-15, 2.5076E-15, & 2.4334E-15, 2.3604E-15, 2.2884E-15, 2.2176E-15, 2.1479E-15, & 2.0793E-15, 2.0118E-15, 1.9454E-15, 1.8801E-15, 1.8160E-15, & 1.7529E-15, 1.6910E-15, 1.6302E-15, 1.5705E-15, 1.5119E-15, & 1.4545E-15, 1.3981E-15, 1.3429E-15, 1.2887E-15, 1.2357E-15, & 1.1838E-15, 1.1330E-15, 1.0833E-15, 1.0348E-15, 9.8733E-16, & 9.4100E-16, 8.9578E-16, 8.5167E-16, 8.0867E-16, 7.6679E-16, & 7.2602E-16, 6.8637E-16, 6.4783E-16, 6.1040E-16, 5.7409E-16, & 5.3889E-16, 5.0480E-16, 4.7183E-16, 4.3997E-16, 4.0923E-16, & 3.7959E-16, 3.5108E-16, 3.2367E-16, 2.9738E-16, 2.7220E-16, & 2.4814E-16, 2.2519E-16, 2.0335E-16, 1.8262E-16, 1.6301E-16, & 1.4452E-16, 1.2713E-16, 1.1086E-16, 9.5708E-17, 8.1665E-17, & 6.8736E-17, 0.0000E+00, 6.8736E-17, 6.1905E-10, 2.4755E-09, & 5.5697E-09, 9.9006E-09, 1.5472E-08, 2.2284E-08, 3.0337E-08, & 3.9633E-08, 5.0175E-08, 6.1964E-08, 7.5002E-08, 8.9292E-08, & 1.0484E-07, 1.2164E-07, 1.3971E-07, 1.5904E-07, 1.7963E-07/ DATA ((DAT (I,J), I= 901, 979), J=3,3) / & 2.0151E-07, 2.2466E-07, 2.4909E-07, 2.7481E-07, 3.0182E-07, & 3.3013E-07, 3.5974E-07, 3.9067E-07, 4.2291E-07, 4.5648E-07, & 4.9137E-07, 5.2761E-07, 5.6519E-07, 6.0413E-07, 6.4443E-07, & 6.8610E-07, 7.2915E-07, 7.7360E-07, 8.1945E-07, 8.6671E-07, & 9.1539E-07, 9.6551E-07, 1.0171E-06, 1.0701E-06, 1.1246E-06, & 1.1806E-06, 1.2381E-06, 1.2971E-06, 1.3576E-06, 1.4197E-06, & 1.4833E-06, 1.5485E-06, 1.6154E-06, 1.6838E-06, 1.7539E-06, & 1.8256E-06, 1.8990E-06, 1.9741E-06, 2.0510E-06, 2.1295E-06, & 2.2099E-06, 2.2920E-06, 2.3760E-06, 2.4619E-06, 2.5496E-06, & 2.6393E-06, 2.7309E-06, 2.8245E-06, 2.9201E-06, 3.0178E-06, & 3.1176E-06, 3.2195E-06, 3.3237E-06, 3.4301E-06, 3.5388E-06, & 3.6499E-06, 3.7634E-06, 3.8794E-06, 3.9979E-06, 4.1191E-06, & 4.2430E-06, 4.3696E-06, 4.4992E-06, 4.6318E-06, 4.7675E-06, & 4.9064E-06, 5.0486E-06, 5.1944E-06, 5.3439E-06, 5.4972E-06, & 5.6547E-06, 5.8164E-06, 5.9828E-06, 6.0393E-06, 6.1540E-06, & 6.19473659E-06, 6.33055888E-06, 6.34851840E-06, 6.39064494E-06/ c ++++ deghadt26 ++++ c update 05/28/26 c****************************************************************************** c* * c* --- intRdatx --- Thu May 28 15:36:00 2026 * c* * c***************************# FJ@HU Berlin #*********************************** c "Delta alpha" Update version (24/02/2026) c ISCAN: -1, Ismooth: 0, IGS: 0, DSET: EPM2, 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.1880, MTOP: 172.40 c NF,IOR,ICHK: 5,4,2,ISU2: 2,NFL: 5,INAG: 1,inotail: 0, sin2W_ref: 0.23153 c CHPTCUT,EC,ECUT: 0.3180, 5.20, 11.50, sin2W_eff: 0.23153, s2W_ref/eff: 1.000 c iintRd,IUNMIX,iomegaphidat,iresonances,IRESON:1, 1, 3, 1, 1 DATA ((DGT (I,J), I= 1, 100), J=1,1) / & 8.3862E-02, 8.3756E-02, 8.3649E-02, 8.3541E-02, 8.3431E-02, & 8.3320E-02, 8.3207E-02, 8.3094E-02, 8.2979E-02, 8.2862E-02, & 8.2745E-02, 8.2625E-02, 8.2505E-02, 8.2382E-02, 8.2258E-02, & 8.2133E-02, 8.2006E-02, 8.1877E-02, 8.1746E-02, 8.1614E-02, & 8.1480E-02, 8.1344E-02, 8.1206E-02, 8.1066E-02, 8.0923E-02, & 8.0779E-02, 8.0633E-02, 8.0484E-02, 8.0333E-02, 8.0180E-02, & 8.0025E-02, 7.9866E-02, 7.9706E-02, 7.9542E-02, 7.9376E-02, & 7.9207E-02, 7.9035E-02, 7.8860E-02, 7.8682E-02, 7.8501E-02, & 7.8317E-02, 7.8129E-02, 7.7937E-02, 7.7742E-02, 7.7543E-02, & 7.7339E-02, 7.7132E-02, 7.6921E-02, 7.6705E-02, 7.6484E-02, & 7.6259E-02, 7.6029E-02, 7.5793E-02, 7.5553E-02, 7.5306E-02, & 7.5054E-02, 7.4795E-02, 7.4530E-02, 7.4258E-02, 7.3980E-02, & 7.3693E-02, 7.3399E-02, 7.3097E-02, 7.2786E-02, 7.2466E-02, & 7.2137E-02, 7.1797E-02, 7.1447E-02, 7.1085E-02, 7.0711E-02, & 7.0324E-02, 6.9924E-02, 6.9508E-02, 6.9077E-02, 6.8629E-02, & 6.8163E-02, 6.7677E-02, 6.7169E-02, 6.6638E-02, 6.6082E-02, & 6.5498E-02, 6.4883E-02, 6.4234E-02, 6.3547E-02, 6.2817E-02, & 6.2039E-02, 6.1207E-02, 6.0312E-02, 5.9344E-02, 5.8291E-02, & 5.7137E-02, 5.7015E-02, 5.6892E-02, 5.6768E-02, 5.6642E-02, & 5.6515E-02, 5.6387E-02, 5.6257E-02, 5.6126E-02, 5.5994E-02/ DATA ((DGT (I,J), I= 101, 200), J=1,1) / & 5.5860E-02, 5.5724E-02, 5.5587E-02, 5.5448E-02, 5.5308E-02, & 5.5166E-02, 5.5022E-02, 5.4877E-02, 5.4730E-02, 5.4581E-02, & 5.4430E-02, 5.4278E-02, 5.4123E-02, 5.3966E-02, 5.3808E-02, & 5.3647E-02, 5.3484E-02, 5.3319E-02, 5.3151E-02, 5.2981E-02, & 5.2809E-02, 5.2634E-02, 5.2457E-02, 5.2277E-02, 5.2094E-02, & 5.1909E-02, 5.1720E-02, 5.1529E-02, 5.1334E-02, 5.1137E-02, & 5.0936E-02, 5.0732E-02, 5.0524E-02, 5.0313E-02, 5.0097E-02, & 4.9878E-02, 4.9655E-02, 4.9428E-02, 4.9197E-02, 4.8961E-02, & 4.8720E-02, 4.8475E-02, 4.8224E-02, 4.7968E-02, 4.7707E-02, & 4.7440E-02, 4.7167E-02, 4.6888E-02, 4.6602E-02, 4.6309E-02, & 4.6010E-02, 4.5702E-02, 4.5387E-02, 4.5064E-02, 4.4731E-02, & 4.4390E-02, 4.4038E-02, 4.3677E-02, 4.3304E-02, 4.2920E-02, & 4.2523E-02, 4.2113E-02, 4.1689E-02, 4.1250E-02, 4.0795E-02, & 4.0322E-02, 3.9831E-02, 3.9319E-02, 3.8786E-02, 3.8228E-02, & 3.7645E-02, 3.7033E-02, 3.6389E-02, 3.5710E-02, 3.4993E-02, & 3.4232E-02, 3.3423E-02, 3.2557E-02, 3.1628E-02, 3.0626E-02, & 2.9536E-02, 2.9434E-02, 2.9330E-02, 2.9225E-02, 2.9120E-02, & 2.9014E-02, 2.8907E-02, 2.8798E-02, 2.8689E-02, 2.8579E-02, & 2.8469E-02, 2.8357E-02, 2.8244E-02, 2.8130E-02, 2.8015E-02, & 2.7899E-02, 2.7781E-02, 2.7663E-02, 2.7544E-02, 2.7423E-02/ DATA ((DGT (I,J), I= 201, 300), J=1,1) / & 2.7302E-02, 2.7179E-02, 2.7055E-02, 2.6929E-02, 2.6803E-02, & 2.6675E-02, 2.6546E-02, 2.6415E-02, 2.6283E-02, 2.6150E-02, & 2.6015E-02, 2.5879E-02, 2.5741E-02, 2.5602E-02, 2.5461E-02, & 2.5319E-02, 2.5175E-02, 2.5029E-02, 2.4881E-02, 2.4732E-02, & 2.4581E-02, 2.4428E-02, 2.4274E-02, 2.4117E-02, 2.3958E-02, & 2.3797E-02, 2.3634E-02, 2.3469E-02, 2.3302E-02, 2.3133E-02, & 2.2961E-02, 2.2786E-02, 2.2610E-02, 2.2430E-02, 2.2248E-02, & 2.2063E-02, 2.1876E-02, 2.1686E-02, 2.1492E-02, 2.1296E-02, & 2.1096E-02, 2.0893E-02, 2.0687E-02, 2.0477E-02, 2.0264E-02, & 2.0047E-02, 1.9826E-02, 1.9601E-02, 1.9372E-02, 1.9138E-02, & 1.8900E-02, 1.8657E-02, 1.8409E-02, 1.8156E-02, 1.7898E-02, & 1.7634E-02, 1.7364E-02, 1.7088E-02, 1.6806E-02, 1.6517E-02, & 1.6220E-02, 1.5917E-02, 1.5605E-02, 1.5284E-02, 1.4955E-02, & 1.4616E-02, 1.4267E-02, 1.3907E-02, 1.3535E-02, 1.3150E-02, & 1.2751E-02, 1.2337E-02, 1.1907E-02, 1.1458E-02, 1.0989E-02, & 1.0498E-02, 9.9819E-03, 9.4387E-03, 8.8652E-03, 8.2582E-03, & 7.6141E-03, 7.5476E-03, 7.4806E-03, 7.4133E-03, 7.3455E-03, & 7.2773E-03, 7.2087E-03, 7.1397E-03, 7.0702E-03, 7.0004E-03, & 6.9301E-03, 6.8594E-03, 6.7882E-03, 6.7167E-03, 6.6447E-03, & 6.5723E-03, 6.4994E-03, 6.4261E-03, 6.3524E-03, 6.2782E-03/ DATA ((DGT (I,J), I= 301, 400), J=1,1) / & 6.2036E-03, 6.1286E-03, 6.0532E-03, 5.9773E-03, 5.9010E-03, & 5.8242E-03, 5.7471E-03, 5.6695E-03, 5.5915E-03, 5.5130E-03, & 5.4342E-03, 5.3550E-03, 5.2753E-03, 5.1953E-03, 5.1148E-03, & 5.0340E-03, 4.9528E-03, 4.8712E-03, 4.7893E-03, 4.7070E-03, & 4.6244E-03, 4.5414E-03, 4.4581E-03, 4.3746E-03, 4.2907E-03, & 4.2065E-03, 4.1221E-03, 4.0375E-03, 3.9526E-03, 3.8676E-03, & 3.7823E-03, 3.6969E-03, 3.6113E-03, 3.5256E-03, 3.4398E-03, & 3.3540E-03, 3.2681E-03, 3.1822E-03, 3.0964E-03, 3.0106E-03, & 2.9249E-03, 2.8393E-03, 2.7539E-03, 2.6687E-03, 2.5843E-03, & 2.4996E-03, 2.4153E-03, 2.3314E-03, 2.2480E-03, 2.1650E-03, & 2.0825E-03, 2.0007E-03, 1.9194E-03, 1.8389E-03, 1.7592E-03, & 1.6803E-03, 1.6023E-03, 1.5252E-03, 1.4492E-03, 1.3743E-03, & 1.3003E-03, 1.2278E-03, 1.1566E-03, 1.0868E-03, 1.0184E-03, & 9.5160E-04, 8.8640E-04, 8.2303E-04, 7.6129E-04, 7.0141E-04, & 6.4345E-04, 5.8751E-04, 5.3366E-04, 4.8199E-04, 4.3256E-04, & 3.8545E-04, 3.4075E-04, 2.9852E-04, 2.5883E-04, 2.2175E-04, & 1.8734E-04, 1.8405E-04, 1.8079E-04, 1.7755E-04, 1.7435E-04, & 1.7117E-04, 1.6801E-04, 1.6489E-04, 1.6179E-04, 1.5872E-04, & 1.5568E-04, 1.5266E-04, 1.4968E-04, 1.4672E-04, 1.4379E-04, & 1.4089E-04, 1.3802E-04, 1.3517E-04, 1.3236E-04, 1.2957E-04/ DATA ((DGT (I,J), I= 401, 500), J=1,1) / & 1.2681E-04, 1.2408E-04, 1.2137E-04, 1.1870E-04, 1.1605E-04, & 1.1344E-04, 1.1085E-04, 1.0829E-04, 1.0576E-04, 1.0326E-04, & 1.0079E-04, 9.8343E-05, 9.5929E-05, 9.3543E-05, 9.1187E-05, & 8.8860E-05, 8.6562E-05, 8.4294E-05, 8.2054E-05, 7.9844E-05, & 7.7664E-05, 7.5513E-05, 7.3391E-05, 7.1299E-05, 6.9236E-05, & 6.7203E-05, 6.5200E-05, 6.3226E-05, 6.1282E-05, 5.9368E-05, & 5.7484E-05, 5.5629E-05, 5.3805E-05, 5.2010E-05, 5.0245E-05, & 4.8510E-05, 4.6805E-05, 4.5130E-05, 4.3485E-05, 4.1871E-05, & 4.0286E-05, 3.8732E-05, 3.7208E-05, 3.5714E-05, 3.4250E-05, & 3.2817E-05, 3.1413E-05, 3.0041E-05, 2.8698E-05, 2.7386E-05, & 2.6105E-05, 2.4854E-05, 2.3633E-05, 2.2443E-05, 2.1283E-05, & 2.0154E-05, 1.9056E-05, 1.7988E-05, 1.6951E-05, 1.5944E-05, & 1.4968E-05, 1.4023E-05, 1.3108E-05, 1.2224E-05, 1.1371E-05, & 1.0549E-05, 9.7569E-06, 8.9961E-06, 8.2660E-06, 7.5667E-06, & 6.8983E-06, 6.2607E-06, 5.6539E-06, 5.0780E-06, 4.5330E-06, & 4.0189E-06, 3.5357E-06, 3.0833E-06, 2.6619E-06, 2.2715E-06, & 1.9119E-06, 1.8777E-06, 1.8437E-06, 1.8101E-06, 1.7768E-06, & 1.7438E-06, 1.7110E-06, 1.6787E-06, 1.6466E-06, 1.6148E-06, & 1.5833E-06, 1.5522E-06, 1.5213E-06, 1.4908E-06, 1.4605E-06, & 1.4306E-06, 1.4010E-06, 1.3717E-06, 1.3427E-06, 1.3140E-06/ DATA ((DGT (I,J), I= 501, 600), J=1,1) / & 1.2857E-06, 1.2576E-06, 1.2298E-06, 1.2024E-06, 1.1753E-06, & 1.1484E-06, 1.1219E-06, 1.0957E-06, 1.0698E-06, 1.0442E-06, & 1.0190E-06, 9.9400E-07, 9.6934E-07, 9.4499E-07, 9.2095E-07, & 8.9722E-07, 8.7380E-07, 8.5069E-07, 8.2789E-07, 8.0540E-07, & 7.8322E-07, 7.6135E-07, 7.3979E-07, 7.1854E-07, 6.9759E-07, & 6.7696E-07, 6.5664E-07, 6.3662E-07, 6.1692E-07, 5.9753E-07, & 5.7844E-07, 5.5967E-07, 5.4120E-07, 5.2305E-07, 5.0520E-07, & 4.8766E-07, 4.7044E-07, 4.5352E-07, 4.3691E-07, 4.2062E-07, & 4.0463E-07, 3.8895E-07, 3.7358E-07, 3.5853E-07, 3.4378E-07, & 3.2934E-07, 3.1521E-07, 3.0139E-07, 2.8788E-07, 2.7468E-07, & 2.6179E-07, 2.4921E-07, 2.3694E-07, 2.2498E-07, 2.1333E-07, & 2.0198E-07, 1.9095E-07, 1.8023E-07, 1.6982E-07, 1.5972E-07, & 1.4992E-07, 1.4044E-07, 1.3127E-07, 1.2240E-07, 1.1385E-07, & 1.0561E-07, 9.7673E-08, 9.0049E-08, 8.2734E-08, 7.5729E-08, & 6.9034E-08, 6.2649E-08, 5.6574E-08, 5.0808E-08, 4.5352E-08, & 4.0206E-08, 3.5370E-08, 3.0844E-08, 2.6627E-08, 2.2720E-08, & 1.9123E-08, 1.8781E-08, 1.8441E-08, 1.8104E-08, 1.7771E-08, & 1.7441E-08, 1.7114E-08, 1.6790E-08, 1.6469E-08, 1.6151E-08, & 1.5836E-08, 1.5524E-08, 1.5216E-08, 1.4910E-08, 1.4608E-08, & 1.4308E-08, 1.4012E-08, 1.3719E-08, 1.3429E-08, 1.3142E-08/ DATA ((DGT (I,J), I= 601, 700), J=1,1) / & 1.2858E-08, 1.2578E-08, 1.2300E-08, 1.2026E-08, 1.1754E-08, & 1.1486E-08, 1.1221E-08, 1.0959E-08, 1.0700E-08, 1.0444E-08, & 1.0191E-08, 9.9410E-09, 9.6944E-09, 9.4509E-09, 9.2104E-09, & 8.9731E-09, 8.7389E-09, 8.5077E-09, 8.2797E-09, 8.0547E-09, & 7.8329E-09, 7.6141E-09, 7.3985E-09, 7.1859E-09, 6.9765E-09, & 6.7701E-09, 6.5668E-09, 6.3667E-09, 6.1696E-09, 5.9756E-09, & 5.7848E-09, 5.5970E-09, 5.4123E-09, 5.2308E-09, 5.0523E-09, & 4.8769E-09, 4.7046E-09, 4.5354E-09, 4.3694E-09, 4.2064E-09, & 4.0465E-09, 3.8897E-09, 3.7360E-09, 3.5854E-09, 3.4379E-09, & 3.2935E-09, 3.1522E-09, 3.0140E-09, 2.8789E-09, 2.7469E-09, & 2.6180E-09, 2.4922E-09, 2.3694E-09, 2.2498E-09, 2.1333E-09, & 2.0199E-09, 1.9096E-09, 1.8023E-09, 1.6982E-09, 1.5972E-09, & 1.4993E-09, 1.4044E-09, 1.3127E-09, 1.2241E-09, 1.1385E-09, & 1.0561E-09, 9.7674E-10, 9.0049E-10, 8.2735E-10, 7.5730E-10, & 6.9035E-10, 6.2650E-10, 5.6574E-10, 5.0809E-10, 4.5353E-10, & 4.0207E-10, 3.5370E-10, 3.0844E-10, 2.6627E-10, 2.2720E-10, & 1.9123E-10, 1.8781E-10, 1.8441E-10, 1.8105E-10, 1.7771E-10, & 1.7441E-10, 1.7114E-10, 1.6790E-10, 1.6469E-10, 1.6151E-10, & 1.5836E-10, 1.5524E-10, 1.5216E-10, 1.4910E-10, 1.4608E-10, & 1.4308E-10, 1.4012E-10, 1.3719E-10, 1.3429E-10, 1.3142E-10/ DATA ((DGT (I,J), I= 701, 800), J=1,1) / & 1.2858E-10, 1.2578E-10, 1.2300E-10, 1.2026E-10, 1.1754E-10, & 1.1486E-10, 1.1221E-10, 1.0959E-10, 1.0700E-10, 1.0444E-10, & 1.0191E-10, 9.9411E-11, 9.6944E-11, 9.4509E-11, 9.2104E-11, & 8.9731E-11, 8.7389E-11, 8.5077E-11, 8.2797E-11, 8.0547E-11, & 7.8329E-11, 7.6141E-11, 7.3985E-11, 7.1859E-11, 6.9765E-11, & 6.7701E-11, 6.5668E-11, 6.3667E-11, 6.1696E-11, 5.9757E-11, & 5.7848E-11, 5.5970E-11, 5.4123E-11, 5.2308E-11, 5.0523E-11, & 4.8769E-11, 4.7046E-11, 4.5354E-11, 4.3694E-11, 4.2064E-11, & 4.0465E-11, 3.8897E-11, 3.7360E-11, 3.5854E-11, 3.4379E-11, & 3.2935E-11, 3.1522E-11, 3.0140E-11, 2.8789E-11, 2.7469E-11, & 2.6180E-11, 2.4922E-11, 2.3694E-11, 2.2498E-11, 2.1333E-11, & 2.0199E-11, 1.9096E-11, 1.8023E-11, 1.6982E-11, 1.5972E-11, & 1.4993E-11, 1.4044E-11, 1.3127E-11, 1.2241E-11, 1.1385E-11, & 1.0561E-11, 9.7674E-12, 9.0049E-12, 8.2735E-12, 7.5730E-12, & 6.9035E-12, 6.2650E-12, 5.6574E-12, 5.0809E-12, 4.5353E-12, & 4.0207E-12, 3.5370E-12, 3.0844E-12, 2.6627E-12, 2.2720E-12, & 1.9123E-12, 1.8781E-12, 1.8441E-12, 1.8105E-12, 1.7771E-12, & 1.7441E-12, 1.7114E-12, 1.6790E-12, 1.6469E-12, 1.6151E-12, & 1.5836E-12, 1.5524E-12, 1.5216E-12, 1.4910E-12, 1.4608E-12, & 1.4308E-12, 1.4012E-12, 1.3719E-12, 1.3429E-12, 1.3142E-12/ DATA ((DGT (I,J), I= 801, 900), J=1,1) / & 1.2858E-12, 1.2578E-12, 1.2300E-12, 1.2026E-12, 1.1754E-12, & 1.1486E-12, 1.1221E-12, 1.0959E-12, 1.0700E-12, 1.0444E-12, & 1.0191E-12, 9.9410E-13, 9.6944E-13, 9.4509E-13, 9.2104E-13, & 8.9731E-13, 8.7389E-13, 8.5077E-13, 8.2797E-13, 8.0547E-13, & 7.8329E-13, 7.6141E-13, 7.3985E-13, 7.1859E-13, 6.9765E-13, & 6.7701E-13, 6.5668E-13, 6.3667E-13, 6.1696E-13, 5.9757E-13, & 5.7848E-13, 5.5970E-13, 5.4123E-13, 5.2308E-13, 5.0523E-13, & 4.8769E-13, 4.7046E-13, 4.5354E-13, 4.3694E-13, 4.2064E-13, & 4.0465E-13, 3.8897E-13, 3.7360E-13, 3.5854E-13, 3.4379E-13, & 3.2935E-13, 3.1522E-13, 3.0140E-13, 2.8789E-13, 2.7469E-13, & 2.6180E-13, 2.4922E-13, 2.3694E-13, 2.2498E-13, 2.1333E-13, & 2.0199E-13, 1.9096E-13, 1.8023E-13, 1.6982E-13, 1.5972E-13, & 1.4993E-13, 1.4044E-13, 1.3127E-13, 1.2241E-13, 1.1385E-13, & 1.0561E-13, 9.7674E-14, 9.0049E-14, 8.2735E-14, 7.5730E-14, & 6.9035E-14, 6.2650E-14, 5.6574E-14, 5.0809E-14, 4.5353E-14, & 4.0207E-14, 3.5370E-14, 3.0844E-14, 2.6627E-14, 2.2720E-14, & 1.9123E-14, 0.0000E+00,-1.9123E-14,-1.7223E-07,-6.8872E-07, & -1.5496E-06,-2.7546E-06,-4.3048E-06,-6.2002E-06,-8.4412E-06, & -1.1028E-05,-1.3962E-05,-1.7244E-05,-2.0873E-05,-2.4852E-05, & -2.9180E-05,-3.3859E-05,-3.8891E-05,-4.4275E-05,-5.0014E-05/ DATA ((DGT (I,J), I= 901, 979), J=1,1) / & -5.6109E-05,-6.2560E-05,-6.9371E-05,-7.6542E-05,-8.4075E-05, & -9.1972E-05,-1.0023E-04,-1.0886E-04,-1.1787E-04,-1.2724E-04, & -1.3698E-04,-1.4711E-04,-1.5759E-04,-1.6847E-04,-1.7974E-04, & -1.9139E-04,-2.0344E-04,-2.1588E-04,-2.2872E-04,-2.4196E-04, & -2.5560E-04,-2.6965E-04,-2.8411E-04,-2.9898E-04,-3.1428E-04, & -3.3000E-04,-3.4615E-04,-3.6273E-04,-3.7975E-04,-3.9721E-04, & -4.1513E-04,-4.3349E-04,-4.5232E-04,-4.7161E-04,-4.9137E-04, & -5.1161E-04,-5.3234E-04,-5.5356E-04,-5.7528E-04,-5.9751E-04, & -6.2025E-04,-6.4352E-04,-6.6732E-04,-6.9166E-04,-7.1656E-04, & -7.4201E-04,-7.6814E-04,-7.9476E-04,-8.2197E-04,-8.4979E-04, & -8.7827E-04,-9.0735E-04,-9.3708E-04,-9.6749E-04,-9.9857E-04, & -1.0304E-03,-1.0629E-03,-1.0961E-03,-1.1302E-03,-1.1650E-03, & -1.2006E-03,-1.2370E-03,-1.2744E-03,-1.3127E-03,-1.3519E-03, & -1.3922E-03,-1.4334E-03,-1.4759E-03,-1.5195E-03,-1.5643E-03, & -1.6106E-03,-1.6584E-03,-1.7079E-03,-1.7248E-03,-1.7594E-03, & -1.77170835E-03,-1.81330140E-03,-1.81886378E-03,-1.83199080E-03/ DATA ((DGT (I,J), I= 1, 100), J=2,2) / & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4030E-05, & 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4030E-05, & 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4030E-05, & 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4030E-05, & 2.4030E-05, 2.4030E-05, 2.4030E-05, 2.4029E-05, 2.4029E-05, & 2.4029E-05, 2.4029E-05, 2.4029E-05, 2.4029E-05, 2.4029E-05, & 2.4029E-05, 2.4029E-05, 2.4029E-05, 2.4028E-05, 2.4028E-05, & 2.4028E-05, 2.4028E-05, 2.4028E-05, 2.4028E-05, 2.4027E-05, & 2.4027E-05, 2.4027E-05, 2.4027E-05, 2.4027E-05, 2.4026E-05, & 2.4026E-05, 2.4026E-05, 2.4025E-05, 2.4025E-05, 2.4024E-05, & 2.4024E-05, 2.4023E-05, 2.4023E-05, 2.4022E-05, 2.4021E-05, & 2.4020E-05, 2.4020E-05, 2.4018E-05, 2.4017E-05, 2.4016E-05, & 2.4014E-05, 2.4012E-05, 2.4010E-05, 2.4008E-05, 2.4004E-05, & 2.4001E-05, 2.3996E-05, 2.3991E-05, 2.3984E-05, 2.3974E-05, & 2.3963E-05, 2.3961E-05, 2.3960E-05, 2.3958E-05, 2.3957E-05, & 2.3955E-05, 2.3954E-05, 2.3952E-05, 2.3950E-05, 2.3948E-05/ DATA ((DGT (I,J), I= 101, 200), J=2,2) / & 2.3947E-05, 2.3945E-05, 2.3943E-05, 2.3941E-05, 2.3939E-05, & 2.3936E-05, 2.3934E-05, 2.3932E-05, 2.3929E-05, 2.3927E-05, & 2.3924E-05, 2.3922E-05, 2.3919E-05, 2.3916E-05, 2.3913E-05, & 2.3910E-05, 2.3906E-05, 2.3903E-05, 2.3900E-05, 2.3896E-05, & 2.3892E-05, 2.3888E-05, 2.3884E-05, 2.3879E-05, 2.3875E-05, & 2.3870E-05, 2.3865E-05, 2.3860E-05, 2.3854E-05, 2.3849E-05, & 2.3843E-05, 2.3836E-05, 2.3830E-05, 2.3823E-05, 2.3815E-05, & 2.3808E-05, 2.3800E-05, 2.3791E-05, 2.3782E-05, 2.3772E-05, & 2.3762E-05, 2.3751E-05, 2.3740E-05, 2.3728E-05, 2.3715E-05, & 2.3701E-05, 2.3687E-05, 2.3671E-05, 2.3655E-05, 2.3637E-05, & 2.3618E-05, 2.3597E-05, 2.3575E-05, 2.3552E-05, 2.3526E-05, & 2.3499E-05, 2.3469E-05, 2.3437E-05, 2.3401E-05, 2.3363E-05, & 2.3321E-05, 2.3276E-05, 2.3226E-05, 2.3170E-05, 2.3110E-05, & 2.3042E-05, 2.2967E-05, 2.2884E-05, 2.2791E-05, 2.2687E-05, & 2.2569E-05, 2.2436E-05, 2.2285E-05, 2.2112E-05, 2.1913E-05, & 2.1683E-05, 2.1416E-05, 2.1103E-05, 2.0734E-05, 2.0294E-05, & 1.9765E-05, 1.9712E-05, 1.9659E-05, 1.9604E-05, 1.9549E-05, & 1.9492E-05, 1.9435E-05, 1.9376E-05, 1.9317E-05, 1.9256E-05, & 1.9194E-05, 1.9131E-05, 1.9067E-05, 1.9002E-05, 1.8936E-05, & 1.8868E-05, 1.8799E-05, 1.8729E-05, 1.8657E-05, 1.8585E-05/ DATA ((DGT (I,J), I= 201, 300), J=2,2) / & 1.8510E-05, 1.8435E-05, 1.8358E-05, 1.8279E-05, 1.8199E-05, & 1.8118E-05, 1.8035E-05, 1.7950E-05, 1.7864E-05, 1.7776E-05, & 1.7686E-05, 1.7595E-05, 1.7501E-05, 1.7407E-05, 1.7310E-05, & 1.7211E-05, 1.7111E-05, 1.7008E-05, 1.6904E-05, 1.6797E-05, & 1.6689E-05, 1.6578E-05, 1.6465E-05, 1.6350E-05, 1.6233E-05, & 1.6114E-05, 1.5992E-05, 1.5868E-05, 1.5742E-05, 1.5614E-05, & 1.5483E-05, 1.5349E-05, 1.5213E-05, 1.5075E-05, 1.4934E-05, & 1.4791E-05, 1.4645E-05, 1.4496E-05, 1.4345E-05, 1.4191E-05, & 1.4034E-05, 1.3875E-05, 1.3713E-05, 1.3549E-05, 1.3382E-05, & 1.3212E-05, 1.3039E-05, 1.2863E-05, 1.2685E-05, 1.2504E-05, & 1.2320E-05, 1.2134E-05, 1.1944E-05, 1.1752E-05, 1.1556E-05, & 1.1358E-05, 1.1157E-05, 1.0953E-05, 1.0746E-05, 1.0535E-05, & 1.0322E-05, 1.0105E-05, 9.8851E-06, 9.6616E-06, 9.4345E-06, & 9.2038E-06, 8.9693E-06, 8.7309E-06, 8.4883E-06, 8.2414E-06, & 7.9899E-06, 7.7335E-06, 7.4719E-06, 7.2045E-06, 6.9307E-06, & 6.6497E-06, 6.3602E-06, 6.0607E-06, 5.7491E-06, 5.4225E-06, & 5.0775E-06, 5.0418E-06, 5.0059E-06, 4.9697E-06, 4.9333E-06, & 4.8966E-06, 4.8597E-06, 4.8225E-06, 4.7851E-06, 4.7474E-06, & 4.7094E-06, 4.6711E-06, 4.6325E-06, 4.5937E-06, 4.5545E-06, & 4.5150E-06, 4.4752E-06, 4.4351E-06, 4.3946E-06, 4.3539E-06/ DATA ((DGT (I,J), I= 301, 400), J=2,2) / & 4.3127E-06, 4.2713E-06, 4.2294E-06, 4.1873E-06, 4.1447E-06, & 4.1018E-06, 4.0585E-06, 4.0148E-06, 3.9707E-06, 3.9263E-06, & 3.8814E-06, 3.8361E-06, 3.7904E-06, 3.7443E-06, 3.6977E-06, & 3.6507E-06, 3.6033E-06, 3.5554E-06, 3.5071E-06, 3.4584E-06, & 3.4091E-06, 3.3595E-06, 3.3093E-06, 3.2588E-06, 3.2077E-06, & 3.1562E-06, 3.1042E-06, 3.0517E-06, 2.9988E-06, 2.9454E-06, & 2.8916E-06, 2.8373E-06, 2.7826E-06, 2.7274E-06, 2.6717E-06, & 2.6157E-06, 2.5592E-06, 2.5023E-06, 2.4450E-06, 2.3873E-06, & 2.3292E-06, 2.2708E-06, 2.2120E-06, 2.1530E-06, 2.0936E-06, & 2.0340E-06, 1.9741E-06, 1.9140E-06, 1.8538E-06, 1.7934E-06, & 1.7329E-06, 1.6723E-06, 1.6117E-06, 1.5511E-06, 1.4906E-06, & 1.4302E-06, 1.3700E-06, 1.3101E-06, 1.2504E-06, 1.1911E-06, & 1.1322E-06, 1.0738E-06, 1.0160E-06, 9.5884E-07, 9.0242E-07, & 8.4682E-07, 7.9213E-07, 7.3843E-07, 6.8582E-07, 6.3440E-07, & 5.8426E-07, 5.3550E-07, 4.8822E-07, 4.4253E-07, 3.9853E-07, & 3.5632E-07, 3.1600E-07, 2.7768E-07, 2.4146E-07, 2.0743E-07, & 1.7570E-07, 1.7265E-07, 1.6963E-07, 1.6664E-07, 1.6367E-07, & 1.6072E-07, 1.5779E-07, 1.5490E-07, 1.5202E-07, 1.4917E-07, & 1.4635E-07, 1.4354E-07, 1.4077E-07, 1.3802E-07, 1.3529E-07, & 1.3259E-07, 1.2992E-07, 1.2726E-07, 1.2464E-07, 1.2204E-07/ DATA ((DGT (I,J), I= 401, 500), J=2,2) / & 1.1947E-07, 1.1692E-07, 1.1439E-07, 1.1190E-07, 1.0942E-07, & 1.0698E-07, 1.0456E-07, 1.0216E-07, 9.9795E-08, 9.7453E-08, & 9.5138E-08, 9.2848E-08, 9.0585E-08, 8.8349E-08, 8.6139E-08, & 8.3956E-08, 8.1799E-08, 7.9669E-08, 7.7566E-08, 7.5489E-08, & 7.3440E-08, 7.1418E-08, 6.9422E-08, 6.7454E-08, 6.5513E-08, & 6.3599E-08, 6.1713E-08, 5.9854E-08, 5.8022E-08, 5.6218E-08, & 5.4442E-08, 5.2693E-08, 5.0971E-08, 4.9278E-08, 4.7612E-08, & 4.5974E-08, 4.4364E-08, 4.2782E-08, 4.1228E-08, 3.9702E-08, & 3.8205E-08, 3.6735E-08, 3.5293E-08, 3.3880E-08, 3.2495E-08, & 3.1139E-08, 2.9811E-08, 2.8511E-08, 2.7240E-08, 2.5997E-08, & 2.4783E-08, 2.3598E-08, 2.2441E-08, 2.1313E-08, 2.0213E-08, & 1.9143E-08, 1.8101E-08, 1.7088E-08, 1.6104E-08, 1.5149E-08, & 1.4222E-08, 1.3325E-08, 1.2457E-08, 1.1618E-08, 1.0808E-08, & 1.0027E-08, 9.2747E-09, 8.5519E-09, 7.8583E-09, 7.1939E-09, & 6.5587E-09, 5.9528E-09, 5.3762E-09, 4.8288E-09, 4.3107E-09, & 3.8219E-09, 3.3625E-09, 2.9325E-09, 2.5318E-09, 2.1604E-09, & 1.8185E-09, 1.7860E-09, 1.7537E-09, 1.7217E-09, 1.6900E-09, & 1.6586E-09, 1.6275E-09, 1.5967E-09, 1.5662E-09, 1.5359E-09, & 1.5060E-09, 1.4764E-09, 1.4470E-09, 1.4180E-09, 1.3892E-09, & 1.3608E-09, 1.3326E-09, 1.3048E-09, 1.2772E-09, 1.2499E-09/ DATA ((DGT (I,J), I= 501, 600), J=2,2) / & 1.2229E-09, 1.1962E-09, 1.1698E-09, 1.1437E-09, 1.1179E-09, & 1.0924E-09, 1.0672E-09, 1.0423E-09, 1.0176E-09, 9.9330E-10, & 9.6926E-10, 9.4551E-10, 9.2205E-10, 8.9890E-10, 8.7603E-10, & 8.5346E-10, 8.3119E-10, 8.0920E-10, 7.8752E-10, 7.6612E-10, & 7.4503E-10, 7.2422E-10, 7.0371E-10, 6.8350E-10, 6.6358E-10, & 6.4395E-10, 6.2462E-10, 6.0559E-10, 5.8684E-10, 5.6840E-10, & 5.5024E-10, 5.3238E-10, 5.1482E-10, 4.9755E-10, 4.8057E-10, & 4.6389E-10, 4.4751E-10, 4.3142E-10, 4.1562E-10, 4.0012E-10, & 3.8491E-10, 3.7000E-10, 3.5538E-10, 3.4105E-10, 3.2702E-10, & 3.1329E-10, 2.9985E-10, 2.8670E-10, 2.7385E-10, 2.6130E-10, & 2.4903E-10, 2.3707E-10, 2.2539E-10, 2.1402E-10, 2.0293E-10, & 1.9214E-10, 1.8165E-10, 1.7145E-10, 1.6155E-10, 1.5194E-10, & 1.4262E-10, 1.3360E-10, 1.2487E-10, 1.1644E-10, 1.0830E-10, & 1.0046E-10, 9.2915E-11, 8.5662E-11, 7.8704E-11, 7.2040E-11, & 6.5672E-11, 5.9597E-11, 5.3818E-11, 4.8333E-11, 4.3143E-11, & 3.8248E-11, 3.3647E-11, 2.9341E-11, 2.5330E-11, 2.1614E-11, & 1.8192E-11, 1.7866E-11, 1.7543E-11, 1.7223E-11, 1.6906E-11, & 1.6591E-11, 1.6280E-11, 1.5972E-11, 1.5666E-11, 1.5364E-11, & 1.5065E-11, 1.4768E-11, 1.4475E-11, 1.4184E-11, 1.3896E-11, & 1.3612E-11, 1.3330E-11, 1.3051E-11, 1.2775E-11, 1.2502E-11/ DATA ((DGT (I,J), I= 601, 700), J=2,2) / & 1.2232E-11, 1.1965E-11, 1.1701E-11, 1.1440E-11, 1.1182E-11, & 1.0926E-11, 1.0674E-11, 1.0425E-11, 1.0178E-11, 9.9349E-12, & 9.6944E-12, 9.4568E-12, 9.2222E-12, 8.9905E-12, 8.7618E-12, & 8.5360E-12, 8.3132E-12, 8.0933E-12, 7.8764E-12, 7.6624E-12, & 7.4514E-12, 7.2433E-12, 7.0381E-12, 6.8359E-12, 6.6367E-12, & 6.4403E-12, 6.2470E-12, 6.0566E-12, 5.8691E-12, 5.6846E-12, & 5.5030E-12, 5.3244E-12, 5.1487E-12, 4.9760E-12, 4.8062E-12, & 4.6394E-12, 4.4755E-12, 4.3145E-12, 4.1565E-12, 4.0015E-12, & 3.8494E-12, 3.7002E-12, 3.5540E-12, 3.4108E-12, 3.2704E-12, & 3.1331E-12, 2.9987E-12, 2.8672E-12, 2.7387E-12, 2.6131E-12, & 2.4905E-12, 2.3708E-12, 2.2540E-12, 2.1402E-12, 2.0294E-12, & 1.9215E-12, 1.8166E-12, 1.7146E-12, 1.6155E-12, 1.5194E-12, & 1.4262E-12, 1.3360E-12, 1.2488E-12, 1.1644E-12, 1.0831E-12, & 1.0046E-12, 9.2916E-13, 8.5663E-13, 7.8705E-13, 7.2041E-13, & 6.5672E-13, 5.9598E-13, 5.3819E-13, 4.8334E-13, 4.3144E-13, & 3.8248E-13, 3.3648E-13, 2.9342E-13, 2.5330E-13, 2.1614E-13, & 1.8192E-13, 1.7866E-13, 1.7543E-13, 1.7223E-13, 1.6906E-13, & 1.6591E-13, 1.6280E-13, 1.5972E-13, 1.5666E-13, 1.5364E-13, & 1.5065E-13, 1.4768E-13, 1.4475E-13, 1.4184E-13, 1.3896E-13, & 1.3612E-13, 1.3330E-13, 1.3051E-13, 1.2775E-13, 1.2502E-13/ DATA ((DGT (I,J), I= 701, 800), J=2,2) / & 1.2232E-13, 1.1965E-13, 1.1701E-13, 1.1440E-13, 1.1182E-13, & 1.0926E-13, 1.0674E-13, 1.0425E-13, 1.0178E-13, 9.9349E-14, & 9.6944E-14, 9.4568E-14, 9.2222E-14, 8.9906E-14, 8.7618E-14, & 8.5360E-14, 8.3132E-14, 8.0933E-14, 7.8764E-14, 7.6624E-14, & 7.4514E-14, 7.2433E-14, 7.0381E-14, 6.8359E-14, 6.6367E-14, & 6.4404E-14, 6.2470E-14, 6.0566E-14, 5.8691E-14, 5.6846E-14, & 5.5030E-14, 5.3244E-14, 5.1487E-14, 4.9760E-14, 4.8062E-14, & 4.6394E-14, 4.4755E-14, 4.3145E-14, 4.1565E-14, 4.0015E-14, & 3.8494E-14, 3.7002E-14, 3.5540E-14, 3.4108E-14, 3.2704E-14, & 3.1331E-14, 2.9987E-14, 2.8672E-14, 2.7387E-14, 2.6131E-14, & 2.4905E-14, 2.3708E-14, 2.2540E-14, 2.1402E-14, 2.0294E-14, & 1.9215E-14, 1.8166E-14, 1.7146E-14, 1.6155E-14, 1.5194E-14, & 1.4262E-14, 1.3360E-14, 1.2488E-14, 1.1644E-14, 1.0831E-14, & 1.0046E-14, 9.2916E-15, 8.5663E-15, 7.8705E-15, 7.2041E-15, & 6.5672E-15, 5.9598E-15, 5.3819E-15, 4.8334E-15, 4.3144E-15, & 3.8248E-15, 3.3648E-15, 2.9342E-15, 2.5330E-15, 2.1614E-15, & 1.8192E-15, 1.7866E-15, 1.7543E-15, 1.7223E-15, 1.6906E-15, & 1.6591E-15, 1.6280E-15, 1.5972E-15, 1.5666E-15, 1.5364E-15, & 1.5065E-15, 1.4768E-15, 1.4475E-15, 1.4184E-15, 1.3896E-15, & 1.3612E-15, 1.3330E-15, 1.3051E-15, 1.2775E-15, 1.2502E-15/ DATA ((DGT (I,J), I= 801, 900), J=2,2) / & 1.2232E-15, 1.1965E-15, 1.1701E-15, 1.1440E-15, 1.1182E-15, & 1.0926E-15, 1.0674E-15, 1.0425E-15, 1.0178E-15, 9.9349E-16, & 9.6944E-16, 9.4568E-16, 9.2222E-16, 8.9906E-16, 8.7618E-16, & 8.5360E-16, 8.3132E-16, 8.0933E-16, 7.8764E-16, 7.6624E-16, & 7.4514E-16, 7.2433E-16, 7.0381E-16, 6.8359E-16, 6.6367E-16, & 6.4404E-16, 6.2470E-16, 6.0566E-16, 5.8691E-16, 5.6846E-16, & 5.5030E-16, 5.3244E-16, 5.1487E-16, 4.9760E-16, 4.8062E-16, & 4.6394E-16, 4.4755E-16, 4.3145E-16, 4.1565E-16, 4.0015E-16, & 3.8494E-16, 3.7002E-16, 3.5540E-16, 3.4108E-16, 3.2705E-16, & 3.1331E-16, 2.9987E-16, 2.8672E-16, 2.7387E-16, 2.6131E-16, & 2.4905E-16, 2.3708E-16, 2.2540E-16, 2.1402E-16, 2.0294E-16, & 1.9215E-16, 1.8166E-16, 1.7146E-16, 1.6155E-16, 1.5194E-16, & 1.4262E-16, 1.3360E-16, 1.2488E-16, 1.1644E-16, 1.0831E-16, & 1.0046E-16, 9.2916E-17, 8.5663E-17, 7.8705E-17, 7.2041E-17, & 6.5672E-17, 5.9598E-17, 5.3819E-17, 4.8334E-17, 4.3144E-17, & 3.8248E-17, 3.3648E-17, 2.9342E-17, 2.5330E-17, 2.1614E-17, & 1.8192E-17, 0.0000E+00, 1.8192E-17, 1.6384E-10, 6.5521E-10, & 1.4743E-09, 2.6210E-09, 4.0965E-09, 5.9010E-09, 8.0353E-09, & 1.0500E-08, 1.3297E-08, 1.6426E-08, 1.9889E-08, 2.3687E-08, & 2.7822E-08, 3.2295E-08, 3.7109E-08, 4.2265E-08, 4.7765E-08/ DATA ((DGT (I,J), I= 901, 979), J=2,2) / & 5.3611E-08, 5.9806E-08, 6.6353E-08, 7.3253E-08, 8.0511E-08, & 8.8129E-08, 9.6109E-08, 1.0446E-07, 1.1317E-07, 1.2227E-07, & 1.3174E-07, 1.4159E-07, 1.5183E-07, 1.6245E-07, 1.7348E-07, & 1.8491E-07, 1.9674E-07, 2.0898E-07, 2.2165E-07, 2.3473E-07, & 2.4825E-07, 2.6220E-07, 2.7660E-07, 2.9145E-07, 3.0676E-07, & 3.2254E-07, 3.3879E-07, 3.5553E-07, 3.7277E-07, 3.9050E-07, & 4.0876E-07, 4.2754E-07, 4.4685E-07, 4.6672E-07, 4.8714E-07, & 5.0815E-07, 5.2974E-07, 5.5194E-07, 5.7475E-07, 5.9821E-07, & 6.2232E-07, 6.4710E-07, 6.7258E-07, 6.9877E-07, 7.2570E-07, & 7.5339E-07, 7.8187E-07, 8.1117E-07, 8.4131E-07, 8.7232E-07, & 9.0425E-07, 9.3712E-07, 9.7098E-07, 1.0059E-06, 1.0418E-06, & 1.0789E-06, 1.1172E-06, 1.1568E-06, 1.1976E-06, 1.2399E-06, & 1.2836E-06, 1.3289E-06, 1.3759E-06, 1.4246E-06, 1.4754E-06, & 1.5282E-06, 1.5833E-06, 1.6408E-06, 1.7012E-06, 1.7645E-06, & 1.8313E-06, 1.9018E-06, 1.9768E-06, 2.0029E-06, 2.0568E-06, & 2.07629856E-06, 2.14280767E-06, 2.15178244E-06, 2.17301159E-06/ DATA ((DGT (I,J), I= 1, 100), J=3,3) / & 2.1909E-04, 2.1908E-04, 2.1908E-04, 2.1908E-04, 2.1908E-04, & 2.1908E-04, 2.1908E-04, 2.1908E-04, 2.1908E-04, 2.1908E-04, & 2.1907E-04, 2.1907E-04, 2.1907E-04, 2.1907E-04, 2.1907E-04, & 2.1907E-04, 2.1907E-04, 2.1907E-04, 2.1906E-04, 2.1906E-04, & 2.1906E-04, 2.1906E-04, 2.1906E-04, 2.1906E-04, 2.1906E-04, & 2.1905E-04, 2.1905E-04, 2.1905E-04, 2.1905E-04, 2.1905E-04, & 2.1905E-04, 2.1904E-04, 2.1904E-04, 2.1904E-04, 2.1904E-04, & 2.1904E-04, 2.1903E-04, 2.1903E-04, 2.1903E-04, 2.1903E-04, & 2.1903E-04, 2.1902E-04, 2.1902E-04, 2.1902E-04, 2.1902E-04, & 2.1901E-04, 2.1901E-04, 2.1901E-04, 2.1901E-04, 2.1900E-04, & 2.1900E-04, 2.1900E-04, 2.1899E-04, 2.1899E-04, 2.1899E-04, & 2.1898E-04, 2.1898E-04, 2.1898E-04, 2.1897E-04, 2.1897E-04, & 2.1896E-04, 2.1896E-04, 2.1895E-04, 2.1895E-04, 2.1894E-04, & 2.1894E-04, 2.1893E-04, 2.1893E-04, 2.1892E-04, 2.1891E-04, & 2.1890E-04, 2.1889E-04, 2.1889E-04, 2.1888E-04, 2.1886E-04, & 2.1885E-04, 2.1884E-04, 2.1883E-04, 2.1881E-04, 2.1879E-04, & 2.1877E-04, 2.1875E-04, 2.1873E-04, 2.1870E-04, 2.1866E-04, & 2.1862E-04, 2.1858E-04, 2.1852E-04, 2.1845E-04, 2.1836E-04, & 2.1825E-04, 2.1823E-04, 2.1822E-04, 2.1821E-04, 2.1819E-04, & 2.1818E-04, 2.1816E-04, 2.1815E-04, 2.1813E-04, 2.1812E-04/ DATA ((DGT (I,J), I= 101, 200), J=3,3) / & 2.1810E-04, 2.1808E-04, 2.1806E-04, 2.1804E-04, 2.1802E-04, & 2.1800E-04, 2.1798E-04, 2.1796E-04, 2.1794E-04, 2.1792E-04, & 2.1789E-04, 2.1787E-04, 2.1784E-04, 2.1782E-04, 2.1779E-04, & 2.1776E-04, 2.1773E-04, 2.1770E-04, 2.1767E-04, 2.1763E-04, & 2.1760E-04, 2.1756E-04, 2.1753E-04, 2.1749E-04, 2.1745E-04, & 2.1740E-04, 2.1736E-04, 2.1731E-04, 2.1726E-04, 2.1721E-04, & 2.1716E-04, 2.1710E-04, 2.1705E-04, 2.1698E-04, 2.1692E-04, & 2.1685E-04, 2.1678E-04, 2.1671E-04, 2.1663E-04, 2.1654E-04, & 2.1645E-04, 2.1636E-04, 2.1626E-04, 2.1616E-04, 2.1604E-04, & 2.1593E-04, 2.1580E-04, 2.1566E-04, 2.1552E-04, 2.1537E-04, & 2.1520E-04, 2.1503E-04, 2.1484E-04, 2.1464E-04, 2.1442E-04, & 2.1419E-04, 2.1393E-04, 2.1366E-04, 2.1336E-04, 2.1304E-04, & 2.1269E-04, 2.1230E-04, 2.1188E-04, 2.1142E-04, 2.1091E-04, & 2.1035E-04, 2.0973E-04, 2.0905E-04, 2.0828E-04, 2.0743E-04, & 2.0647E-04, 2.0540E-04, 2.0418E-04, 2.0280E-04, 2.0122E-04, & 1.9941E-04, 1.9733E-04, 1.9491E-04, 1.9207E-04, 1.8872E-04, & 1.8473E-04, 1.8433E-04, 1.8393E-04, 1.8352E-04, 1.8310E-04, & 1.8267E-04, 1.8224E-04, 1.8180E-04, 1.8136E-04, 1.8090E-04, & 1.8044E-04, 1.7997E-04, 1.7949E-04, 1.7900E-04, 1.7850E-04, & 1.7799E-04, 1.7748E-04, 1.7695E-04, 1.7641E-04, 1.7587E-04/ DATA ((DGT (I,J), I= 201, 300), J=3,3) / & 1.7531E-04, 1.7475E-04, 1.7417E-04, 1.7358E-04, 1.7298E-04, & 1.7237E-04, 1.7175E-04, 1.7111E-04, 1.7046E-04, 1.6980E-04, & 1.6913E-04, 1.6844E-04, 1.6774E-04, 1.6703E-04, 1.6630E-04, & 1.6555E-04, 1.6480E-04, 1.6402E-04, 1.6323E-04, 1.6242E-04, & 1.6160E-04, 1.6076E-04, 1.5990E-04, 1.5903E-04, 1.5813E-04, & 1.5722E-04, 1.5629E-04, 1.5534E-04, 1.5437E-04, 1.5337E-04, & 1.5236E-04, 1.5133E-04, 1.5027E-04, 1.4919E-04, 1.4809E-04, & 1.4697E-04, 1.4582E-04, 1.4465E-04, 1.4345E-04, 1.4222E-04, & 1.4098E-04, 1.3970E-04, 1.3839E-04, 1.3706E-04, 1.3570E-04, & 1.3431E-04, 1.3289E-04, 1.3144E-04, 1.2995E-04, 1.2844E-04, & 1.2688E-04, 1.2530E-04, 1.2367E-04, 1.2201E-04, 1.2030E-04, & 1.1856E-04, 1.1677E-04, 1.1493E-04, 1.1304E-04, 1.1110E-04, & 1.0910E-04, 1.0705E-04, 1.0492E-04, 1.0273E-04, 1.0047E-04, & 9.8123E-05, 9.5691E-05, 9.3165E-05, 9.0537E-05, 8.7800E-05, & 8.4943E-05, 8.1959E-05, 7.8836E-05, 7.5565E-05, 7.2135E-05, & 6.8535E-05, 6.4755E-05, 6.0785E-05, 5.6618E-05, 5.2247E-05, & 4.7669E-05, 4.7200E-05, 4.6728E-05, 4.6255E-05, 4.5780E-05, & 4.5303E-05, 4.4823E-05, 4.4342E-05, 4.3859E-05, 4.3374E-05, & 4.2887E-05, 4.2398E-05, 4.1907E-05, 4.1414E-05, 4.0919E-05, & 4.0422E-05, 3.9924E-05, 3.9423E-05, 3.8921E-05, 3.8418E-05/ DATA ((DGT (I,J), I= 301, 400), J=3,3) / & 3.7912E-05, 3.7405E-05, 3.6896E-05, 3.6385E-05, 3.5873E-05, & 3.5359E-05, 3.4844E-05, 3.4327E-05, 3.3809E-05, 3.3289E-05, & 3.2769E-05, 3.2246E-05, 3.1723E-05, 3.1199E-05, 3.0673E-05, & 3.0146E-05, 2.9619E-05, 2.9090E-05, 2.8561E-05, 2.8031E-05, & 2.7500E-05, 2.6969E-05, 2.6438E-05, 2.5906E-05, 2.5373E-05, & 2.4841E-05, 2.4309E-05, 2.3776E-05, 2.3244E-05, 2.2712E-05, & 2.2181E-05, 2.1650E-05, 2.1120E-05, 2.0591E-05, 2.0063E-05, & 1.9536E-05, 1.9010E-05, 1.8486E-05, 1.7964E-05, 1.7443E-05, & 1.6925E-05, 1.6409E-05, 1.5895E-05, 1.5385E-05, 1.4877E-05, & 1.4372E-05, 1.3871E-05, 1.3373E-05, 1.2879E-05, 1.2390E-05, & 1.1905E-05, 1.1424E-05, 1.0949E-05, 1.0479E-05, 1.0014E-05, & 9.5555E-06, 9.1031E-06, 8.6572E-06, 8.2183E-06, 7.7865E-06, & 7.3624E-06, 6.9461E-06, 6.5382E-06, 6.1389E-06, 5.7486E-06, & 5.3678E-06, 4.9967E-06, 4.6358E-06, 4.2855E-06, 3.9462E-06, & 3.6183E-06, 3.3021E-06, 2.9980E-06, 2.7065E-06, 2.4280E-06, & 2.1628E-06, 1.9113E-06, 1.6739E-06, 1.4509E-06, 1.2427E-06, & 1.0497E-06, 1.0312E-06, 1.0129E-06, 9.9476E-07, 9.7676E-07, & 9.5892E-07, 9.4124E-07, 9.2371E-07, 9.0634E-07, 8.8912E-07, & 8.7207E-07, 8.5517E-07, 8.3843E-07, 8.2184E-07, 8.0542E-07, & 7.8915E-07, 7.7305E-07, 7.5710E-07, 7.4131E-07, 7.2568E-07/ DATA ((DGT (I,J), I= 401, 500), J=3,3) / & 7.1021E-07, 6.9490E-07, 6.7975E-07, 6.6477E-07, 6.4994E-07, & 6.3527E-07, 6.2077E-07, 6.0643E-07, 5.9225E-07, 5.7823E-07, & 5.6438E-07, 5.5069E-07, 5.3716E-07, 5.2379E-07, 5.1059E-07, & 4.9756E-07, 4.8468E-07, 4.7197E-07, 4.5943E-07, 4.4705E-07, & 4.3483E-07, 4.2278E-07, 4.1090E-07, 3.9918E-07, 3.8763E-07, & 3.7624E-07, 3.6502E-07, 3.5397E-07, 3.4308E-07, 3.3236E-07, & 3.2181E-07, 3.1142E-07, 3.0120E-07, 2.9115E-07, 2.8127E-07, & 2.7156E-07, 2.6201E-07, 2.5263E-07, 2.4342E-07, 2.3438E-07, & 2.2551E-07, 2.1681E-07, 2.0827E-07, 1.9991E-07, 1.9171E-07, & 1.8369E-07, 1.7583E-07, 1.6815E-07, 1.6063E-07, 1.5329E-07, & 1.4611E-07, 1.3911E-07, 1.3228E-07, 1.2561E-07, 1.1912E-07, & 1.1280E-07, 1.0665E-07, 1.0068E-07, 9.4871E-08, 8.9236E-08, & 8.3773E-08, 7.8482E-08, 7.3363E-08, 6.8415E-08, 6.3640E-08, & 5.9037E-08, 5.4606E-08, 5.0348E-08, 4.6261E-08, 4.2348E-08, & 3.8607E-08, 3.5038E-08, 3.1642E-08, 2.8419E-08, 2.5369E-08, & 2.2492E-08, 1.9787E-08, 1.7256E-08, 1.4897E-08, 1.2712E-08, & 1.0700E-08, 1.0508E-08, 1.0318E-08, 1.0130E-08, 9.9435E-09, & 9.7587E-09, 9.5757E-09, 9.3944E-09, 9.2148E-09, 9.0370E-09, & 8.8609E-09, 8.6865E-09, 8.5139E-09, 8.3430E-09, 8.1738E-09, & 8.0063E-09, 7.8406E-09, 7.6766E-09, 7.5144E-09, 7.3539E-09/ DATA ((DGT (I,J), I= 501, 600), J=3,3) / & 7.1951E-09, 7.0380E-09, 6.8827E-09, 6.7291E-09, 6.5773E-09, & 6.4271E-09, 6.2787E-09, 6.1321E-09, 5.9872E-09, 5.8440E-09, & 5.7025E-09, 5.5628E-09, 5.4248E-09, 5.2885E-09, 5.1540E-09, & 5.0212E-09, 4.8901E-09, 4.7608E-09, 4.6332E-09, 4.5073E-09, & 4.3832E-09, 4.2608E-09, 4.1401E-09, 4.0212E-09, 3.9040E-09, & 3.7885E-09, 3.6748E-09, 3.5628E-09, 3.4525E-09, 3.3440E-09, & 3.2372E-09, 3.1321E-09, 3.0288E-09, 2.9272E-09, 2.8273E-09, & 2.7291E-09, 2.6327E-09, 2.5381E-09, 2.4451E-09, 2.3539E-09, & 2.2645E-09, 2.1767E-09, 2.0907E-09, 2.0064E-09, 1.9239E-09, & 1.8431E-09, 1.7640E-09, 1.6867E-09, 1.6111E-09, 1.5372E-09, & 1.4651E-09, 1.3947E-09, 1.3260E-09, 1.2591E-09, 1.1938E-09, & 1.1304E-09, 1.0686E-09, 1.0086E-09, 9.5037E-10, 8.9383E-10, & 8.3903E-10, 7.8596E-10, 7.3462E-10, 6.8502E-10, 6.3715E-10, & 5.9101E-10, 5.4661E-10, 5.0394E-10, 4.6301E-10, 4.2381E-10, & 3.8634E-10, 3.5061E-10, 3.1661E-10, 2.8434E-10, 2.5381E-10, & 2.2501E-10, 1.9794E-10, 1.7261E-10, 1.4901E-10, 1.2715E-10, & 1.0702E-10, 1.0510E-10, 1.0320E-10, 1.0132E-10, 9.9453E-11, & 9.7605E-11, 9.5774E-11, 9.3960E-11, 9.2164E-11, 9.0385E-11, & 8.8623E-11, 8.6879E-11, 8.5152E-11, 8.3442E-11, 8.1750E-11, & 8.0075E-11, 7.8417E-11, 7.6777E-11, 7.5154E-11, 7.3549E-11/ DATA ((DGT (I,J), I= 601, 700), J=3,3) / & 7.1960E-11, 7.0389E-11, 6.8836E-11, 6.7299E-11, 6.5781E-11, & 6.4279E-11, 6.2795E-11, 6.1328E-11, 5.9878E-11, 5.8446E-11, & 5.7031E-11, 5.5633E-11, 5.4253E-11, 5.2890E-11, 5.1545E-11, & 5.0216E-11, 4.8906E-11, 4.7612E-11, 4.6336E-11, 4.5077E-11, & 4.3835E-11, 4.2611E-11, 4.1404E-11, 4.0215E-11, 3.9043E-11, & 3.7888E-11, 3.6750E-11, 3.5630E-11, 3.4527E-11, 3.3442E-11, & 3.2374E-11, 3.1323E-11, 3.0289E-11, 2.9273E-11, 2.8274E-11, & 2.7293E-11, 2.6329E-11, 2.5382E-11, 2.4452E-11, 2.3540E-11, & 2.2645E-11, 2.1768E-11, 2.0908E-11, 2.0065E-11, 1.9240E-11, & 1.8432E-11, 1.7641E-11, 1.6867E-11, 1.6111E-11, 1.5372E-11, & 1.4651E-11, 1.3947E-11, 1.3260E-11, 1.2591E-11, 1.1939E-11, & 1.1304E-11, 1.0687E-11, 1.0087E-11, 9.5038E-12, 8.9384E-12, & 8.3904E-12, 7.8597E-12, 7.3463E-12, 6.8503E-12, 6.3716E-12, & 5.9102E-12, 5.4662E-12, 5.0395E-12, 4.6301E-12, 4.2381E-12, & 3.8634E-12, 3.5061E-12, 3.1661E-12, 2.8434E-12, 2.5381E-12, & 2.2501E-12, 1.9794E-12, 1.7261E-12, 1.4901E-12, 1.2715E-12, & 1.0702E-12, 1.0510E-12, 1.0320E-12, 1.0132E-12, 9.9453E-13, & 9.7605E-13, 9.5774E-13, 9.3960E-13, 9.2164E-13, 9.0385E-13, & 8.8623E-13, 8.6879E-13, 8.5152E-13, 8.3442E-13, 8.1750E-13, & 8.0075E-13, 7.8418E-13, 7.6777E-13, 7.5154E-13, 7.3549E-13/ DATA ((DGT (I,J), I= 701, 800), J=3,3) / & 7.1960E-13, 7.0389E-13, 6.8836E-13, 6.7300E-13, 6.5781E-13, & 6.4279E-13, 6.2795E-13, 6.1328E-13, 5.9878E-13, 5.8446E-13, & 5.7031E-13, 5.5633E-13, 5.4253E-13, 5.2890E-13, 5.1545E-13, & 5.0217E-13, 4.8906E-13, 4.7612E-13, 4.6336E-13, 4.5077E-13, & 4.3835E-13, 4.2611E-13, 4.1404E-13, 4.0215E-13, 3.9043E-13, & 3.7888E-13, 3.6750E-13, 3.5630E-13, 3.4527E-13, 3.3442E-13, & 3.2374E-13, 3.1323E-13, 3.0289E-13, 2.9273E-13, 2.8274E-13, & 2.7293E-13, 2.6329E-13, 2.5382E-13, 2.4452E-13, 2.3540E-13, & 2.2645E-13, 2.1768E-13, 2.0908E-13, 2.0065E-13, 1.9240E-13, & 1.8432E-13, 1.7641E-13, 1.6867E-13, 1.6111E-13, 1.5372E-13, & 1.4651E-13, 1.3947E-13, 1.3260E-13, 1.2591E-13, 1.1939E-13, & 1.1304E-13, 1.0687E-13, 1.0087E-13, 9.5038E-14, 8.9384E-14, & 8.3904E-14, 7.8597E-14, 7.3463E-14, 6.8503E-14, 6.3716E-14, & 5.9102E-14, 5.4662E-14, 5.0395E-14, 4.6301E-14, 4.2381E-14, & 3.8634E-14, 3.5061E-14, 3.1661E-14, 2.8434E-14, 2.5381E-14, & 2.2501E-14, 1.9794E-14, 1.7261E-14, 1.4901E-14, 1.2715E-14, & 1.0702E-14, 1.0510E-14, 1.0320E-14, 1.0132E-14, 9.9453E-15, & 9.7605E-15, 9.5774E-15, 9.3960E-15, 9.2164E-15, 9.0385E-15, & 8.8623E-15, 8.6879E-15, 8.5152E-15, 8.3442E-15, 8.1750E-15, & 8.0075E-15, 7.8418E-15, 7.6777E-15, 7.5154E-15, 7.3549E-15/ DATA ((DGT (I,J), I= 801, 900), J=3,3) / & 7.1960E-15, 7.0389E-15, 6.8836E-15, 6.7300E-15, 6.5781E-15, & 6.4279E-15, 6.2795E-15, 6.1328E-15, 5.9878E-15, 5.8446E-15, & 5.7031E-15, 5.5633E-15, 5.4253E-15, 5.2890E-15, 5.1545E-15, & 5.0217E-15, 4.8906E-15, 4.7612E-15, 4.6336E-15, 4.5077E-15, & 4.3835E-15, 4.2611E-15, 4.1404E-15, 4.0215E-15, 3.9043E-15, & 3.7888E-15, 3.6750E-15, 3.5630E-15, 3.4527E-15, 3.3442E-15, & 3.2374E-15, 3.1323E-15, 3.0289E-15, 2.9273E-15, 2.8274E-15, & 2.7293E-15, 2.6329E-15, 2.5382E-15, 2.4452E-15, 2.3540E-15, & 2.2645E-15, 2.1768E-15, 2.0908E-15, 2.0065E-15, 1.9240E-15, & 1.8432E-15, 1.7641E-15, 1.6867E-15, 1.6111E-15, 1.5372E-15, & 1.4651E-15, 1.3947E-15, 1.3260E-15, 1.2591E-15, 1.1939E-15, & 1.1304E-15, 1.0687E-15, 1.0087E-15, 9.5038E-16, 8.9384E-16, & 8.3904E-16, 7.8597E-16, 7.3463E-16, 6.8503E-16, 6.3716E-16, & 5.9102E-16, 5.4662E-16, 5.0395E-16, 4.6301E-16, 4.2381E-16, & 3.8634E-16, 3.5061E-16, 3.1661E-16, 2.8434E-16, 2.5381E-16, & 2.2501E-16, 1.9794E-16, 1.7261E-16, 1.4901E-16, 1.2715E-16, & 1.0702E-16, 0.0000E+00, 1.0702E-16, 9.6384E-10, 3.8543E-09, & 8.6720E-09, 1.5415E-08, 2.4090E-08, 3.4697E-08, 4.7237E-08, & 6.1715E-08, 7.8131E-08, 9.6491E-08, 1.1680E-07, 1.3906E-07, & 1.6327E-07, 1.8945E-07, 2.1760E-07, 2.4772E-07, 2.7982E-07/ DATA ((DGT (I,J), I= 901, 979), J=3,3) / & 3.1390E-07, 3.4999E-07, 3.8807E-07, 4.2817E-07, 4.7030E-07, & 5.1445E-07, 5.6064E-07, 6.0889E-07, 6.5920E-07, 7.1158E-07, & 7.6605E-07, 8.2263E-07, 8.8131E-07, 9.4213E-07, 1.0051E-06, & 1.0702E-06, 1.1375E-06, 1.2070E-06, 1.2787E-06, 1.3526E-06, & 1.4288E-06, 1.5073E-06, 1.5880E-06, 1.6711E-06, 1.7565E-06, & 1.8442E-06, 1.9343E-06, 2.0269E-06, 2.1219E-06, 2.2193E-06, & 2.3193E-06, 2.4218E-06, 2.5268E-06, 2.6345E-06, 2.7447E-06, & 2.8577E-06, 2.9733E-06, 3.0917E-06, 3.2129E-06, 3.3369E-06, & 3.4638E-06, 3.5936E-06, 3.7264E-06, 3.8623E-06, 4.0012E-06, & 4.1433E-06, 4.2886E-06, 4.4372E-06, 4.5892E-06, 4.7446E-06, & 4.9035E-06, 5.0660E-06, 5.2322E-06, 5.4022E-06, 5.5760E-06, & 5.7539E-06, 5.9359E-06, 6.1221E-06, 6.3127E-06, 6.5079E-06, & 6.7077E-06, 6.9124E-06, 7.1221E-06, 7.3371E-06, 7.5576E-06, & 7.7839E-06, 8.0161E-06, 8.2547E-06, 8.4999E-06, 8.7522E-06, & 9.0120E-06, 9.2798E-06, 9.5561E-06, 9.6502E-06, 9.8417E-06, & 9.90971019E-06, 1.01372151E-05, 1.01673539E-05, 1.02381010E-05/ save RETURN END c ++++ dalhadthigh26 ++++ c update 05/28/26 subroutine dalhad_spacelike1h26x IMPLICIT NONE INTEGER NC,I,J PARAMETER(NC=200) REAL XXX(NC),YGG(NC,3),Y3G(NC,3) COMMON /DATH26x/XXX,YGG,Y3G c****************************************************************************** c* * c* --- intRdatx --- Thu May 28 16:59:12 2026 * c* * c***************************# FJ@HU Berlin #*********************************** c "Delta alpha" Update version (24/02/2026) c ISCAN: -2, Ismooth: 0, IGS: 0, DSET: EPM2, 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.1880, MTOP: 172.40 c NF,IOR,ICHK: 5,4,2,ISU2: 0,NFL: 5,INAG: 1,inotail: 0, sin2W_ref: 0.23153 c CHPTCUT,EC,ECUT: 0.3180, 5.20, 11.50, sin2W_eff: 0.23153, s2W_ref/eff: 1.000 c iintRd,IUNMIX,iomegaphidat,iresonances,IRESON:1, 1, 3, 1, 1 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.7136E-02, 5.7050E-02, 5.6964E-02, 5.6877E-02, 5.6791E-02, & 5.6704E-02, 5.6618E-02, 5.6531E-02, 5.6445E-02, 5.6359E-02, & 5.6273E-02, 5.6186E-02, 5.6100E-02, 5.6014E-02, 5.5928E-02, & 5.5841E-02, 5.5755E-02, 5.5669E-02, 5.5583E-02, 5.5497E-02, & 5.5411E-02, 5.5325E-02, 5.5239E-02, 5.5153E-02, 5.5067E-02, & 5.4981E-02, 5.4896E-02, 5.4810E-02, 5.4724E-02, 5.4638E-02, & 5.4553E-02, 5.4467E-02, 5.4382E-02, 5.4296E-02, 5.4210E-02, & 5.4125E-02, 5.4040E-02, 5.3954E-02, 5.3869E-02, 5.3784E-02, & 5.3698E-02, 5.3613E-02, 5.3528E-02, 5.3443E-02, 5.3358E-02, & 5.3273E-02, 5.3188E-02, 5.3103E-02, 5.3018E-02, 5.2933E-02, & 5.2848E-02, 5.2764E-02, 5.2679E-02, 5.2595E-02, 5.2510E-02, & 5.2426E-02, 5.2341E-02, 5.2257E-02, 5.2173E-02, 5.2088E-02, & 5.2004E-02, 5.1920E-02, 5.1836E-02, 5.1752E-02, 5.1668E-02, & 5.1585E-02, 5.1501E-02, 5.1417E-02, 5.1334E-02, 5.1250E-02, & 5.1167E-02, 5.1083E-02, 5.1000E-02, 5.0917E-02, 5.0834E-02, & 5.0751E-02, 5.0668E-02, 5.0585E-02, 5.0502E-02, 5.0419E-02, & 5.0337E-02, 5.0254E-02, 5.0172E-02, 5.0090E-02, 5.0007E-02, & 4.9925E-02, 4.9843E-02, 4.9761E-02, 4.9679E-02, 4.9597E-02, & 4.9516E-02, 4.9434E-02, 4.9353E-02, 4.9271E-02, 4.9190E-02, & 4.9109E-02, 4.9028E-02, 4.8947E-02, 4.8866E-02, 4.8785E-02/ DATA ((YGG (I,J), I= 101, 200), J=1,1) / & 4.8704E-02, 4.8624E-02, 4.8543E-02, 4.8463E-02, 4.8383E-02, & 4.8303E-02, 4.8223E-02, 4.8143E-02, 4.8063E-02, 4.7983E-02, & 4.7904E-02, 4.7824E-02, 4.7745E-02, 4.7666E-02, 4.7586E-02, & 4.7507E-02, 4.7428E-02, 4.7350E-02, 4.7271E-02, 4.7192E-02, & 4.7114E-02, 4.7035E-02, 4.6957E-02, 4.6879E-02, 4.6801E-02, & 4.6723E-02, 4.6645E-02, 4.6567E-02, 4.6490E-02, 4.6412E-02, & 4.6335E-02, 4.6258E-02, 4.6180E-02, 4.6103E-02, 4.6026E-02, & 4.5949E-02, 4.5872E-02, 4.5796E-02, 4.5719E-02, 4.5642E-02, & 4.5566E-02, 4.5490E-02, 4.5413E-02, 4.5337E-02, 4.5261E-02, & 4.5185E-02, 4.5109E-02, 4.5033E-02, 4.4957E-02, 4.4881E-02, & 4.4806E-02, 4.4730E-02, 4.4654E-02, 4.4579E-02, 4.4503E-02, & 4.4428E-02, 4.4352E-02, 4.4277E-02, 4.4202E-02, 4.4126E-02, & 4.4051E-02, 4.3976E-02, 4.3901E-02, 4.3826E-02, 4.3750E-02, & 4.3675E-02, 4.3600E-02, 4.3525E-02, 4.3450E-02, 4.3375E-02, & 4.3300E-02, 4.3225E-02, 4.3149E-02, 4.3074E-02, 4.2999E-02, & 4.2924E-02, 4.2848E-02, 4.2773E-02, 4.2698E-02, 4.2622E-02, & 4.2547E-02, 4.2472E-02, 4.2396E-02, 4.2320E-02, 4.2245E-02, & 4.2169E-02, 4.2093E-02, 4.2017E-02, 4.1942E-02, 4.1866E-02, & 4.1789E-02, 4.1713E-02, 4.1637E-02, 4.1561E-02, 4.1484E-02, & 4.1408E-02, 4.1331E-02, 4.1254E-02, 4.1177E-02, 4.1100E-02/ DATA ((YGG (I,J), I= 1, 100), J=2,2) / & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05/ DATA ((YGG (I,J), I= 101, 200), J=2,2) / & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05/ DATA ((YGG (I,J), I= 1, 100), J=3,3) / & 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, & 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, & 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, & 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, & 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3510E-04, 1.3509E-04, & 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, & 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, & 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, & 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, & 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, 1.3509E-04, & 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, & 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, & 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, & 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, & 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, 1.3508E-04, & 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, & 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, & 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, & 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, & 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04, 1.3507E-04/ DATA ((YGG (I,J), I= 101, 200), J=3,3) / & 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, & 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, & 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, & 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, & 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3506E-04, 1.3505E-04, & 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3505E-04, & 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3505E-04, & 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3505E-04, & 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3505E-04, & 1.3505E-04, 1.3505E-04, 1.3505E-04, 1.3504E-04, 1.3504E-04, & 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, & 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, & 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, & 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, & 1.3504E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04/ c ++++ deghadthigh26 ++++ c update 05/28/26 c****************************************************************************** c* * c* --- intRdatx --- Thu May 28 17:01:35 2026 * c* * c***************************# FJ@HU Berlin #*********************************** c "Delta alpha" Update version (24/02/2026) c ISCAN: -2, Ismooth: 0, IGS: 0, DSET: EPM2, 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.1880, MTOP: 172.40 c NF,IOR,ICHK: 5,4,2,ISU2: 2,NFL: 5,INAG: 1,inotail: 0, sin2W_ref: 0.23153 c CHPTCUT,EC,ECUT: 0.3180, 5.20, 11.50, sin2W_eff: 0.23153, s2W_ref/eff: 1.000 c iintRd,IUNMIX,iomegaphidat,iresonances,IRESON:1, 1, 3, 1, 1 DATA ((Y3G (I,J), I= 1, 100), J=1,1) / & 1.1692E-01, 1.1674E-01, 1.1656E-01, 1.1639E-01, 1.1621E-01, & 1.1603E-01, 1.1585E-01, 1.1567E-01, 1.1550E-01, 1.1532E-01, & 1.1514E-01, 1.1496E-01, 1.1478E-01, 1.1461E-01, 1.1443E-01, & 1.1425E-01, 1.1407E-01, 1.1390E-01, 1.1372E-01, 1.1354E-01, & 1.1336E-01, 1.1319E-01, 1.1301E-01, 1.1283E-01, 1.1266E-01, & 1.1248E-01, 1.1230E-01, 1.1212E-01, 1.1195E-01, 1.1177E-01, & 1.1159E-01, 1.1142E-01, 1.1124E-01, 1.1106E-01, 1.1089E-01, & 1.1071E-01, 1.1054E-01, 1.1036E-01, 1.1018E-01, 1.1001E-01, & 1.0983E-01, 1.0966E-01, 1.0948E-01, 1.0931E-01, 1.0913E-01, & 1.0896E-01, 1.0878E-01, 1.0861E-01, 1.0843E-01, 1.0826E-01, & 1.0808E-01, 1.0791E-01, 1.0773E-01, 1.0756E-01, 1.0738E-01, & 1.0721E-01, 1.0704E-01, 1.0686E-01, 1.0669E-01, 1.0651E-01, & 1.0634E-01, 1.0617E-01, 1.0599E-01, 1.0582E-01, 1.0565E-01, & 1.0548E-01, 1.0530E-01, 1.0513E-01, 1.0496E-01, 1.0479E-01, & 1.0461E-01, 1.0444E-01, 1.0427E-01, 1.0410E-01, 1.0393E-01, & 1.0376E-01, 1.0359E-01, 1.0341E-01, 1.0324E-01, 1.0307E-01, & 1.0290E-01, 1.0273E-01, 1.0256E-01, 1.0239E-01, 1.0222E-01, & 1.0205E-01, 1.0189E-01, 1.0172E-01, 1.0155E-01, 1.0138E-01, & 1.0121E-01, 1.0104E-01, 1.0087E-01, 1.0071E-01, 1.0054E-01, & 1.0037E-01, 1.0020E-01, 1.0004E-01, 9.9871E-02, 9.9705E-02/ DATA ((Y3G (I,J), I= 101, 200), J=1,1) / & 9.9538E-02, 9.9372E-02, 9.9206E-02, 9.9041E-02, 9.8875E-02, & 9.8710E-02, 9.8545E-02, 9.8380E-02, 9.8216E-02, 9.8052E-02, & 9.7887E-02, 9.7724E-02, 9.7560E-02, 9.7397E-02, 9.7233E-02, & 9.7070E-02, 9.6908E-02, 9.6745E-02, 9.6583E-02, 9.6421E-02, & 9.6259E-02, 9.6098E-02, 9.5936E-02, 9.5775E-02, 9.5614E-02, & 9.5454E-02, 9.5293E-02, 9.5133E-02, 9.4973E-02, 9.4813E-02, & 9.4653E-02, 9.4494E-02, 9.4335E-02, 9.4176E-02, 9.4017E-02, & 9.3858E-02, 9.3700E-02, 9.3542E-02, 9.3384E-02, 9.3226E-02, & 9.3068E-02, 9.2911E-02, 9.2754E-02, 9.2596E-02, 9.2439E-02, & 9.2283E-02, 9.2126E-02, 9.1969E-02, 9.1813E-02, 9.1657E-02, & 9.1501E-02, 9.1345E-02, 9.1189E-02, 9.1033E-02, 9.0878E-02, & 9.0722E-02, 9.0567E-02, 9.0411E-02, 9.0256E-02, 9.0101E-02, & 8.9946E-02, 8.9791E-02, 8.9636E-02, 8.9481E-02, 8.9326E-02, & 8.9171E-02, 8.9016E-02, 8.8861E-02, 8.8706E-02, 8.8551E-02, & 8.8396E-02, 8.8241E-02, 8.8087E-02, 8.7932E-02, 8.7777E-02, & 8.7621E-02, 8.7466E-02, 8.7311E-02, 8.7156E-02, 8.7000E-02, & 8.6845E-02, 8.6689E-02, 8.6534E-02, 8.6378E-02, 8.6222E-02, & 8.6066E-02, 8.5910E-02, 8.5753E-02, 8.5597E-02, 8.5440E-02, & 8.5283E-02, 8.5126E-02, 8.4969E-02, 8.4811E-02, 8.4654E-02, & 8.4496E-02, 8.4338E-02, 8.4180E-02, 8.4021E-02, 8.3862E-02/ DATA ((Y3G (I,J), I= 1, 100), J=2,2) / & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05/ DATA ((Y3G (I,J), I= 101, 200), J=2,2) / & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, & 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05, 2.4031E-05/ DATA ((Y3G (I,J), I= 1, 100), J=3,3) / & 2.1932E-04, 2.1932E-04, 2.1932E-04, 2.1932E-04, 2.1932E-04, & 2.1932E-04, 2.1931E-04, 2.1931E-04, 2.1931E-04, 2.1931E-04, & 2.1931E-04, 2.1931E-04, 2.1931E-04, 2.1931E-04, 2.1931E-04, & 2.1931E-04, 2.1930E-04, 2.1930E-04, 2.1930E-04, 2.1930E-04, & 2.1930E-04, 2.1930E-04, 2.1930E-04, 2.1930E-04, 2.1930E-04, & 2.1929E-04, 2.1929E-04, 2.1929E-04, 2.1929E-04, 2.1929E-04, & 2.1929E-04, 2.1929E-04, 2.1929E-04, 2.1929E-04, 2.1928E-04, & 2.1928E-04, 2.1928E-04, 2.1928E-04, 2.1928E-04, 2.1928E-04, & 2.1928E-04, 2.1928E-04, 2.1928E-04, 2.1927E-04, 2.1927E-04, & 2.1927E-04, 2.1927E-04, 2.1927E-04, 2.1927E-04, 2.1927E-04, & 2.1927E-04, 2.1927E-04, 2.1926E-04, 2.1926E-04, 2.1926E-04, & 2.1926E-04, 2.1926E-04, 2.1926E-04, 2.1926E-04, 2.1926E-04, & 2.1926E-04, 2.1925E-04, 2.1925E-04, 2.1925E-04, 2.1925E-04, & 2.1925E-04, 2.1925E-04, 2.1925E-04, 2.1925E-04, 2.1925E-04, & 2.1924E-04, 2.1924E-04, 2.1924E-04, 2.1924E-04, 2.1924E-04, & 2.1924E-04, 2.1924E-04, 2.1924E-04, 2.1924E-04, 2.1923E-04, & 2.1923E-04, 2.1923E-04, 2.1923E-04, 2.1923E-04, 2.1923E-04, & 2.1923E-04, 2.1923E-04, 2.1923E-04, 2.1922E-04, 2.1922E-04, & 2.1922E-04, 2.1922E-04, 2.1922E-04, 2.1922E-04, 2.1922E-04, & 2.1922E-04, 2.1921E-04, 2.1921E-04, 2.1921E-04, 2.1921E-04/ DATA ((Y3G (I,J), I= 101, 200), J=3,3) / & 2.1921E-04, 2.1921E-04, 2.1921E-04, 2.1921E-04, 2.1921E-04, & 2.1920E-04, 2.1920E-04, 2.1920E-04, 2.1920E-04, 2.1920E-04, & 2.1920E-04, 2.1920E-04, 2.1920E-04, 2.1919E-04, 2.1919E-04, & 2.1919E-04, 2.1919E-04, 2.1919E-04, 2.1919E-04, 2.1919E-04, & 2.1919E-04, 2.1919E-04, 2.1918E-04, 2.1918E-04, 2.1918E-04, & 2.1918E-04, 2.1918E-04, 2.1918E-04, 2.1918E-04, 2.1918E-04, & 2.1917E-04, 2.1917E-04, 2.1917E-04, 2.1917E-04, 2.1917E-04, & 2.1917E-04, 2.1917E-04, 2.1917E-04, 2.1917E-04, 2.1916E-04, & 2.1916E-04, 2.1916E-04, 2.1916E-04, 2.1916E-04, 2.1916E-04, & 2.1916E-04, 2.1916E-04, 2.1915E-04, 2.1915E-04, 2.1915E-04, & 2.1915E-04, 2.1915E-04, 2.1915E-04, 2.1915E-04, 2.1915E-04, & 2.1914E-04, 2.1914E-04, 2.1914E-04, 2.1914E-04, 2.1914E-04, & 2.1914E-04, 2.1914E-04, 2.1914E-04, 2.1913E-04, 2.1913E-04, & 2.1913E-04, 2.1913E-04, 2.1913E-04, 2.1913E-04, 2.1913E-04, & 2.1913E-04, 2.1912E-04, 2.1912E-04, 2.1912E-04, 2.1912E-04, & 2.1912E-04, 2.1912E-04, 2.1912E-04, 2.1912E-04, 2.1911E-04, & 2.1911E-04, 2.1911E-04, 2.1911E-04, 2.1911E-04, 2.1911E-04, & 2.1911E-04, 2.1910E-04, 2.1910E-04, 2.1910E-04, 2.1910E-04, & 2.1910E-04, 2.1910E-04, 2.1910E-04, 2.1909E-04, 2.1909E-04, & 2.1909E-04, 2.1909E-04, 2.1909E-04, 2.1909E-04, 2.1909E-04/ save RETURN END c ++++ dalhadslow26 ++++ c update 05/28/26 subroutine dalhad_timelike26x IMPLICIT NONE INTEGER NB,I,J PARAMETER(NB=2180) REAL ESA(NB),DAS(NB,3),DGS(NB,3) COMMON /DATS26x/ESA,DAS,DGS c****************************************************************************** c* * c* --- intRdatx --- Thu May 28 14:29:07 2026 * c* * c***************************# FJ@HU Berlin #*********************************** c "Delta alpha" Update version (24/02/2026) 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.1880, MTOP: 172.40 c NF,IOR,ICHK: 5,4,2,ISU2: 0,NFL: 5,INAG: 1,inotail: 0, sin2W_ref: 0.23153 c CHPTCUT,EC,ECUT: 0.3180, 5.20, 11.50, sin2W_eff: 0.23153, s2W_ref/eff: 1.000 c iintRd,IUNMIX,iomegaphidat,iresonances,IRESON:1, 1, 3, 1, 1 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.35600000D0, 0.36100000D0, 0.36600000D0, 0.37100000D0, & 0.37600000D0, 0.38000000D0, 0.38500000D0, 0.38900000D0, & 0.39400000D0, 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.58800000D0, & 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, 0.77846300D0, 0.77869800D0/ DATA (ESA (I), I= 101, 200) / & 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.78260000D0, & 0.78266000D0, 0.78272000D0, 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.81020000D0, & 0.81050000D0, 0.81200000D0, 0.81800000D0, 0.82200000D0, & 0.82400000D0, 0.82600000D0, 0.82800000D0, 0.83000000D0, & 0.83100000D0, 0.83700000D0, 0.84300000D0, 0.84900000D0, & 0.85400000D0, 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.23240000D0, & 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/ DATA (ESA (I), I= 601, 700) / & 3.06900000D0, 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/ DATA (ESA (I), I= 701, 800) / & 3.09694500D0, 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/ DATA (ESA (I), I= 801, 900) / & 3.15400000D0, 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.40000000D0, 3.45000000D0, 3.50000000D0, 3.52000000D0, & 3.54000000D0, 3.54240000D0, 3.55380000D0, 3.56000000D0, & 3.56110000D0, 3.57500000D0, 3.59000000D0, 3.59500000D0, & 3.60020000D0, 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/ DATA (ESA (I), I= 901,1000) / & 3.67400000D0, 3.67496000D0, 3.67551000D0, 3.67606000D0, & 3.67661000D0, 3.67716000D0, 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.68651000D0, 3.68654800D0, & 3.68660000D0, 3.68667000D0, 3.68672000D0, 3.68685000D0, & 3.68690700D0, 3.68706000D0, 3.68761000D0, 3.68816000D0/ DATA (ESA (I), I=1001,1100) / & 3.68871000D0, 3.68926000D0, 3.68981000D0, 3.69036000D0, & 3.69091000D0, 3.69146000D0, 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/ DATA (ESA (I), I=1101,1200) / & 3.89000000D0, 3.89600000D0, 3.90000000D0, 3.90200000D0, & 3.90800000D0, 3.91400000D0, 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/ DATA (ESA (I), I=1201,1300) / & 4.40000000D0, 4.40600000D0, 4.41000000D0, 4.41200000D0, & 4.41800000D0, 4.42400000D0, 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/ DATA (ESA (I), I=1301,1400) / & 9.42000000D0, 9.42400000D0, 9.42800000D0, 9.43000000D0, & 9.43200000D0, 9.43400000D0, 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.46019429D0, 9.46024164D0, 9.46024905D0, 9.46025276D0, & 9.46026017D0, 9.46026757D0, 9.46027498D0, 9.46028239D0, & 9.46028980D0, 9.46029721D0, 9.46030462D0, 9.46031202D0, & 9.46031943D0, 9.46032684D0, 9.46033425D0, 9.46034166D0, & 9.46034907D0, 9.46035648D0, 9.46036018D0, 9.46036388D0, & 9.46036759D0, 9.46037129D0, 9.46037500D0, 9.46037870D0, & 9.46038240D0, 9.46038611D0, 9.46038981D0, 9.46039352D0, & 9.46039722D0, 9.46039722D0, 9.46039776D0, 9.46039830D0/ DATA (ESA (I), I=1401,1500) / & 9.46039884D0, 9.46039938D0, 9.46039992D0, 9.46040100D0, & 9.46040208D0, 9.46040262D0, 9.46040370D0, 9.46040478D0, & 9.46040587D0, 9.46040695D0, 9.46040803D0, 9.46040911D0, & 9.46041019D0, 9.46041258D0, 9.46041628D0, 9.46041999D0, & 9.46042369D0, 9.46042740D0, 9.46043110D0, 9.46043480D0, & 9.46043851D0, 9.46044221D0, 9.46044592D0, 9.46044962D0, & 9.46045703D0, 9.46046444D0, 9.46047185D0, 9.46048666D0, & 9.46050148D0, 9.46051630D0, 9.46052371D0, 9.46053111D0, & 9.46053852D0, 9.46054593D0, 9.46055334D0, 9.46056075D0, & 9.46057186D0, 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/ DATA (ESA (I), I=1501,1600) / & 9.54000000D0, 9.55000000D0, 9.60000000D0, 9.70000000D0, & 9.80000000D0, 9.90000000D0, 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.02330412D0,10.02330897D0,10.02331383D0,10.02331626D0, & 10.02331868D0,10.02332111D0,10.02332354D0,10.02332597D0, & 10.02332839D0,10.02333082D0,10.02333325D0,10.02333568D0, & 10.02333810D0,10.02334053D0,10.02334296D0,10.02334538D0, & 10.02334781D0,10.02335024D0,10.02335267D0,10.02335509D0, & 10.02335752D0,10.02335995D0,10.02336238D0,10.02336480D0, & 10.02336723D0,10.02336966D0,10.02337209D0,10.02337451D0, & 10.02337694D0,10.02337937D0,10.02338179D0,10.02338422D0, & 10.02338665D0,10.02338908D0,10.02339150D0,10.02339393D0, & 10.02339636D0,10.02339668D0,10.02339700D0,10.02339732D0, & 10.02339764D0,10.02339796D0,10.02339828D0,10.02339860D0, & 10.02339892D0,10.02339924D0,10.02339955D0,10.02339987D0, & 10.02340019D0,10.02340051D0,10.02340083D0,10.02340115D0, & 10.02340147D0,10.02340179D0,10.02340211D0,10.02340243D0, & 10.02340275D0,10.02340307D0,10.02340339D0,10.02340371D0/ DATA (ESA (I), I=1601,1700) / & 10.02340403D0,10.02340435D0,10.02340678D0,10.02340920D0, & 10.02341163D0,10.02341406D0,10.02341649D0,10.02341891D0, & 10.02342134D0,10.02342377D0,10.02342620D0,10.02342862D0, & 10.02343105D0,10.02343348D0,10.02343590D0,10.02343833D0, & 10.02344076D0,10.02344319D0,10.02344561D0,10.02344804D0, & 10.02345047D0,10.02345290D0,10.02345532D0,10.02345775D0, & 10.02346018D0,10.02346261D0,10.02346503D0,10.02346746D0, & 10.02346989D0,10.02347231D0,10.02347474D0,10.02347717D0, & 10.02347960D0,10.02348202D0,10.02348445D0,10.02348688D0, & 10.02348931D0,10.02349173D0,10.02349416D0,10.02349902D0, & 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/ DATA (ESA (I), I=1701,1800) / & 10.35391667D0,10.35400833D0,10.35410000D0,10.35419167D0, & 10.35428333D0,10.35437500D0,10.35440000D0,10.35446667D0, & 10.35455833D0,10.35465000D0,10.35474167D0,10.35483334D0, & 10.35492500D0,10.35501667D0,10.35502330D0,10.35503904D0, & 10.35504221D0,10.35504537D0,10.35504854D0,10.35505171D0, & 10.35505487D0,10.35505804D0,10.35506121D0,10.35506437D0, & 10.35506754D0,10.35507071D0,10.35507387D0,10.35507704D0, & 10.35507862D0,10.35508021D0,10.35508179D0,10.35508337D0, & 10.35508496D0,10.35508654D0,10.35508812D0,10.35508971D0, & 10.35509129D0,10.35509287D0,10.35509446D0,10.35509604D0, & 10.35509762D0,10.35509783D0,10.35509803D0,10.35509823D0, & 10.35509844D0,10.35509864D0,10.35509884D0,10.35509905D0, & 10.35509925D0,10.35509945D0,10.35509966D0,10.35509986D0, & 10.35510006D0,10.35510027D0,10.35510047D0,10.35510067D0, & 10.35510088D0,10.35510108D0,10.35510128D0,10.35510149D0, & 10.35510169D0,10.35510189D0,10.35510210D0,10.35510230D0, & 10.35510250D0,10.35510270D0,10.35510429D0,10.35510587D0, & 10.35510746D0,10.35510904D0,10.35511062D0,10.35511221D0, & 10.35511379D0,10.35511537D0,10.35511696D0,10.35511854D0, & 10.35512012D0,10.35512171D0,10.35512329D0,10.35512487D0, & 10.35512804D0,10.35513121D0,10.35513437D0,10.35513754D0, & 10.35514071D0,10.35514387D0,10.35514704D0,10.35515021D0, & 10.35515337D0,10.35515654D0,10.35515971D0,10.35538334D0, & 10.35547500D0,10.35556667D0,10.35565834D0,10.35575000D0, & 10.35584167D0,10.35593334D0,10.35602500D0,10.35611667D0/ DATA (ESA (I), I=1801,1900) / & 10.35620834D0,10.35630000D0,10.35639167D0,10.35648334D0, & 10.35657500D0,10.35666667D0,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/ DATA (ESA (I), I=1901,2000) / & 10.59803000D0,10.59958000D0,10.60145000D0,10.60378000D0, & 10.60683000D0,10.61111000D0,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/ DATA (ESA (I), I=2001,2100) / & 10.99697000D0,10.99793000D0,10.99890000D0,10.99988000D0, & 11.00087000D0,11.00188000D0,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/ DATA (ESA (I), I=2101,2180) / & 12.44300000D0,12.46500000D0,12.48800000D0,12.51000000D0, & 12.53300000D0,12.55500000D0,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.41277845E-04,-1.00310860E-03,-1.06354631E-03,-1.12624262E-03, & -1.19232952E-03,-1.22404383E-03,-1.27003300E-03,-1.36991736E-03, & -1.40965686E-03,-1.44588581E-03,-1.50374867E-03,-1.55870962E-03, & -1.66486586E-03,-1.71811731E-03,-1.77031729E-03,-1.82536120E-03, & -1.87952094E-03,-1.91718346E-03,-1.98188864E-03,-2.02716164E-03, & -2.08396057E-03,-2.18869803E-03,-2.23855556E-03,-2.28810370E-03, & -2.34845885E-03,-2.38214811E-03,-2.39741918E-03,-2.44899189E-03, & -2.50265795E-03,-2.55562330E-03,-2.60946097E-03,-2.66472065E-03, & -2.72215011E-03,-2.78133558E-03,-2.84238448E-03,-2.90526869E-03, & -2.96968402E-03,-3.03479281E-03,-3.08343072E-03,-3.15246301E-03, & -3.22195267E-03,-3.27325146E-03,-3.34331638E-03,-3.41352520E-03, & -3.46973225E-03,-3.54514365E-03,-3.60351355E-03,-3.68595163E-03, & -4.14247941E-03,-4.62525689E-03,-5.31207938E-03,-5.98751794E-03, & -6.46890737E-03,-6.55794434E-03,-6.81765054E-03,-7.16729042E-03, & -7.53049626E-03,-7.89726647E-03,-8.28277990E-03,-8.41801418E-03, & -8.65213796E-03,-9.05206821E-03,-9.39959273E-03,-9.78070394E-03, & -1.00778846E-02,-1.03486195E-02,-1.03954738E-02,-1.05121181E-02, & -1.05730442E-02,-1.05892773E-02,-1.05648427E-02,-1.03435900E-02, & -1.00039385E-02,-9.40674973E-03,-8.59884802E-03,-7.66131316E-03, & -6.83636081E-03,-6.60222567E-03,-6.15514449E-03,-6.35213848E-03, & -5.72942530E-03,-5.51082440E-03,-5.35502932E-03,-5.77487391E-03, & -6.11311032E-03,-6.47150190E-03,-6.64691429E-03,-6.83309132E-03, & -6.91882677E-03,-6.99760619E-03,-7.01735334E-03,-7.01760320E-03, & -7.01782592E-03,-6.63697152E-03,-6.60707733E-03,-6.57673473E-03, & -6.25077035E-03,-5.94561221E-03,-5.65894850E-03,-5.38868039E-03/ DATA ((DAS (I,J), I= 101, 200), J=1,1) / & -4.92691035E-03,-4.51552794E-03,-4.08856043E-03,-3.74930429E-03, & -3.29740790E-03,-2.74058738E-03,-2.18665195E-03,-1.63560160E-03, & -1.06442378E-03,-2.41090269E-04, 6.23318409E-04, 1.74421233E-03, & 2.95456727E-03, 4.32805701E-03, 6.25457111E-03, 1.04912950E-02, & 1.08829974E-02, 1.12429343E-02, 1.09166547E-02, 1.55740843E-02, & 1.72940670E-02, 1.85587106E-02, 1.96044645E-02, 2.04097532E-02, & 2.09958892E-02, 2.15310152E-02, 2.20209661E-02, 2.24288826E-02, & 2.27450392E-02, 2.29428357E-02, 2.32378080E-02, 2.32120665E-02, & 2.35251684E-02, 2.35251624E-02, 2.35056236E-02, 2.33706889E-02, & 2.32361042E-02, 2.30458119E-02, 2.28596402E-02, 2.27299786E-02, & 2.26098800E-02, 2.23519838E-02, 2.21361433E-02, 2.17713080E-02, & 2.14393729E-02, 2.10628655E-02, 2.06304406E-02, 2.01616686E-02, & 1.94751876E-02, 1.88668044E-02, 1.82001596E-02, 1.73983665E-02, & 1.65170624E-02, 1.63161588E-02, 1.56853786E-02, 1.52294895E-02, & 1.48311446E-02, 1.46019010E-02, 1.42633523E-02, 1.39116064E-02, & 1.38513218E-02, 1.40239664E-02, 1.33878482E-02, 1.30915119E-02, & 1.29678450E-02, 1.28666451E-02, 1.27841982E-02, 1.26942092E-02, & 1.26498525E-02, 1.23738047E-02, 1.20868494E-02, 1.17915422E-02, & 1.15153086E-02, 1.08615960E-02, 1.05118842E-02, 1.02186926E-02, & 9.85966714E-03, 9.49300031E-03, 9.18737543E-03, 9.00992280E-03, & 8.67143551E-03, 8.52815205E-03, 8.16366717E-03, 7.86037601E-03, & 7.48196428E-03, 7.14513859E-03, 6.72615880E-03, 6.36076697E-03, & 5.98343490E-03, 5.48630105E-03, 5.23225359E-03, 5.03566408E-03, & 4.65556634E-03, 4.45636261E-03, 4.24721396E-03, 4.04038627E-03, & 3.79836683E-03, 3.54453294E-03, 3.27805624E-03, 2.68534074E-03/ DATA ((DAS (I,J), I= 201, 300), J=1,1) / & 1.95215558E-03, 1.53220379E-03, 1.38622343E-03, 1.22155391E-03, & 1.05695051E-03, 8.86102563E-04, 7.09790134E-04, 5.26911636E-04, & 3.47239554E-04, 1.47884435E-04,-5.38179727E-05,-2.57010136E-04, & -4.67616550E-04,-6.81885165E-04,-9.03186536E-04,-1.12888792E-03, & -1.33369485E-03,-1.52933717E-03,-1.73888700E-03,-1.95651389E-03, & -2.18936779E-03,-2.42731038E-03,-2.68273651E-03,-2.94649396E-03, & -3.22250722E-03,-3.51903479E-03,-3.79591670E-03,-4.06451405E-03, & -4.26839301E-03,-4.18576973E-03,-3.52144158E-03,-3.82964871E-03, & -4.64219477E-03,-6.11377021E-03,-7.12876955E-03,-8.04633601E-03, & -9.14280962E-03,-9.95985242E-03,-1.08147056E-02,-1.17440472E-02, & -1.27440740E-02,-1.38125209E-02,-1.49793308E-02,-1.64055693E-02, & -1.78318079E-02,-1.96208059E-02,-2.16209940E-02,-2.38252426E-02, & -2.62872730E-02,-2.90677935E-02,-3.20693545E-02,-3.55599669E-02, & -3.98764628E-02,-4.47767047E-02,-4.61376689E-02,-4.75895738E-02, & -4.91034989E-02,-5.05537056E-02,-5.19692849E-02,-5.33762263E-02, & -5.46257977E-02,-5.56607474E-02,-5.64199314E-02,-5.68542029E-02, & -5.67899821E-02,-5.59424320E-02,-5.31016870E-02,-4.99733773E-02, & -4.78965561E-02,-4.26326070E-02,-3.58168359E-02,-2.73031589E-02, & -1.74204135E-02,-6.66713339E-03, 4.92034096E-03, 1.64361316E-02, & 2.72949417E-02, 3.70855970E-02, 4.54997746E-02, 5.23305494E-02, & 5.75872166E-02, 6.13473383E-02, 6.39317068E-02, 6.53615049E-02, & 6.60381089E-02, 6.60527197E-02, 6.55612867E-02, 6.47470140E-02, & 6.36986234E-02, 6.24061449E-02, 6.11622700E-02, 5.90321124E-02, & 5.73674383E-02, 5.69644035E-02, 5.54935571E-02, 5.41623403E-02, & 5.31478390E-02, 5.17387870E-02, 5.05532720E-02, 4.93961715E-02/ DATA ((DAS (I,J), I= 301, 400), J=1,1) / & 4.83055651E-02, 4.72677832E-02, 4.63214928E-02, 4.53721522E-02, & 4.25224881E-02, 4.00130120E-02, 3.76823146E-02, 3.55832842E-02, & 3.36000088E-02, 3.19269273E-02, 3.03937574E-02, 2.91473606E-02, & 2.80921539E-02, 2.71282586E-02, 2.61575058E-02, 2.52271377E-02, & 2.43983893E-02, 2.36160519E-02, 2.28758082E-02, 2.22280060E-02, & 2.07682566E-02, 2.01805858E-02, 1.96079997E-02, 1.90026536E-02, & 1.82284006E-02, 1.70590882E-02, 1.72144476E-02, 1.79315633E-02, & 1.78718349E-02, 1.76592535E-02, 1.74341357E-02, 1.72083052E-02, & 1.69832188E-02, 1.67489697E-02, 1.65009037E-02, 1.63042838E-02, & 1.61004705E-02, 1.59005457E-02, 1.57102773E-02, 1.55248810E-02, & 1.53403896E-02, 1.51543117E-02, 1.49725779E-02, 1.47768983E-02, & 1.46108604E-02, 1.44235278E-02, 1.42550742E-02, 1.40975456E-02, & 1.39347599E-02, 1.37878744E-02, 1.36399106E-02, 1.34976028E-02, & 1.33566331E-02, 1.32181392E-02, 1.30913948E-02, 1.29646603E-02, & 1.26105503E-02, 1.18420590E-02, 1.06290847E-02, 9.73251826E-03, & 9.03954901E-03, 8.48408851E-03, 8.00761982E-03, 7.59226627E-03, & 7.23018243E-03, 7.19650102E-03, 6.77305060E-03, 6.48529731E-03, & 6.38725287E-03, 6.15291484E-03, 5.92896975E-03, 5.90705775E-03, & 5.71623307E-03, 5.51181571E-03, 5.41376158E-03, 5.31780774E-03, & 5.14174170E-03, 4.98152773E-03, 4.83473646E-03, 4.69958951E-03, & 4.62034768E-03, 4.56651013E-03, 4.43787478E-03, 4.31146138E-03, & 4.29926256E-03, 4.19670649E-03, 4.09769015E-03, 4.05222387E-03, & 4.00520985E-03, 3.91341692E-03, 3.81284726E-03, 3.71318169E-03, & 3.68561913E-03, 3.62194099E-03, 3.58113131E-03, 3.54666762E-03, & 3.47997412E-03, 3.41040492E-03, 3.40292951E-03, 3.35201414E-03/ DATA ((DAS (I,J), I= 401, 500), J=1,1) / & 3.26228954E-03, 3.24449173E-03, 3.27010653E-03, 3.24461344E-03, & 3.23505354E-03, 3.30016901E-03, 3.30993408E-03, 3.31735543E-03, & 3.32832708E-03, 3.35484241E-03, 3.39561847E-03, 3.44764007E-03, & 3.45386754E-03, 3.51046621E-03, 3.51673457E-03, 3.54789193E-03, & 3.57042231E-03, 3.63162891E-03, 3.63848918E-03, 3.67219435E-03, & 3.67408797E-03, 3.67619027E-03, 3.68986985E-03, 3.70197426E-03, & 3.70432568E-03, 3.71740567E-03, 3.71856874E-03, 3.72413097E-03, & 3.72570117E-03, 3.73909392E-03, 3.74890462E-03, 3.78391273E-03, & 3.79107985E-03, 3.86205435E-03, 3.93843121E-03, 3.98251370E-03, & 3.99277841E-03, 4.14719897E-03, 4.17611931E-03, 4.34833642E-03, & 4.49342033E-03, 4.55474981E-03, 4.59711916E-03, 4.61812463E-03, & 4.83376944E-03, 4.87796158E-03, 5.00209096E-03, 5.11535998E-03, & 5.16892169E-03, 5.31321018E-03, 5.41219051E-03, 5.43268174E-03, & 5.44204588E-03, 5.50299217E-03, 5.52699530E-03, 5.55132277E-03, & 5.66401886E-03, 5.67738218E-03, 5.70374679E-03, 5.71350352E-03, & 5.71305808E-03, 5.71436637E-03, 5.71030928E-03, 5.70593118E-03, & 5.70398004E-03, 5.68202543E-03, 5.65619585E-03, 5.62736671E-03, & 5.58390732E-03, 5.53195401E-03, 5.52790534E-03, 5.43982621E-03, & 5.36353951E-03, 5.28386107E-03, 5.26870150E-03, 5.14986065E-03, & 5.13617456E-03, 5.09938746E-03, 5.08743117E-03, 5.10416830E-03, & 5.10272480E-03, 5.03716191E-03, 4.98830141E-03, 4.95222002E-03, & 4.84751783E-03, 4.74097737E-03, 4.71762178E-03, 4.70289280E-03, & 4.68228512E-03, 4.67767832E-03, 4.66798510E-03, 4.66544660E-03, & 4.65640160E-03, 4.64196954E-03, 4.61216737E-03, 4.60706669E-03, & 4.47676043E-03, 4.30113096E-03, 4.38719404E-03, 4.63783896E-03/ DATA ((DAS (I,J), I= 501, 600), J=1,1) / & 4.78232284E-03, 4.83522780E-03, 4.90904131E-03, 4.90357872E-03, & 4.92691845E-03, 4.92899079E-03, 4.84633391E-03, 4.76323591E-03, & 4.64304715E-03, 4.49333411E-03, 4.31675742E-03, 4.09183162E-03, & 3.80608763E-03, 3.42540053E-03, 2.89996270E-03, 2.14923053E-03, & 1.01107244E-03, 7.12824463E-04, 3.81304219E-04, 1.06718844E-05, & -4.05773085E-04,-8.79550506E-04,-1.42111536E-03,-2.04721972E-03, & -2.18442790E-03,-2.32610151E-03,-2.47234672E-03,-2.62350412E-03, & -2.77972018E-03,-2.94126451E-03,-3.10865654E-03,-3.28170836E-03, & -3.46127389E-03,-3.64746220E-03,-4.57095462E-03,-5.29348949E-03, & -5.69149341E-03,-5.97142997E-03,-6.26407265E-03,-6.57070503E-03, & -6.89248131E-03,-7.23049479E-03,-7.58598430E-03,-7.77071117E-03, & -7.96022914E-03,-8.15489262E-03,-8.35492703E-03,-8.56055727E-03, & -8.77190816E-03,-8.98924097E-03,-9.21291229E-03,-9.44314078E-03, & -9.68016225E-03,-9.92435896E-03,-1.01760624E-02,-1.04357187E-02, & -1.07036467E-02,-1.09801617E-02,-1.12656426E-02,-1.15606793E-02, & -1.18656055E-02,-1.21810150E-02,-1.25075401E-02,-1.28458214E-02, & -1.31964003E-02,-1.35599614E-02,-1.39372400E-02,-1.43290528E-02, & -1.47362514E-02,-1.51598855E-02,-1.56004718E-02,-1.60597196E-02, & -1.65385464E-02,-1.70382364E-02,-1.75601192E-02,-1.81059198E-02, & -1.86769340E-02,-1.92750469E-02,-1.99024419E-02,-2.05611242E-02, & -2.12536101E-02,-2.19825935E-02,-2.27510570E-02,-2.31511037E-02, & -2.35622998E-02,-2.39850560E-02,-2.44199025E-02,-2.48673792E-02, & -2.53280588E-02,-2.58026062E-02,-2.62915060E-02,-2.67954316E-02, & -2.73152811E-02,-2.78515914E-02,-2.84053254E-02,-2.89777935E-02, & -2.95688597E-02,-3.01799453E-02,-3.08121679E-02,-3.14666302E-02/ DATA ((DAS (I,J), I= 601, 700), J=1,1) / & -3.21444735E-02,-3.28470837E-02,-3.35757942E-02,-3.43312490E-02, & -3.51167039E-02,-3.59330466E-02,-3.67822090E-02,-3.76669201E-02, & -3.85871366E-02,-3.95473625E-02,-4.05495029E-02,-4.15964377E-02, & -4.26910519E-02,-4.38370093E-02,-4.50378137E-02,-4.62975085E-02, & -4.76204717E-02,-4.90117292E-02,-5.04770411E-02,-5.20216048E-02, & -5.36524092E-02,-5.60950026E-02,-5.72037603E-02,-5.91420003E-02, & -6.12022793E-02,-6.33965977E-02,-6.57382952E-02,-6.82427913E-02, & -7.09277326E-02,-7.38133918E-02,-7.69231731E-02,-8.02842845E-02, & -8.39284431E-02,-8.78931793E-02,-9.10592604E-02,-1.00928098E-01, & -1.13027233E-01,-1.28211869E-01,-1.47841923E-01,-1.74227536E-01, & -2.11681926E-01,-2.71405502E-01,-3.63797677E-01,-5.58661421E-01, & -1.19131504E+00,-1.26132285E+00,-1.34001758E+00,-1.43171904E+00, & -1.53070841E+00,-1.64775790E+00,-1.78399505E+00,-1.94452079E+00, & -2.13640169E+00,-2.36970436E+00,-2.65924034E+00,-3.02894325E+00, & -3.51149711E+00,-4.17223336E+00,-4.25168272E+00,-5.38243750E+00, & -7.41232779E+00,-8.49882641E+00,-9.13309619E+00,-1.01060930E+01, & -1.06714625E+01,-1.10828605E+01,-1.14190418E+01,-9.32345776E+00, & -1.16506258E+01,-1.16182629E+01,-1.14841527E+01,-1.12999577E+01, & -1.09162391E+01,-1.04596933E+01,-9.75953505E+00,-9.54380912E+00, & -9.05265522E+00,-8.19578443E+00,-7.54420362E+00,-6.82994707E+00, & -6.05599209E+00,-5.22675459E+00,-4.34803157E+00,-3.66183368E+00, & -2.48609132E+00,-1.50074927E+00,-4.98871313E-01,-4.33964031E-01, & 2.00588849E+00, 2.96429116E+00, 4.35941920E+00, 4.89073551E+00, & 7.81788356E+00, 1.01346469E+01, 1.07967062E+01, 1.13328938E+01, & 1.13109959E+01, 1.14974957E+01, 1.15801955E+01, 1.16338307E+01/ DATA ((DAS (I,J), I= 701, 800), J=1,1) / & 1.16616386E+01, 9.09272215E+00, 9.47778283E+00, 9.85547544E+00, & 1.15679457E+01, 1.15043742E+01, 1.14285346E+01, 1.13421016E+01, & 1.11960107E+01, 1.10897699E+01, 1.09204009E+01, 1.07423879E+01, & 1.06204754E+01, 1.03721198E+01, 1.02469620E+01, 9.63059111E+00, & 9.43013046E+00, 9.37657991E+00, 9.07752590E+00, 8.67591253E+00, & 8.29666124E+00, 7.84263453E+00, 7.33745815E+00, 6.60171370E+00, & 5.95257320E+00, 5.00658188E+00, 4.18393562E+00, 3.52362840E+00, & 3.03986120E+00, 2.67139601E+00, 2.38185530E+00, 2.14855491E+00, & 1.95667520E+00, 1.79614327E+00, 1.65991848E+00, 1.54286235E+00, & 1.44122871E+00, 1.35216313E+00, 1.27346626E+00, 1.20346096E+00, & 1.14075996E+00, 1.08428711E+00, 1.03316019E+00, 9.86655798E-01, & 5.23763012E-01, 3.57874256E-01, 2.72753641E-01, 2.22270445E-01, & 1.85264701E-01, 1.59767182E-01, 1.40701320E-01, 1.25870925E-01, & 1.13997088E-01, 1.04272533E-01, 1.03121308E-01, 9.50956734E-02, & 8.82996562E-02, 8.24704465E-02, 7.74151668E-02, 7.29891307E-02, & 6.90816276E-02, 6.56065528E-02, 6.24956389E-02, 5.96945014E-02, & 5.71591015E-02, 5.48525023E-02, 5.27463878E-02, 5.08152006E-02, & 4.90379539E-02, 4.73969024E-02, 4.58769996E-02, 4.44651661E-02, & 4.31504242E-02, 4.19229130E-02, 4.07741930E-02, 3.96969896E-02, & 3.86854494E-02, 3.77326766E-02, 3.68340708E-02, 3.59851925E-02, & 3.51819714E-02, 3.44209126E-02, 3.36987176E-02, 3.30125225E-02, & 3.23596694E-02, 3.17377804E-02, 3.11446691E-02, 3.05783558E-02, & 3.00371123E-02, 2.95192972E-02, 2.90234292E-02, 2.85481135E-02, & 2.80920509E-02, 2.76542392E-02, 2.72335718E-02, 2.68289614E-02, & 2.64394996E-02, 2.60644088E-02, 2.57021211E-02, 2.53534952E-02/ DATA ((DAS (I,J), I= 801, 900), J=1,1) / & 2.50170891E-02, 2.46922831E-02, 2.43784632E-02, 2.40750768E-02, & 2.37815410E-02, 2.34974094E-02, 2.32222758E-02, 2.29557238E-02, & 2.26975197E-02, 2.24469326E-02, 2.22038495E-02, 2.19679424E-02, & 2.17388919E-02, 2.15163749E-02, 2.13001982E-02, 2.10900195E-02, & 2.08856652E-02, 2.06869102E-02, 2.04935731E-02, 2.03054286E-02, & 2.01222891E-02, 1.99439558E-02, 1.97703472E-02, 1.96013165E-02, & 1.94365933E-02, 1.92762223E-02, 1.91200510E-02, 1.89679821E-02, & 1.88199504E-02, 1.86759069E-02, 1.85358383E-02, 1.83997510E-02, & 1.82676868E-02, 1.81396998E-02, 1.80159650E-02, 1.78968362E-02, & 1.77826711E-02, 1.74960814E-02, 1.73728627E-02, 1.72526172E-02, & 1.71343298E-02, 1.70182798E-02, 1.69037944E-02, 1.67921017E-02, & 1.66822303E-02, 1.65744169E-02, 1.64796534E-02, 1.63630769E-02, & 1.62602102E-02, 1.61608665E-02, 1.60629889E-02, 1.59677298E-02, & 1.58740193E-02, 1.57819698E-02, 1.56914887E-02, 1.56028925E-02, & 1.55155664E-02, 1.28811434E-02, 1.10381592E-02, 9.41804938E-03, & 8.88040792E-03, 7.98433884E-03, 7.04128915E-03, 6.60351623E-03, & 6.10173144E-03, 6.03611879E-03, 5.70157636E-03, 5.50160835E-03, & 5.46463715E-03, 4.94742134E-03, 4.25463017E-03, 3.98340992E-03, & 3.67037423E-03, 3.37370218E-03, 3.00283410E-03, 2.58404890E-03, & 2.10988885E-03, 1.56706671E-03, 9.37336291E-04, 1.94561003E-04, & -6.98659601E-04,-1.79662541E-03,-3.18389763E-03,-3.84843381E-03, & -4.59316612E-03,-5.43406312E-03,-6.39161655E-03,-7.49256983E-03, & -8.77255925E-03,-9.49446446E-03,-1.02808790E-02,-1.11409954E-02, & -1.20856437E-02,-1.31281281E-02,-1.42845385E-02,-1.55750128E-02, & -1.70242616E-02,-1.86633117E-02,-2.05333454E-02,-2.26864870E-02/ DATA ((DAS (I,J), I= 901,1000), J=1,1) / & -2.51926752E-02,-2.80182761E-02,-2.98664711E-02,-3.19157876E-02, & -3.42010813E-02,-3.67657669E-02,-3.96646199E-02,-4.28660235E-02, & -4.66569853E-02,-5.10632005E-02,-5.62482719E-02,-6.25811539E-02, & -7.01197426E-02,-7.94777530E-02,-9.14079919E-02,-1.07147288E-01, & -1.28883097E-01,-1.60894685E-01,-2.12891660E-01,-3.13062942E-01, & -4.87586037E-01,-6.05416933E-01,-7.70836283E-01,-1.09427692E+00, & -1.17399142E+00,-1.24541533E+00,-1.30491472E+00,-1.36047556E+00, & -1.41125807E+00,-1.45322299E+00,-1.48890673E+00,-1.51570379E+00, & -1.54005476E+00,-1.55927429E+00,-1.57321088E+00,-1.58201372E+00, & -1.58619094E+00,-1.58602839E+00,-1.58127996E+00,-1.57264885E+00, & -1.55881557E+00,-1.53954441E+00,-1.51808020E+00,-1.53086402E+00, & -1.45392567E+00,-1.41519302E+00,-1.37005541E+00,-1.30876356E+00, & -1.24790373E+00,-1.16821919E+00,-1.09170910E+00,-9.78068005E-01, & -8.51434650E-01,-6.57790138E-01,-4.85020479E-01,-2.81836529E-01, & -1.77323462E-01,-7.17901892E-02, 3.40354390E-02, 3.25684364E-01, & 5.42470628E-01, 6.89388328E-01, 8.25175424E-01, 9.06232087E-01, & 1.00732913E+00, 1.08637986E+00, 1.16948170E+00, 1.23282306E+00, & 1.29329178E+00, 1.34061297E+00, 1.38930888E+00, 1.42267042E+00, & 1.45352379E+00, 1.47880208E+00, 1.49781818E+00, 1.51274081E+00, & 1.52055113E+00, 1.52438636E+00, 1.52229466E+00, 1.51425609E+00, & 1.49974618E+00, 1.47912424E+00, 1.45437371E+00, 1.41972466E+00, & 1.37735724E+00, 1.32819402E+00, 1.26843426E+00, 1.19778835E+00, & 1.11504376E+00, 1.01549544E+00, 9.60702844E-01, 8.95904381E-01, & 8.18672954E-01, 7.32042519E-01, 6.79985930E-01, 5.73044925E-01, & 5.35961657E-01, 4.56932075E-01, 5.49762450E-01, 2.12154332E-01/ DATA ((DAS (I,J), I=1001,1100), J=1,1) / & 1.65637309E-01, 1.36767870E-01, 1.16911191E-01, 1.02370722E-01, & 9.12472706E-02, 8.24553266E-02, 7.53267147E-02, 6.94263078E-02, & 6.44569143E-02, 6.02016699E-02, 5.65375177E-02, 5.33917820E-02, & 5.06069925E-02, 4.81334042E-02, 4.59228609E-02, 4.39431377E-02, & 4.07932220E-02, 3.68689320E-02, 3.47667230E-02, 3.13229696E-02, & 2.86175834E-02, 2.59478811E-02, 2.21383454E-02, 1.78657092E-02, & 1.51899781E-02, 1.39286646E-02, 1.33099768E-02, 1.28368737E-02, & 1.24871234E-02, 1.22135808E-02, 1.19914232E-02, 1.18060281E-02, & 1.16469413E-02, 1.15091794E-02, 1.13976011E-02, 1.12929155E-02, & 1.11981130E-02, 1.11112776E-02, 1.10307879E-02, 1.09555671E-02, & 1.08847895E-02, 1.08055800E-02, 1.07462181E-02, 1.06906769E-02, & 1.06384822E-02, 1.05893855E-02, 1.05430366E-02, 1.04992615E-02, & 1.04578030E-02, 1.04186896E-02, 1.03817232E-02, 1.03469262E-02, & 1.03142630E-02, 1.02840376E-02, 1.02566046E-02, 1.02332402E-02, & 1.02158362E-02, 1.02384835E-02, 1.03672994E-02, 1.04604074E-02, & 1.05515265E-02, 1.06437754E-02, 1.07385260E-02, 1.08360210E-02, & 1.09364428E-02, 1.10409033E-02, 1.11487122E-02, 1.12601955E-02, & 1.13736306E-02, 1.14924028E-02, 1.16130021E-02, 1.17382711E-02, & 1.18616084E-02, 1.19897911E-02, 1.21093365E-02, 1.22271411E-02, & 1.23407843E-02, 1.24482671E-02, 1.25472505E-02, 1.26348160E-02, & 1.27084385E-02, 1.27646334E-02, 1.27997449E-02, 1.27947793E-02, & 1.27891157E-02, 1.27341167E-02, 1.26378639E-02, 1.24934235E-02, & 1.22907978E-02, 1.19988712E-02, 1.16090065E-02, 1.10327910E-02, & 1.08642570E-02, 1.04119512E-02, 9.74722545E-03, 9.67891379E-03, & 9.22303811E-03, 9.03831687E-03, 8.89149051E-03, 8.76728432E-03/ DATA ((DAS (I,J), I=1101,1200), J=1,1) / & 8.57343476E-03, 8.36756670E-03, 8.32391436E-03, 8.31831984E-03, & 8.28572461E-03, 8.22130056E-03, 8.18652614E-03, 8.19775139E-03, & 8.33418228E-03, 8.32013211E-03, 8.17207609E-03, 8.11279539E-03, & 7.99733740E-03, 7.89825213E-03, 7.79916686E-03, 7.70008158E-03, & 7.62996059E-03, 7.45560069E-03, 7.19396300E-03, 6.83353626E-03, & 6.60318580E-03, 6.25030018E-03, 6.01971323E-03, 6.14031063E-03, & 6.69216033E-03, 7.06973230E-03, 7.92080774E-03, 8.27944524E-03, & 8.57301406E-03, 8.90042649E-03, 9.15428559E-03, 9.10213885E-03, & 9.03534901E-03, 9.16655908E-03, 9.54902539E-03, 9.26891704E-03, & 8.91895287E-03, 8.98062228E-03, 9.09914614E-03, 9.18303471E-03, & 9.30475736E-03, 9.32015516E-03, 9.23683181E-03, 9.05901735E-03, & 8.95274222E-03, 8.74932031E-03, 8.72414812E-03, 8.85990257E-03, & 9.01344169E-03, 9.20504539E-03, 9.28947756E-03, 9.46844880E-03, & 9.54385000E-03, 9.44055328E-03, 9.53954366E-03, 9.76239356E-03, & 9.99912323E-03, 1.02392307E-02, 1.03821251E-02, 1.05034039E-02, & 1.06532312E-02, 1.07673140E-02, 1.08494481E-02, 1.09369288E-02, & 1.10614506E-02, 1.11688218E-02, 1.12628147E-02, 1.13594922E-02, & 1.12024259E-02, 1.07129811E-02, 1.06055982E-02, 1.06820428E-02, & 1.08422883E-02, 1.06532304E-02, 1.06507805E-02, 1.07853068E-02, & 1.08708247E-02, 1.01325528E-02, 9.34808662E-03, 9.08564106E-03, & 8.89724501E-03, 9.19426035E-03, 9.20076432E-03, 9.07579201E-03, & 8.96588910E-03, 8.90185163E-03, 8.81099618E-03, 8.68978081E-03, & 8.35209515E-03, 8.37492730E-03, 8.40354866E-03, 8.34220842E-03, & 8.31977567E-03, 8.30624197E-03, 8.35733484E-03, 8.38294063E-03, & 8.39699127E-03, 8.43505347E-03, 8.42213315E-03, 8.46329671E-03/ DATA ((DAS (I,J), I=1201,1300), J=1,1) / & 8.84241073E-03, 9.24715055E-03, 9.36105260E-03, 9.39476991E-03, & 9.41507871E-03, 9.28490466E-03, 9.55212328E-03, 9.88220619E-03, & 1.00084471E-02, 1.00608179E-02, 1.01514003E-02, 1.01648363E-02, & 1.00744754E-02, 9.91516426E-03, 9.86006238E-03, 9.97114879E-03, & 9.97028377E-03, 9.64591801E-03, 9.66105706E-03, 9.82803052E-03, & 9.79187687E-03, 9.61757784E-03, 9.53196741E-03, 9.56410643E-03, & 9.66963049E-03, 9.67608906E-03, 9.91306970E-03, 1.00340382E-02, & 1.02906149E-02, 1.05632276E-02, 1.06023334E-02, 1.06368385E-02, & 1.06483402E-02, 1.06933683E-02, 1.08013654E-02, 1.08554457E-02, & 1.09089384E-02, 1.10138714E-02, 1.11159915E-02, 1.11660158E-02, & 1.12153682E-02, 1.12640638E-02, 1.13121180E-02, 1.13595459E-02, & 1.14063618E-02, 1.14525797E-02, 1.14982126E-02, 1.15432728E-02, & 1.15877721E-02, 1.16317214E-02, 1.16751309E-02, 1.17180101E-02, & 1.17603682E-02, 1.18022132E-02, 1.18435531E-02, 1.18843949E-02, & 1.19247453E-02, 1.19646102E-02, 1.20039952E-02, 1.20429054E-02, & 1.20813450E-02, 1.21193181E-02, 1.21568281E-02, 1.21938780E-02, & 1.22304701E-02, 1.22666062E-02, 1.23022877E-02, 1.23375152E-02, & 1.23722888E-02, 1.24066081E-02, 1.24404719E-02, 1.24738782E-02, & 1.25068246E-02, 1.25328482E-02, 1.25713227E-02, 1.26339277E-02, & 1.26946109E-02, 1.27532448E-02, 1.28097545E-02, 1.28640069E-02, & 1.29158262E-02, 1.29649790E-02, 1.30111530E-02, 1.30539225E-02, & 1.30926944E-02, 1.31266154E-02, 1.31544176E-02, 1.31740978E-02, & 1.31822976E-02, 1.31822862E-02, 1.31728296E-02, 1.31327220E-02, & 1.30288276E-02, 1.28286878E-02, 1.27414817E-02, 1.23645345E-02, & 1.16212679E-02, 1.12639334E-02, 1.07499342E-02, 1.03996203E-02/ DATA ((DAS (I,J), I=1301,1400), J=1,1) / & 9.95430443E-03, 9.50173831E-03, 8.92719071E-03, 8.57831105E-03, & 8.17620222E-03, 7.70817958E-03, 7.15727285E-03, 6.50027425E-03, & 5.70462246E-03, 5.24086135E-03, 4.72322729E-03, 4.14209918E-03, & 3.48546066E-03, 2.73811227E-03, 1.88055248E-03, 8.87353387E-04, & -2.75255680E-04,-1.65308608E-03,-2.22944737E-03,-2.59175897E-03, & -2.96983854E-03,-3.36471131E-03,-3.77749244E-03,-4.20939706E-03, & -4.66175162E-03,-5.13600694E-03,-5.63375304E-03,-6.15673616E-03, & -6.70687837E-03,-7.28630017E-03,-7.89734663E-03,-8.54261785E-03, & -9.22500444E-03,-9.94772909E-03,-1.07143955E-02,-1.15290461E-02, & -1.23962308E-02,-1.33210890E-02,-1.43094473E-02,-1.53679389E-02, & -1.65041469E-02,-1.77267805E-02,-1.90458913E-02,-2.04731415E-02, & -2.20221390E-02,-2.37088595E-02,-2.55521839E-02,-2.75745878E-02, & -2.98030377E-02,-3.22701689E-02,-3.50158541E-02,-3.80893226E-02, & -4.15520696E-02,-4.54819223E-02,-4.99788367E-02,-5.51733485E-02, & -6.12392158E-02,-6.84128937E-02,-7.70245736E-02,-8.75496814E-02, & -1.00698503E-01,-1.17581513E-01,-1.40037260E-01,-1.71345917E-01, & -2.17987198E-01,-2.94799326E-01,-4.44498620E-01,-5.33070594E-01, & -1.13275317E+00,-1.69652004E+00,-1.69266947E+00,-1.71249396E+00, & -1.76922675E+00,-1.84158654E+00,-1.92725811E+00,-2.02568711E+00, & -2.13787448E+00,-2.26490430E+00,-2.40967387E+00,-2.57319070E+00, & -2.75933605E+00,-2.97289382E+00,-3.21039512E+00,-3.47941114E+00, & -3.77506867E+00,-4.08431123E+00,-4.23389967E+00,-4.35326602E+00, & -4.45773326E+00,-4.54382238E+00,-4.53566014E+00,-4.59056262E+00, & -4.16090947E+00,-3.69633965E+00,-2.99629300E+00,-2.04981236E+00, & -9.05871415E-01,-9.05871415E-01,-7.27621868E-01,-5.47596593E-01/ DATA ((DAS (I,J), I=1401,1500), J=1,1) / & -3.66210570E-01,-1.83889463E-01,-1.06633736E-03, 3.64337296E-01, & 7.26518539E-01, 9.05337560E-01, 1.25640746E+00, 1.59621674E+00, & 1.92500437E+00, 2.23441129E+00, 2.52565064E+00, 2.79730201E+00, & 3.04839249E+00, 3.52894041E+00, 4.07296136E+00, 4.40208090E+00, & 4.56193825E+00, 4.60278663E+00, 4.53953006E+00, 4.44562497E+00, & 4.32598550E+00, 4.19044525E+00, 4.03646179E+00, 3.88164420E+00, & 3.58221310E+00, 3.30811911E+00, 3.06617920E+00, 2.65700431E+00, & 2.34141373E+00, 2.09698167E+00, 1.99624369E+00, 1.90845427E+00, & 1.83363550E+00, 1.77374381E+00, 1.73752583E+00, 1.80562426E+00, & 1.52679174E+00, 1.31077326E+00, 5.71217889E-01, 3.76347780E-01, & 2.83736950E-01, 2.29396465E-01, 1.93596436E-01, 1.68198302E-01, & 1.49224910E-01, 1.34500094E-01, 1.22732144E-01, 1.13105581E-01, & 1.05080037E-01, 9.82831726E-02, 9.24500216E-02, 8.73868551E-02, & 8.29487252E-02, 7.90250054E-02, 7.55297883E-02, 7.23953391E-02, & 6.95675256E-02, 6.70025622E-02, 6.46646475E-02, 6.25242207E-02, & 6.05566567E-02, 5.87412756E-02, 5.70605818E-02, 5.54996717E-02, & 5.40457712E-02, 5.26878673E-02, 5.14164136E-02, 5.02230939E-02, & 4.91006297E-02, 4.80426227E-02, 4.70434254E-02, 4.60980338E-02, & 4.52019980E-02, 4.43513473E-02, 4.35425274E-02, 4.27723465E-02, & 4.20379308E-02, 4.13366851E-02, 4.06662599E-02, 4.00245230E-02, & 3.94095348E-02, 3.88195267E-02, 3.82528828E-02, 3.77081236E-02, & 3.71838919E-02, 3.66789402E-02, 3.61921200E-02, 3.24428177E-02, & 3.00516862E-02, 2.76556024E-02, 2.47875184E-02, 2.17608517E-02, & 1.79933359E-02, 1.64910293E-02, 1.43682570E-02, 1.35789202E-02, & 1.40515845E-02, 1.42547455E-02, 1.43555206E-02, 1.44031750E-02/ DATA ((DAS (I,J), I=1501,1600), J=1,1) / & 1.44217852E-02, 1.43969208E-02, 1.41749292E-02, 1.38507969E-02, & 1.35881495E-02, 1.31130376E-02, 1.24749958E-02, 1.17191690E-02, & 1.07393856E-02, 9.39484128E-03, 6.04796828E-03, 5.41664332E-03, & 4.67458975E-03, 4.45984015E-03, 3.97082593E-03, 3.42825037E-03, & 2.82280232E-03, 2.14287907E-03, 1.37383525E-03, 4.96915444E-04, & -5.12296298E-04,-1.68618630E-03,-3.06865256E-03,-4.72071852E-03, & -6.72978698E-03,-9.22562197E-03,-1.24095525E-02,-1.66117021E-02, & -2.24135986E-02,-3.09438205E-02,-4.47193017E-02,-7.07302116E-02, & -1.02748935E-01,-1.07830951E-01,-1.13376702E-01,-1.19452791E-01, & -1.26139243E-01,-1.33533068E-01,-1.41753023E-01,-1.50946096E-01, & -1.29242679E+00,-1.31576759E+00,-1.36310582E+00,-1.39202613E+00, & -1.42367919E+00,-1.45832233E+00,-1.49578655E+00,-1.53595649E+00, & -1.57893648E+00,-1.62515607E+00,-1.67462320E+00,-1.72750425E+00, & -1.78349297E+00,-1.84442439E+00,-1.91058928E+00,-1.98071285E+00, & -2.05326264E+00,-2.13322065E+00,-2.21900893E+00,-2.31278723E+00, & -2.40932150E+00,-2.51498278E+00,-2.62786474E+00,-2.74746532E+00, & -2.87440499E+00,-3.00721151E+00,-3.14388799E+00,-3.28028156E+00, & -3.39837498E+00,-3.50533413E+00,-3.60958048E+00,-3.63681896E+00, & -3.57836507E+00,-3.38942545E+00,-3.01489118E+00,-2.41070906E+00, & -1.56768341E+00,-1.44069798E+00,-1.31054752E+00,-1.17746324E+00, & -1.04169700E+00,-9.03519947E-01,-7.63221043E-01,-6.21105218E-01, & -4.77491320E-01,-3.32709823E-01,-1.91659771E-01,-4.55783267E-02, & 1.00645811E-01, 2.46661550E-01, 3.92119459E-01, 5.36674543E-01, & 6.79988947E-01, 8.21734531E-01, 9.61595304E-01, 1.09926966E+00, & 1.23447238E+00, 1.36693639E+00, 1.49641429E+00, 1.62267950E+00/ DATA ((DAS (I,J), I=1601,1700), J=1,1) / & 1.74552722E+00, 1.86477509E+00, 2.64005947E+00, 3.17261687E+00, & 3.49000259E+00, 3.63433808E+00, 3.66383191E+00, 3.59670477E+00, & 3.50351969E+00, 3.39197632E+00, 3.26825285E+00, 3.13144881E+00, & 2.99561844E+00, 2.86437665E+00, 2.73987226E+00, 2.72815532E+00, & 2.51109980E+00, 2.40751362E+00, 2.31121625E+00, 2.22104677E+00, & 2.13700631E+00, 2.05867302E+00, 1.98780296E+00, 1.91848886E+00, & 1.85380511E+00, 1.79437501E+00, 1.73950273E+00, 1.68755713E+00, & 1.63905986E+00, 1.59393420E+00, 1.55163879E+00, 1.51230029E+00, & 1.51375163E+00, 1.44197322E+00, 1.41100793E+00, 1.38298378E+00, & 1.35840129E+00, 1.35891326E+00, 1.32395003E+00, 1.35902775E+00, & 1.89026275E-01, 1.23175792E-01, 8.33203617E-02, 6.47666864E-02, & 4.70424845E-02, 3.84731611E-02, 3.34211765E-02, 3.00895204E-02, & 2.77271863E-02, 2.59647739E-02, 2.45994258E-02, 2.35104777E-02, & 2.28940092E-02, 2.21758607E-02, 2.15631858E-02, 2.10343085E-02, & 2.05731111E-02, 2.01673598E-02, 1.87006966E-02, 1.77832977E-02, & 1.71542375E-02, 1.66950483E-02, 1.63436975E-02, 1.60616325E-02, & 1.58380550E-02, 1.56525698E-02, 1.41112638E-02, 1.36922755E-02, & 1.35860102E-02, 1.34622932E-02, 1.33142303E-02, 1.31292872E-02, & 1.30172733E-02, 1.28879768E-02, 1.25541569E-02, 1.20492036E-02, & 1.11664724E-02, 9.14991742E-03, 7.21299537E-03, 6.71153115E-03, & 6.13235500E-03, 5.45583150E-03, 4.65506664E-03, 3.69225575E-03, & 2.51257965E-03, 1.03328248E-03,-8.76633320E-04,-3.43743491E-03, & -7.05067382E-03,-1.25337312E-02,-2.18456573E-02,-2.34878926E-02, & -2.52870334E-02,-2.72671539E-02,-2.94567632E-02,-3.18906904E-02, & -3.46128824E-02,-3.76774321E-02,-4.11528715E-02,-4.51287299E-02/ DATA ((DAS (I,J), I=1701,1800), J=1,1) / & -4.97209677E-02,-5.50843835E-02,-6.14326328E-02,-6.90636069E-02, & -7.84088764E-02,-9.01225270E-02,-9.38504916E-02,-1.05234532E-01, & -1.25474157E-01,-1.53997224E-01,-1.97208678E-01,-2.70465586E-01, & -4.22379491E-01,-9.49421825E-01,-1.04966040E+00,-1.53763910E+00, & -1.56942753E+00,-1.59328282E+00,-1.65385682E+00,-1.73341947E+00, & -1.82866557E+00,-1.94030278E+00,-2.06956715E+00,-2.21852904E+00, & -2.39135337E+00,-2.59123133E+00,-2.82430924E+00,-3.18674009E+00, & -3.23149593E+00,-3.38495323E+00,-3.54303169E+00,-3.70298564E+00, & -3.85933913E+00,-3.98562159E+00,-4.08784037E+00,-4.15369884E+00, & -4.10283651E+00,-3.90433756E+00,-3.48862979E+00,-2.80535109E+00, & -1.83605198E+00,-1.68772070E+00,-1.54280176E+00,-1.39456818E+00, & -1.23564675E+00,-1.08147242E+00,-9.24858624E-01,-7.58144628E-01, & -5.97563343E-01,-4.35580356E-01,-2.64389309E-01,-1.00683051E-01, & 6.32894879E-02, 2.35330999E-01, 3.98661123E-01, 5.61103213E-01, & 7.30308384E-01, 8.89787935E-01, 1.04728773E+00, 1.21016917E+00, & 1.36259223E+00, 1.51207891E+00, 1.66557959E+00, 1.80821251E+00, & 1.94714134E+00, 2.08216126E+00, 3.00021189E+00, 3.62409303E+00, & 3.98928059E+00, 4.15192515E+00, 4.17892043E+00, 4.09773665E+00, & 3.98854812E+00, 3.85595055E+00, 3.69791777E+00, 3.53793633E+00, & 3.38078710E+00, 3.22879413E+00, 3.08557720E+00, 2.95088684E+00, & 2.70663367E+00, 2.49494263E+00, 2.31329241E+00, 2.15388646E+00, & 2.01731338E+00, 1.89927544E+00, 1.79750602E+00, 1.71150011E+00, & 1.64282816E+00, 1.59961037E+00, 1.69241460E+00, 2.81801200E-01, & 2.16004750E-01, 1.76209504E-01, 1.49533746E-01, 1.30405068E-01, & 1.16013073E-01, 1.04792545E-01, 9.57997142E-02, 8.84294002E-02/ DATA ((DAS (I,J), I=1801,1900), J=1,1) / & 8.22793258E-02, 7.70700751E-02, 7.26001485E-02, 6.87229460E-02, & 6.53282289E-02, 6.23305797E-02, 4.69535794E-02, 3.90119771E-02, & 3.41622978E-02, 3.08928974E-02, 2.85393695E-02, 2.67639839E-02, & 2.53769379E-02, 2.33493404E-02, 2.19382503E-02, 2.13821144E-02, & 2.08992746E-02, 1.91562178E-02, 1.78726394E-02, 1.71007976E-02, & 1.65841396E-02, 1.62132255E-02, 1.59331525E-02, 1.57131877E-02, & 1.55351226E-02, 1.53873587E-02, 1.52617596E-02, 1.51527171E-02, & 1.50565113E-02, 1.49703626E-02, 1.48921451E-02, 1.48201919E-02, & 1.47531618E-02, 1.46899429E-02, 1.46295761E-02, 1.45711512E-02, & 1.45138855E-02, 1.44575335E-02, 1.44002196E-02, 1.33309345E-02, & 1.30787536E-02, 1.28359445E-02, 1.26053715E-02, 1.24144315E-02, & 1.22536006E-02, 1.21167781E-02, 1.20004777E-02, 1.19027159E-02, & 1.18259280E-02, 1.17630327E-02, 1.17127919E-02, 1.16734364E-02, & 1.16293274E-02, 1.16124500E-02, 1.16068678E-02, 1.16119688E-02, & 1.16275010E-02, 1.16539351E-02, 1.15913903E-02, 1.17373707E-02, & 1.17969433E-02, 1.18663106E-02, 1.19493783E-02, 1.20446716E-02, & 1.21546872E-02, 1.22800863E-02, 1.24213394E-02, 1.25787623E-02, & 1.27644884E-02, 1.29770150E-02, 1.32224014E-02, 1.35282164E-02, & 1.39323705E-02, 1.49200176E-02, 1.58537196E-02, 1.62060995E-02, & 1.64614977E-02, 1.66593533E-02, 1.68252251E-02, 1.69657571E-02, & 1.70812552E-02, 1.71818301E-02, 1.72682387E-02, 1.73413481E-02, & 1.74011702E-02, 1.74509096E-02, 1.76099367E-02, 1.75208266E-02, & 1.75420138E-02, 1.75551162E-02, 1.75597636E-02, 1.75559133E-02, & 1.75436758E-02, 1.75082551E-02, 1.74776743E-02, 1.74397920E-02, & 1.73934975E-02, 1.73322107E-02, 1.72634333E-02, 1.71864843E-02/ DATA ((DAS (I,J), I=1901,2000), J=1,1) / & 1.70887061E-02, 1.69756246E-02, 1.68445936E-02, 1.66922393E-02, & 1.65141903E-02, 1.62970253E-02, 1.60291874E-02, 1.56830201E-02, & 1.49077403E-02, 1.48661852E-02, 1.47110146E-02, 1.46095815E-02, & 1.45304473E-02, 1.44617919E-02, 1.43967443E-02, 1.43264187E-02, & 1.42260991E-02, 1.42360529E-02, 1.42112474E-02, 1.41826107E-02, & 1.41531570E-02, 1.41235694E-02, 1.40937902E-02, 1.40643352E-02, & 1.40349307E-02, 1.40055114E-02, 1.39759838E-02, 1.39463955E-02, & 1.38929192E-02, 1.38851314E-02, 1.38535225E-02, 1.38220141E-02, & 1.37890891E-02, 1.37549659E-02, 1.37194519E-02, 1.36823322E-02, & 1.36418258E-02, 1.36013374E-02, 1.35566371E-02, 1.35077021E-02, & 1.34536521E-02, 1.33922902E-02, 1.33199109E-02, 1.32286385E-02, & 1.30619936E-02, 1.31559003E-02, 1.33665326E-02, 1.36375250E-02, & 1.39482883E-02, 1.42788829E-02, 1.46110468E-02, 1.49252055E-02, & 1.52083559E-02, 1.54535707E-02, 1.56552643E-02, 1.58147913E-02, & 1.59350786E-02, 1.60201587E-02, 1.60747436E-02, 1.61050507E-02, & 1.61152574E-02, 1.61095649E-02, 1.60839543E-02, 1.60546688E-02, & 1.60188520E-02, 1.59776051E-02, 1.59313332E-02, 1.58785975E-02, & 1.58221790E-02, 1.57627645E-02, 1.56993371E-02, 1.56299463E-02, & 1.55357781E-02, 1.54980240E-02, 1.54480123E-02, 1.53910186E-02, & 1.53290415E-02, 1.52550928E-02, 1.51947109E-02, 1.51190297E-02, & 1.45773543E-02, 1.45410388E-02, 1.45055798E-02, 1.44710187E-02, & 1.44377378E-02, 1.44062036E-02, 1.43790017E-02, 1.43540849E-02, & 1.43321340E-02, 1.43138212E-02, 1.43035214E-02, 1.42894553E-02, & 1.42917071E-02, 1.43038927E-02, 1.43281804E-02, 1.43671681E-02, & 1.44228921E-02, 1.44989293E-02, 1.46003332E-02, 1.47520680E-02/ DATA ((DAS (I,J), I=2001,2100), J=1,1) / & 1.48359714E-02, 1.49509214E-02, 1.50904304E-02, 1.52429042E-02, & 1.54001786E-02, 1.55561300E-02, 1.57021143E-02, 1.58360082E-02, & 1.59521811E-02, 1.60474967E-02, 1.61201964E-02, 1.61703185E-02, & 1.61977563E-02, 1.62024209E-02, 1.61754088E-02, 1.60688610E-02, & 1.59417132E-02, 1.58907641E-02, 1.58794956E-02, 1.58212519E-02, & 1.57941382E-02, 1.57706964E-02, 1.57484551E-02, 1.57279872E-02, & 1.57092311E-02, 1.56918132E-02, 1.56751532E-02, 1.56593691E-02, & 1.56446859E-02, 1.56301722E-02, 1.56161751E-02, 1.56024423E-02, & 1.55893016E-02, 1.55927591E-02, 1.55641684E-02, 1.55522550E-02, & 1.55404708E-02, 1.55288817E-02, 1.55175607E-02, 1.55063839E-02, & 1.54953604E-02, 1.54844995E-02, 1.54738110E-02, 1.54632154E-02, & 1.54528290E-02, 1.54425544E-02, 1.54414639E-02, 1.54222831E-02, & 1.54123844E-02, 1.54027199E-02, 1.53933132E-02, 1.53632597E-02, & 1.51901781E-02, 1.50916714E-02, 1.50241299E-02, 1.49682599E-02, & 1.49240489E-02, 1.48815826E-02, 1.48455527E-02, 1.48101140E-02, & 1.47757726E-02, 1.47429799E-02, 1.47077796E-02, 1.46726709E-02, & 1.46910058E-02, 1.47093407E-02, 1.47490819E-02, 1.47865814E-02, & 1.48194370E-02, 1.48512766E-02, 1.48797723E-02, 1.49078654E-02, & 1.49333673E-02, 1.49588079E-02, 1.49831732E-02, 1.50056031E-02, & 1.50282484E-02, 1.50492271E-02, 1.50705239E-02, 1.50903488E-02, & 1.51105599E-02, 1.51294448E-02, 1.51487621E-02, 1.51668660E-02, & 1.51854338E-02, 1.52028771E-02, 1.52200331E-02, 1.52376830E-02, & 1.52543105E-02, 1.52714447E-02, 1.52876103E-02, 1.53042912E-02, & 1.53200489E-02, 1.53363275E-02, 1.53517214E-02, 1.53676397E-02, & 1.53827065E-02, 1.53982997E-02, 1.54137385E-02, 1.54283681E-02/ DATA ((DAS (I,J), I=2101,2180), J=1,1) / & 1.54435248E-02, 1.54578962E-02, 1.54727942E-02, 1.54869282E-02, & 1.55015877E-02, 1.55155022E-02, 1.55299408E-02, 1.55436515E-02, & 1.55578844E-02, 1.55714051E-02, 1.55848375E-02, 1.55987889E-02, & 1.56120490E-02, 1.56258258E-02, 1.56389238E-02, 1.56503529E-02, & 1.56633506E-02, 1.56768665E-02, 1.56897273E-02, 1.57031040E-02, & 1.57158351E-02, 1.57290796E-02, 1.57422592E-02, 1.57548064E-02, & 1.57678633E-02, 1.57802959E-02, 1.57932357E-02, 1.58055588E-02, & 1.58183866E-02, 1.58306047E-02, 1.58434663E-02, 1.58555850E-02, & 1.58682031E-02, 1.58802245E-02, 1.58927427E-02, 1.59046703E-02, & 1.59165532E-02, 1.59289294E-02, 1.59407234E-02, 1.59530082E-02, & 1.59647162E-02, 1.59769125E-02, 1.59885373E-02, 1.60364196E-02, & 1.60479525E-02, 1.60599473E-02, 1.60713616E-02, 1.60832339E-02, & 1.61750069E-02, 1.62982441E-02, 1.63176118E-02, 1.71759717E-02, & 1.75617092E-02, 1.85752158E-02, 1.92532810E-02, 1.91732457E-02, & 1.99367302E-02, 1.99391523E-02, 2.05123737E-02, 2.05342412E-02, & 2.05473863E-02, 2.08321629E-02, 2.10218655E-02, 2.10559041E-02, & 2.11115380E-02, 2.11940011E-02, 2.12521898E-02, 2.12887396E-02, & 2.16436077E-02, 2.16615673E-02, 2.17697628E-02, 2.17891458E-02, & 2.20843281E-02, 2.19079640E-02, 2.19672070E-02, 2.19933073E-02, & 2.20357986E-02, 2.21443566E-02, 2.21905046E-02, 2.24959263E-02/ DATA ((DAS (I,J), I= 1, 100), J=2,2) / & 1.08454123E-06, 1.20169696E-06, 1.34790650E-06, 1.56283744E-06, & 1.88311044E-06, 1.99930469E-06, 2.54649284E-06, 2.31154503E-06, & 2.55120732E-06, 2.98077204E-06, 2.81962622E-06, 2.96945625E-06, & 3.16423131E-06, 3.28464557E-06, 3.71207074E-06, 3.78583724E-06, & 3.93166030E-06, 4.02919395E-06, 4.18251088E-06, 3.95832188E-06, & 4.07216776E-06, 4.26288752E-06, 4.35418972E-06, 4.77793268E-06, & 4.92022239E-06, 4.94933650E-06, 4.95732943E-06, 5.05152653E-06, & 5.20497101E-06, 5.25244548E-06, 5.42997262E-06, 5.60568929E-06, & 5.79639507E-06, 6.01017487E-06, 6.24254585E-06, 6.57663178E-06, & 6.87334844E-06, 7.17614469E-06, 7.50453846E-06, 7.90529128E-06, & 8.37380867E-06, 8.82360711E-06, 9.56973753E-06, 1.07059464E-05, & 1.16084467E-05, 1.18879850E-05, 1.18197512E-05, 1.15061699E-05, & 1.38899230E-05, 1.65402421E-05, 1.79498019E-05, 2.07601195E-05, & 1.95177946E-05, 1.86164078E-05, 1.87317086E-05, 1.72214773E-05, & 1.65007917E-05, 1.64598909E-05, 1.70299195E-05, 1.69197164E-05, & 1.72674506E-05, 1.73523817E-05, 1.81088602E-05, 1.82867751E-05, & 1.88317722E-05, 2.05249703E-05, 2.13104931E-05, 2.15943567E-05, & 2.33565779E-05, 2.22349298E-05, 2.25604516E-05, 2.33798814E-05, & 2.42820072E-05, 2.48432894E-05, 2.46593722E-05, 2.46865494E-05, & 2.46520499E-05, 6.32402158E-05, 5.53093829E-05, 7.95814968E-05, & 5.35478679E-05, 5.28758113E-05, 4.61347163E-05, 4.62052603E-05, & 4.61747113E-05, 4.31100795E-05, 4.33374423E-05, 4.36028148E-05, & 4.23274451E-05, 4.26057868E-05, 4.18511413E-05, 4.18032548E-05, & 4.17605711E-05, 4.19698903E-05, 4.24605965E-05, 4.29586633E-05, & 4.49193456E-05, 4.67548780E-05, 4.84791660E-05, 5.00577471E-05/ DATA ((DAS (I,J), I= 101, 200), J=2,2) / & 5.19963112E-05, 5.39787268E-05, 5.57617293E-05, 5.67894579E-05, & 5.73045549E-05, 5.67352284E-05, 5.61688518E-05, 5.56054251E-05, & 5.51264453E-05, 5.31618320E-05, 5.03323867E-05, 4.78412425E-05, & 4.51512746E-05, 4.20987458E-05, 3.91030118E-05, 3.46883647E-05, & 3.46029553E-05, 3.44277402E-05, 3.45512010E-05, 3.75079835E-05, & 4.16111102E-05, 4.54044441E-05, 4.92380541E-05, 5.18364558E-05, & 5.46401468E-05, 5.64734167E-05, 5.65922115E-05, 5.70919564E-05, & 5.76123859E-05, 5.80560849E-05, 5.70714296E-05, 5.60891730E-05, & 5.47935541E-05, 5.33417901E-05, 5.14543677E-05, 4.97020748E-05, & 4.67137082E-05, 4.42036245E-05, 4.23021909E-05, 4.09048512E-05, & 3.95767088E-05, 3.87614672E-05, 3.71777327E-05, 3.63417452E-05, & 3.62352838E-05, 3.57231448E-05, 3.52447982E-05, 3.43363376E-05, & 3.47695426E-05, 3.43989617E-05, 3.39314446E-05, 3.22396292E-05, & 3.31550941E-05, 3.36624967E-05, 3.52555976E-05, 2.15339448E-05, & 2.47148820E-05, 2.94962230E-05, 3.91666420E-05, 7.24278139E-05, & 9.24194540E-05, 2.18421464E-05, 1.94352285E-05, 1.83117222E-05, & 1.78027874E-05, 1.86302066E-05, 1.97903686E-05, 1.88862205E-05, & 1.88960016E-05, 1.79255277E-05, 1.81310857E-05, 1.73789073E-05, & 1.67276559E-05, 1.61635134E-05, 1.71710148E-05, 1.77850021E-05, & 1.65328553E-05, 1.56274335E-05, 1.56465549E-05, 1.53795005E-05, & 1.51588234E-05, 1.50829963E-05, 1.45238938E-05, 1.41167212E-05, & 1.39107364E-05, 1.35312227E-05, 1.36541577E-05, 1.30365533E-05, & 1.34366840E-05, 1.28916664E-05, 1.29545838E-05, 1.30089964E-05, & 1.35495494E-05, 1.39253563E-05, 1.31320158E-05, 1.25767014E-05, & 1.18042440E-05, 1.28736824E-05, 1.54084683E-05, 3.55608572E-05/ DATA ((DAS (I,J), I= 201, 300), J=2,2) / & 2.15195934E-05, 1.31584697E-05, 1.21581536E-05, 1.16771609E-05, & 1.17218470E-05, 1.22398576E-05, 1.29247968E-05, 1.32214160E-05, & 1.32902286E-05, 1.32615256E-05, 1.32783544E-05, 1.33819672E-05, & 1.35707138E-05, 1.35400323E-05, 1.34576312E-05, 1.34768368E-05, & 1.34843078E-05, 1.35193099E-05, 1.36188023E-05, 1.37750708E-05, & 1.39716225E-05, 1.41950283E-05, 1.44215543E-05, 1.46451117E-05, & 1.48711667E-05, 1.51551271E-05, 1.56350306E-05, 1.67294094E-05, & 1.98397305E-05, 3.16261952E-05, 5.29039740E-05, 4.87967040E-05, & 3.79684466E-05, 2.16315227E-05, 1.62136452E-05, 1.49271200E-05, & 2.43952650E-05, 2.52300929E-05, 2.61621789E-05, 2.71678021E-05, & 2.82587750E-05, 2.94263498E-05, 3.06410021E-05, 3.18279384E-05, & 3.30148746E-05, 3.41825678E-05, 3.56883653E-05, 3.78254667E-05, & 4.09971830E-05, 4.52818414E-05, 4.97549639E-05, 5.33736999E-05, & 6.19856071E-05, 7.70283411E-05, 8.30533534E-05, 8.97812821E-05, & 9.62494219E-05, 1.04797240E-04, 1.14336883E-04, 1.23095414E-04, & 1.32642877E-04, 1.42261035E-04, 1.53525567E-04, 1.66529738E-04, & 1.77560513E-04, 1.90330136E-04, 2.02756054E-04, 2.06098321E-04, & 2.05035585E-04, 1.97406931E-04, 1.80811589E-04, 1.54779271E-04, & 1.24519211E-04, 9.20313560E-05, 7.35219555E-05, 8.78552549E-05, & 1.19739532E-04, 1.52169803E-04, 1.78002295E-04, 1.95030109E-04, & 2.01750172E-04, 2.04699459E-04, 2.00054645E-04, 1.89753128E-04, & 1.80023504E-04, 1.67557442E-04, 1.54747723E-04, 1.42530480E-04, & 1.31252980E-04, 1.20864604E-04, 1.11519450E-04, 9.94976631E-05, & 9.23791177E-05, 8.89570291E-05, 8.30003086E-05, 7.78290935E-05, & 7.37742561E-05, 7.08345319E-05, 6.72887325E-05, 6.24465867E-05/ DATA ((DAS (I,J), I= 301, 400), J=2,2) / & 5.90763319E-05, 5.69393015E-05, 5.39232729E-05, 5.12241824E-05, & 4.44259320E-05, 4.05157190E-05, 3.97249508E-05, 3.74833318E-05, & 3.48289151E-05, 3.22401299E-05, 3.01684137E-05, 2.85959413E-05, & 2.73616238E-05, 2.63532904E-05, 2.55124876E-05, 2.47937365E-05, & 2.41631084E-05, 2.36091744E-05, 2.31268567E-05, 2.27085940E-05, & 1.59478887E-05, 1.51683192E-05, 1.51460903E-05, 1.64362142E-05, & 2.18684427E-05, 4.17565653E-05, 3.82628135E-05, 2.12425921E-05, & 1.73461146E-05, 1.59305146E-05, 1.52164498E-05, 1.47180291E-05, & 1.44200273E-05, 1.42292296E-05, 1.41956764E-05, 1.40636777E-05, & 1.40628021E-05, 1.41069043E-05, 1.41921147E-05, 1.43161484E-05, & 1.44777164E-05, 1.46215790E-05, 1.46934673E-05, 1.48483489E-05, & 1.49171907E-05, 1.48048028E-05, 1.47396076E-05, 1.47306485E-05, & 1.47881121E-05, 1.49242878E-05, 1.51525658E-05, 1.52962829E-05, & 1.50095830E-05, 1.47352540E-05, 1.44759129E-05, 1.42347114E-05, & 1.36844443E-05, 1.40734091E-05, 1.46125964E-05, 1.65933552E-05, & 1.66298865E-05, 1.65140042E-05, 1.62592229E-05, 1.64326873E-05, & 1.54031435E-05, 1.50213483E-05, 1.37203209E-05, 1.52365053E-05, & 1.51015811E-05, 1.43780683E-05, 1.44817528E-05, 1.40480413E-05, & 1.39659498E-05, 1.42628823E-05, 1.32675753E-05, 1.42244964E-05, & 1.34033682E-05, 1.37599063E-05, 1.34802623E-05, 1.41782733E-05, & 1.31500591E-05, 1.40748311E-05, 1.30351751E-05, 1.39333204E-05, & 1.35530471E-05, 1.36272073E-05, 1.41645051E-05, 1.33043829E-05, & 1.43946068E-05, 1.37826592E-05, 1.38384067E-05, 1.45263057E-05, & 1.41822828E-05, 1.58784968E-05, 1.48730386E-05, 1.59367345E-05, & 1.59736220E-05, 1.81834820E-05, 1.78071654E-05, 1.73632490E-05/ DATA ((DAS (I,J), I= 401, 500), J=2,2) / & 1.83300026E-05, 2.05613031E-05, 2.16964197E-05, 2.02129614E-05, & 1.96566645E-05, 2.03661495E-05, 2.17959013E-05, 2.30210670E-05, & 2.31299525E-05, 2.19763169E-05, 2.29902683E-05, 2.28441685E-05, & 2.35530223E-05, 2.61952041E-05, 2.54406644E-05, 2.36090439E-05, & 2.44667901E-05, 2.25584966E-05, 2.27964170E-05, 2.50807393E-05, & 2.54690715E-05, 2.61610544E-05, 2.71525194E-05, 2.62089489E-05, & 2.52096195E-05, 2.64457039E-05, 2.64846922E-05, 2.96014472E-05, & 2.96294395E-05, 2.89083980E-05, 3.05647259E-05, 2.91735193E-05, & 2.98951029E-05, 3.13280298E-05, 3.33078289E-05, 3.09798326E-05, & 3.10858824E-05, 3.03393692E-05, 3.19226354E-05, 3.55636673E-05, & 3.49211633E-05, 3.57794638E-05, 3.45308247E-05, 3.47691677E-05, & 3.38071784E-05, 3.33139690E-05, 3.80151450E-05, 3.51616717E-05, & 3.70754162E-05, 3.35661440E-05, 3.86735794E-05, 3.85269543E-05, & 3.87064831E-05, 3.92202152E-05, 3.63848742E-05, 3.34131082E-05, & 3.23141339E-05, 3.38265072E-05, 3.73185111E-05, 3.78076352E-05, & 3.76706767E-05, 3.70706606E-05, 3.72463799E-05, 3.62109793E-05, & 3.68321629E-05, 3.69203511E-05, 3.55278147E-05, 3.68789231E-05, & 3.93932160E-05, 3.82205186E-05, 3.90985073E-05, 3.97795457E-05, & 4.31146440E-05, 4.59623754E-05, 4.66085494E-05, 5.18508869E-05, & 5.41226919E-05, 5.17952832E-05, 5.05757040E-05, 4.80093941E-05, & 4.74352180E-05, 5.55381468E-05, 6.02548278E-05, 5.99195760E-05, & 5.04555780E-05, 5.27906030E-05, 5.54709269E-05, 5.79625130E-05, & 5.30601131E-05, 5.38365822E-05, 5.38253184E-05, 5.41520783E-05, & 5.61762296E-05, 5.60104954E-05, 5.20394659E-05, 5.04372575E-05, & 5.65159691E-05, 6.55199689E-05, 6.35600022E-05, 7.50520446E-05/ DATA ((DAS (I,J), I= 501, 600), J=2,2) / & 8.03611241E-05, 7.68111847E-05, 7.18582752E-05, 7.03090430E-05, & 5.20283222E-05, 5.18821004E-05, 5.13033863E-05, 4.33932983E-05, & 3.86315494E-05, 3.64152844E-05, 3.56653527E-05, 3.52470241E-05, & 3.49530503E-05, 3.46896650E-05, 3.43421895E-05, 3.34771188E-05, & 2.90135430E-05, 3.02023433E-05, 2.66002719E-05, 2.48448682E-05, & 2.36923561E-05, 2.26774107E-05, 2.10662803E-05, 2.09009574E-05, & 2.04819602E-05, 2.04025262E-05, 2.05558917E-05, 2.08866474E-05, & 2.13775426E-05, 2.05653078E-05, 1.99144509E-05, 1.94377552E-05, & 1.91942570E-05, 1.89331025E-05, 1.78014762E-05, 1.78797148E-05, & 1.83542689E-05, 1.82682610E-05, 1.80997535E-05, 1.81724309E-05, & 1.80810565E-05, 1.79608943E-05, 1.77521429E-05, 1.76306059E-05, & 1.75915165E-05, 1.74873944E-05, 1.74639804E-05, 1.73722452E-05, & 1.73604147E-05, 1.72775845E-05, 1.72742000E-05, 1.71979154E-05, & 1.72011699E-05, 1.71297802E-05, 1.70666652E-05, 1.70101773E-05, & 1.69590830E-05, 1.69124281E-05, 1.68694517E-05, 1.68295280E-05, & 1.67921249E-05, 1.67567734E-05, 1.67230427E-05, 1.66907379E-05, & 1.66597226E-05, 1.66296802E-05, 1.66002849E-05, 1.65711858E-05, & 1.65420891E-05, 1.65126098E-05, 1.64821390E-05, 1.64499039E-05, & 1.64148745E-05, 1.64047354E-05, 1.63958226E-05, 1.63880866E-05, & 1.63814857E-05, 1.63759854E-05, 1.63715578E-05, 1.63681817E-05, & 1.63658421E-05, 1.63645305E-05, 1.63642454E-05, 1.63517212E-05, & 1.63647984E-05, 1.63526128E-05, 1.63660472E-05, 1.63542401E-05, & 1.63680694E-05, 1.63566796E-05, 1.63709419E-05, 1.63600100E-05, & 1.63747465E-05, 1.63643177E-05, 1.63795755E-05, 1.63697029E-05, & 1.63855385E-05, 1.63762870E-05, 1.63927714E-05, 1.63842231E-05/ DATA ((DAS (I,J), I= 601, 700), J=2,2) / & 1.64014480E-05, 1.63842573E-05, 1.64072130E-05, 1.63998418E-05, & 1.63939841E-05, 1.63895268E-05, 1.63863849E-05, 1.63844983E-05, & 1.63838284E-05, 1.63843572E-05, 1.63860862E-05, 1.63890370E-05, & 1.63932522E-05, 1.63987979E-05, 1.64001427E-05, 1.63902152E-05, & 1.63927884E-05, 1.63829192E-05, 1.63865831E-05, 1.63765964E-05, & 1.63812427E-05, 1.63702064E-05, 1.63765529E-05, 1.63660562E-05, & 1.63722789E-05, 1.63613363E-05, 1.63681094E-05, 1.63565825E-05, & 1.63637223E-05, 1.63514027E-05, 1.63588046E-05, 1.63454236E-05, & 1.63526334E-05, 1.63377939E-05, 1.63382169E-05, 1.63754585E-05, & 1.64207660E-05, 1.64285450E-05, 1.64414384E-05, 1.64486396E-05, & 1.64582325E-05, 1.64664426E-05, 1.64754710E-05, 1.64852708E-05, & 1.64914432E-05, 1.64900245E-05, 1.64890407E-05, 1.64884912E-05, & 1.64883757E-05, 1.64886940E-05, 1.64894457E-05, 1.64906309E-05, & 1.64922494E-05, 1.64943012E-05, 1.64967865E-05, 1.64997663E-05, & 1.65030581E-05, 1.65069081E-05, 1.65072477E-05, 1.65142807E-05, & 1.65178091E-05, 1.65200766E-05, 1.65217787E-05, 1.65229748E-05, & 1.65239692E-05, 1.65247524E-05, 1.65255441E-05, 1.65261149E-05, & 1.65266900E-05, 1.65271533E-05, 1.65276193E-05, 1.65279707E-05, & 1.65284417E-05, 1.65286782E-05, 1.65290343E-05, 1.65293920E-05, & 1.65296313E-05, 1.65299916E-05, 1.65302327E-05, 1.65301864E-05, & 1.65300058E-05, 1.65298934E-05, 1.65297817E-05, 1.65297385E-05, & 1.65295605E-05, 1.65294510E-05, 1.65293421E-05, 1.65292340E-05, & 1.65290731E-05, 1.65289667E-05, 1.65288084E-05, 1.65286517E-05, & 1.65282417E-05, 1.65278429E-05, 1.65276963E-05, 1.65275512E-05, & 1.65274554E-05, 1.65273130E-05, 1.65272189E-05, 1.65271256E-05/ DATA ((DAS (I,J), I= 701, 800), J=2,2) / & 1.65271016E-05, 1.65269410E-05, 1.65268497E-05, 1.65268280E-05, & 1.65266693E-05, 1.65265802E-05, 1.65264918E-05, 1.65264040E-05, & 1.65262737E-05, 1.65262569E-05, 1.65260601E-05, 1.65259341E-05, & 1.65258509E-05, 1.65256867E-05, 1.65255654E-05, 1.65254061E-05, & 1.65253192E-05, 1.65250580E-05, 1.65248707E-05, 1.65246160E-05, & 1.65243698E-05, 1.65240660E-05, 1.65237139E-05, 1.65232397E-05, & 1.65226610E-05, 1.65218971E-05, 1.65212615E-05, 1.65209710E-05, & 1.65211180E-05, 1.65217020E-05, 1.65227230E-05, 1.65241808E-05, & 1.65260754E-05, 1.65284070E-05, 1.65311756E-05, 1.65343815E-05, & 1.65380249E-05, 1.65421063E-05, 1.65466261E-05, 1.65515849E-05, & 1.65569832E-05, 1.65621000E-05, 1.65632948E-05, 1.65649887E-05, & 1.65934423E-05, 1.66204601E-05, 1.66464600E-05, 1.66717568E-05, & 1.66942552E-05, 1.67164723E-05, 1.67385598E-05, 1.67606408E-05, & 1.67514639E-05, 1.67402943E-05, 1.67445716E-05, 1.67790558E-05, & 1.68113034E-05, 1.68420916E-05, 1.68719924E-05, 1.69013414E-05, & 1.69304210E-05, 1.69594084E-05, 1.69885069E-05, 1.70177936E-05, & 1.70473820E-05, 1.70791782E-05, 1.71111115E-05, 1.71433234E-05, & 1.71759216E-05, 1.72089915E-05, 1.72426034E-05, 1.72768170E-05, & 1.73116849E-05, 1.73472542E-05, 1.73835684E-05, 1.74206681E-05, & 1.74585924E-05, 1.74973787E-05, 1.75370645E-05, 1.75776861E-05, & 1.76192802E-05, 1.76618839E-05, 1.77055347E-05, 1.77502710E-05, & 1.77961321E-05, 1.78431585E-05, 1.78913921E-05, 1.79408764E-05, & 1.79916564E-05, 1.80437792E-05, 1.80972941E-05, 1.81522525E-05, & 1.82087084E-05, 1.82667185E-05, 1.83263426E-05, 1.83876436E-05, & 1.84506878E-05, 1.85155455E-05, 1.85822910E-05, 1.86510028E-05/ DATA ((DAS (I,J), I= 801, 900), J=2,2) / & 1.87217645E-05, 1.87946647E-05, 1.88697978E-05, 1.89472641E-05, & 1.90271708E-05, 1.91096319E-05, 1.91947697E-05, 1.92827148E-05, & 1.93736072E-05, 1.94675970E-05, 1.95648455E-05, 1.96655264E-05, & 1.97698141E-05, 1.98779906E-05, 1.99901070E-05, 2.01065412E-05, & 2.02275055E-05, 2.03532798E-05, 2.04841636E-05, 2.06204856E-05, & 2.07625970E-05, 2.09109059E-05, 2.10658370E-05, 2.12278644E-05, & 2.13975106E-05, 2.15753527E-05, 2.17620305E-05, 2.19582555E-05, & 2.21648184E-05, 2.23826077E-05, 2.26126186E-05, 2.28559732E-05, & 2.31139418E-05, 2.33879687E-05, 2.36797044E-05, 2.39910438E-05, & 2.43241682E-05, 2.46814372E-05, 2.50657086E-05, 2.54804480E-05, & 2.59297921E-05, 2.64188439E-05, 2.69535818E-05, 2.75413825E-05, & 2.81923725E-05, 2.89184550E-05, 2.96483792E-05, 2.96388384E-05, & 2.95377407E-05, 2.94364531E-05, 2.93346045E-05, 2.92329051E-05, & 2.91314785E-05, 2.90306649E-05, 2.89307378E-05, 2.88323867E-05, & 2.87300792E-05, 3.75646208E-05, 4.43199408E-05, 4.40370418E-05, & 4.32779394E-05, 4.20127686E-05, 3.71413779E-05, 3.37149263E-05, & 3.11622893E-05, 3.14679306E-05, 3.16609196E-05, 3.03230078E-05, & 3.04368963E-05, 2.73586302E-05, 2.75938913E-05, 2.82138196E-05, & 2.93413641E-05, 2.81050041E-05, 2.73626216E-05, 2.67879728E-05, & 2.64733835E-05, 2.62704176E-05, 2.61038876E-05, 2.59003330E-05, & 2.55029364E-05, 2.55422006E-05, 2.56747500E-05, 2.54765296E-05, & 2.56806012E-05, 2.57612973E-05, 2.58479775E-05, 2.61931254E-05, & 2.61169676E-05, 2.60637200E-05, 2.61069396E-05, 2.60780323E-05, & 2.61635338E-05, 2.61753088E-05, 2.62818665E-05, 2.63162028E-05, & 2.64442845E-05, 2.64998155E-05, 2.66426400E-05, 2.67138401E-05/ DATA ((DAS (I,J), I= 901,1000), J=2,2) / & 2.68028129E-05, 2.69045213E-05, 2.69699053E-05, 2.70640671E-05, & 2.71508363E-05, 2.72472184E-05, 2.73324273E-05, 2.74256420E-05, & 2.75259183E-05, 2.76261436E-05, 2.77415301E-05, 2.78500776E-05, & 2.79807145E-05, 2.80991919E-05, 2.82396596E-05, 2.83765563E-05, & 2.85276950E-05, 2.86859041E-05, 2.88513977E-05, 2.90324657E-05, & 2.91662536E-05, 2.92111543E-05, 2.92479554E-05, 2.93065854E-05, & 2.93234148E-05, 2.93363366E-05, 2.93469137E-05, 2.93557616E-05, & 2.93631796E-05, 2.93685232E-05, 2.93742049E-05, 2.93781592E-05, & 2.93794295E-05, 2.93848929E-05, 2.93892219E-05, 2.93922870E-05, & 2.93953726E-05, 2.93977867E-05, 2.94005610E-05, 2.94030019E-05, & 2.94054552E-05, 2.94079209E-05, 2.94100444E-05, 2.94125333E-05, & 2.94146766E-05, 2.94168291E-05, 2.94189907E-05, 2.94202506E-05, & 2.94237057E-05, 2.94233767E-05, 2.94284638E-05, 2.94314134E-05, & 2.94343792E-05, 2.94381837E-05, 2.94396636E-05, 2.94414451E-05, & 2.94460515E-05, 2.94477102E-05, 2.94493758E-05, 2.94510825E-05, & 2.94578052E-05, 2.94605384E-05, 2.94632890E-05, 2.94653633E-05, & 2.94677957E-05, 2.94698913E-05, 2.94723484E-05, 2.94744652E-05, & 2.94765917E-05, 2.94756406E-05, 2.94812327E-05, 2.94802856E-05, & 2.94859198E-05, 2.94884626E-05, 2.94890892E-05, 2.94908131E-05, & 2.94965413E-05, 2.94998843E-05, 2.95032493E-05, 2.95070142E-05, & 2.95111870E-05, 2.95157769E-05, 2.95171690E-05, 2.95200644E-05, & 2.95266743E-05, 2.95341551E-05, 2.95473761E-05, 2.95547237E-05, & 2.95674990E-05, 2.95876299E-05, 2.95988369E-05, 2.96086730E-05, & 2.96285591E-05, 2.96534268E-05, 2.96716476E-05, 2.97270421E-05, & 2.97458695E-05, 2.98007326E-05, 2.99995392E-05, 3.02136232E-05/ DATA ((DAS (I,J), I=1001,1100), J=2,2) / & 3.04055229E-05, 3.06482149E-05, 3.09062689E-05, 3.11873427E-05, & 3.14188398E-05, 3.16557819E-05, 3.19480444E-05, 3.22880944E-05, & 3.25365079E-05, 3.28441485E-05, 3.32184293E-05, 3.35656413E-05, & 3.38608786E-05, 3.41950654E-05, 3.46068536E-05, 3.50999865E-05, & 3.53245368E-05, 3.59903929E-05, 3.66400301E-05, 3.80036408E-05, & 3.73092596E-05, 3.66155681E-05, 3.77856094E-05, 3.61820945E-05, & 3.85319297E-05, 3.81048208E-05, 4.16083611E-05, 4.01817000E-05, & 4.09801325E-05, 4.04546206E-05, 4.04020713E-05, 4.05608692E-05, & 4.01807181E-05, 4.03766720E-05, 4.01834623E-05, 4.01334772E-05, & 4.03063233E-05, 4.00872399E-05, 4.01250874E-05, 4.00575715E-05, & 3.96607295E-05, 3.96044723E-05, 3.95186913E-05, 3.91704600E-05, & 3.89736106E-05, 3.88122076E-05, 3.88399383E-05, 3.87118175E-05, & 3.87110919E-05, 3.86645636E-05, 3.86943973E-05, 3.86609095E-05, & 3.87047892E-05, 3.87013160E-05, 3.87204247E-05, 3.87744936E-05, & 3.88728933E-05, 3.92097955E-05, 3.96310820E-05, 3.98691524E-05, & 4.00880779E-05, 4.03137719E-05, 4.05471386E-05, 4.07198661E-05, & 4.09684319E-05, 4.11495356E-05, 4.14029209E-05, 4.16418549E-05, & 4.19843482E-05, 4.21931362E-05, 4.26232236E-05, 4.31505873E-05, & 4.34933570E-05, 4.38495926E-05, 4.39362483E-05, 4.44699563E-05, & 4.47408227E-05, 4.49537472E-05, 4.54747913E-05, 4.56051612E-05, & 4.60196620E-05, 4.66326549E-05, 4.68735343E-05, 4.75100941E-05, & 4.82361220E-05, 4.90070235E-05, 5.04538870E-05, 5.06982640E-05, & 5.38654443E-05, 5.17469010E-05, 5.59553574E-05, 6.29077779E-05, & 6.84841967E-05, 6.21170446E-05, 6.26031731E-05, 6.30943667E-05, & 6.55187773E-05, 6.92778944E-05, 7.09309561E-05, 6.60684469E-05/ DATA ((DAS (I,J), I=1101,1200), J=2,2) / & 6.48769825E-05, 6.44154751E-05, 6.58429276E-05, 6.40502583E-05, & 6.39377037E-05, 6.20597648E-05, 6.29165738E-05, 6.32494757E-05, & 6.40559417E-05, 6.47089956E-05, 6.49897005E-05, 6.55031965E-05, & 6.59854453E-05, 6.61041551E-05, 6.62228648E-05, 6.63415746E-05, & 6.62985039E-05, 6.57706956E-05, 6.88061432E-05, 6.92950000E-05, & 7.16143276E-05, 6.92528755E-05, 7.23676602E-05, 7.00504565E-05, & 7.77508188E-05, 7.76078120E-05, 7.74370076E-05, 7.73818240E-05, & 7.19840694E-05, 7.82430965E-05, 7.78801813E-05, 8.24520437E-05, & 8.04645507E-05, 8.16372688E-05, 7.86438128E-05, 7.95206954E-05, & 7.83559618E-05, 8.27283455E-05, 8.30707180E-05, 8.49610036E-05, & 8.27232652E-05, 8.52319123E-05, 8.23523756E-05, 8.50877645E-05, & 8.79707222E-05, 8.87028531E-05, 8.38189686E-05, 8.16902467E-05, & 8.84406520E-05, 9.00108263E-05, 8.89883775E-05, 8.57257584E-05, & 8.55942346E-05, 8.84520350E-05, 8.61169361E-05, 8.76750655E-05, & 8.65433850E-05, 8.89202080E-05, 8.39218603E-05, 8.97086425E-05, & 9.15741343E-05, 9.48410877E-05, 9.24031664E-05, 9.44865372E-05, & 9.66841256E-05, 8.91843463E-05, 8.97915719E-05, 8.99249735E-05, & 9.13832920E-05, 8.98192324E-05, 8.97767809E-05, 9.29388551E-05, & 8.77169054E-05, 9.17557576E-05, 9.31652261E-05, 9.61034637E-05, & 9.46441000E-05, 9.67551638E-05, 9.66743564E-05, 1.02972872E-04, & 1.04833601E-04, 1.01642613E-04, 9.73718227E-05, 9.65683744E-05, & 1.13726416E-04, 1.16999520E-04, 1.14415719E-04, 1.02968420E-04, & 1.00702301E-04, 1.03890717E-04, 1.07707053E-04, 1.09831752E-04, & 1.07919694E-04, 9.71370700E-05, 1.00354135E-04, 1.02102295E-04, & 1.04658386E-04, 1.07920185E-04, 1.08130594E-04, 1.00290569E-04/ DATA ((DAS (I,J), I=1201,1300), J=2,2) / & 1.02417047E-04, 1.00053971E-04, 1.01608417E-04, 9.98326192E-05, & 1.01366835E-04, 1.01126646E-04, 1.05684240E-04, 1.07311484E-04, & 1.16233164E-04, 1.12827081E-04, 1.14470617E-04, 1.19879749E-04, & 1.12748679E-04, 1.18873116E-04, 1.27525671E-04, 1.55455875E-04, & 1.41105002E-04, 1.50524232E-04, 1.57761844E-04, 1.41672267E-04, & 1.46648281E-04, 1.50912728E-04, 1.79462562E-04, 1.83204084E-04, & 2.31971118E-04, 2.36578751E-04, 3.21700514E-04, 4.13115944E-04, & 5.59677517E-04, 7.15399188E-04, 4.71444525E-04, 2.56190411E-04, & 1.84439040E-04, 1.33100914E-04, 9.09175832E-05, 7.96170280E-05, & 7.12389689E-05, 5.95613951E-05, 5.17563415E-05, 4.87404603E-05, & 4.61466449E-05, 4.38910003E-05, 4.19107625E-05, 4.01579784E-05, & 3.85953414E-05, 3.71933674E-05, 3.59284302E-05, 3.47813644E-05, & 3.37364524E-05, 3.27806778E-05, 3.19031653E-05, 3.10947552E-05, & 3.03476766E-05, 2.96552928E-05, 2.90119006E-05, 2.84125717E-05, & 2.78530254E-05, 2.73295252E-05, 2.68387955E-05, 2.63779530E-05, & 2.59444497E-05, 2.55360266E-05, 2.51506738E-05, 2.47865982E-05, & 2.44421953E-05, 2.41160263E-05, 2.38067979E-05, 2.35133450E-05, & 2.32346167E-05, 2.29696637E-05, 2.27176273E-05, 2.24777306E-05, & 2.22492701E-05, 2.20743061E-05, 2.18241731E-05, 2.14379474E-05, & 2.10870387E-05, 2.07686241E-05, 2.04805481E-05, 2.02212964E-05, & 1.99900097E-05, 1.97865466E-05, 1.96116124E-05, 1.94669849E-05, & 1.93558938E-05, 1.92836572E-05, 1.92587741E-05, 1.92948730E-05, & 1.94143810E-05, 1.94322027E-05, 1.96559423E-05, 2.00909076E-05, & 2.08651032E-05, 2.19479688E-05, 2.23276092E-05, 2.35888421E-05, & 2.51051877E-05, 2.55953115E-05, 2.61468370E-05, 2.64495576E-05/ DATA ((DAS (I,J), I=1301,1400), J=2,2) / & 2.67728548E-05, 2.70478911E-05, 2.73390267E-05, 2.74911340E-05, & 2.76479008E-05, 2.78095753E-05, 2.79764270E-05, 2.81487496E-05, & 2.83268639E-05, 2.84182016E-05, 2.85111218E-05, 2.86056741E-05, & 2.87019106E-05, 2.87998862E-05, 2.88996586E-05, 2.90012888E-05, & 2.91048411E-05, 2.92103837E-05, 2.92499532E-05, 2.92736164E-05, & 2.92973815E-05, 2.93212495E-05, 2.93452210E-05, 2.93692970E-05, & 2.93934784E-05, 2.94177659E-05, 2.94421605E-05, 2.94666630E-05, & 2.94912745E-05, 2.95159957E-05, 2.95408276E-05, 2.95657712E-05, & 2.95908274E-05, 2.96159972E-05, 2.96412815E-05, 2.96666814E-05, & 2.96921979E-05, 2.97178320E-05, 2.97435848E-05, 2.97694573E-05, & 2.97954505E-05, 2.98215656E-05, 2.98478037E-05, 2.98741659E-05, & 2.99006533E-05, 2.99272671E-05, 2.99540085E-05, 2.99808787E-05, & 3.00078788E-05, 3.00350101E-05, 3.00622738E-05, 3.00896713E-05, & 3.01172038E-05, 3.01448726E-05, 3.01726791E-05, 3.02006245E-05, & 3.02287104E-05, 3.02569380E-05, 3.02853088E-05, 3.03138242E-05, & 3.03424858E-05, 3.03712949E-05, 3.04002532E-05, 3.04293622E-05, & 3.04586234E-05, 3.04880384E-05, 3.05176089E-05, 3.05270506E-05, & 3.05533404E-05, 3.05597662E-05, 3.05607725E-05, 3.05612764E-05, & 3.05622829E-05, 3.05632883E-05, 3.05642952E-05, 3.05653023E-05, & 3.05663095E-05, 3.05673170E-05, 3.05683246E-05, 3.05693310E-05, & 3.05703390E-05, 3.05713472E-05, 3.05723556E-05, 3.05733641E-05, & 3.05743728E-05, 3.05753817E-05, 3.05758856E-05, 3.05763894E-05, & 3.05768947E-05, 3.05773987E-05, 3.05779041E-05, 3.05784082E-05, & 3.05789123E-05, 3.05794178E-05, 3.05799220E-05, 3.05804276E-05, & 3.05809319E-05, 3.05809319E-05, 3.05810055E-05, 3.05810791E-05/ DATA ((DAS (I,J), I=1401,1500), J=2,2) / & 3.05811527E-05, 3.05812263E-05, 3.05812999E-05, 3.05814471E-05, & 3.05815944E-05, 3.05816680E-05, 3.05818152E-05, 3.05819624E-05, & 3.05821110E-05, 3.05822583E-05, 3.05824055E-05, 3.05825527E-05, & 3.05827000E-05, 3.05830259E-05, 3.05835304E-05, 3.05840363E-05, & 3.05845409E-05, 3.05850470E-05, 3.05855517E-05, 3.05860564E-05, & 3.05865626E-05, 3.05870674E-05, 3.05875737E-05, 3.05880786E-05, & 3.05890900E-05, 3.05901016E-05, 3.05911133E-05, 3.05931360E-05, & 3.05951607E-05, 3.05971862E-05, 3.05981993E-05, 3.05992111E-05, & 3.06002245E-05, 3.06012381E-05, 3.06022518E-05, 3.06032658E-05, & 3.06047863E-05, 3.06072700E-05, 3.06374792E-05, 3.06678525E-05, & 3.06983917E-05, 3.07290986E-05, 3.07599751E-05, 3.07910230E-05, & 3.08222445E-05, 3.08536414E-05, 3.08852157E-05, 3.09169696E-05, & 3.09489052E-05, 3.09810245E-05, 3.10133299E-05, 3.10458234E-05, & 3.10785074E-05, 3.11113842E-05, 3.11444563E-05, 3.11777259E-05, & 3.12111956E-05, 3.12448679E-05, 3.12787453E-05, 3.13128306E-05, & 3.13471264E-05, 3.13816353E-05, 3.14163603E-05, 3.14513042E-05, & 3.14864699E-05, 3.15218605E-05, 3.15574789E-05, 3.15933283E-05, & 3.16294119E-05, 3.16657329E-05, 3.17022948E-05, 3.17391010E-05, & 3.17761549E-05, 3.18134601E-05, 3.18510204E-05, 3.18888395E-05, & 3.19269212E-05, 3.19652696E-05, 3.20038886E-05, 3.20427825E-05, & 3.20819554E-05, 3.21214118E-05, 3.21611562E-05, 3.22011930E-05, & 3.22415272E-05, 3.22821634E-05, 3.23231067E-05, 3.27103206E-05, & 3.30480935E-05, 3.34946006E-05, 3.42468306E-05, 3.54691547E-05, & 3.81204724E-05, 3.90393061E-05, 4.13907336E-05, 4.29484919E-05, & 4.62645886E-05, 4.95322513E-05, 5.07144073E-05, 5.45058071E-05/ DATA ((DAS (I,J), I=1501,1600), J=2,2) / & 6.35073609E-05, 6.32569617E-05, 8.42736938E-05, 9.80771576E-05, & 9.95984895E-05, 9.14280990E-05, 7.62126941E-05, 6.72426280E-05, & 6.54874056E-05, 6.28616914E-05, 6.14273488E-05, 6.07852364E-05, & 6.04088698E-05, 6.03540036E-05, 6.02886049E-05, 6.02674165E-05, & 6.02966945E-05, 6.03716490E-05, 6.04813616E-05, 6.06187026E-05, & 6.07531375E-05, 6.09493282E-05, 6.11371631E-05, 6.13816662E-05, & 6.16136745E-05, 6.18983194E-05, 6.21673488E-05, 6.24858111E-05, & 6.22161845E-05, 6.20125704E-05, 6.17821724E-05, 6.16411232E-05, & 6.15183242E-05, 6.15073799E-05, 6.14970489E-05, 6.14873305E-05, & 6.14782241E-05, 6.14697293E-05, 6.14618456E-05, 6.14545728E-05, & 6.13469100E-05, 6.13458157E-05, 6.13447285E-05, 6.13441885E-05, & 6.13436531E-05, 6.13431178E-05, 6.13425849E-05, 6.13420544E-05, & 6.13415284E-05, 6.13410025E-05, 6.13404791E-05, 6.13399580E-05, & 6.13394415E-05, 6.13389251E-05, 6.13384111E-05, 6.13379016E-05, & 6.13373924E-05, 6.13368855E-05, 6.13363810E-05, 6.13358809E-05, & 6.13353812E-05, 6.13348837E-05, 6.13341649E-05, 6.13334469E-05, & 6.13327284E-05, 6.13320125E-05, 6.13312990E-05, 6.13305910E-05, & 6.13298826E-05, 6.13291768E-05, 6.13284763E-05, 6.13277755E-05, & 6.13270772E-05, 6.13263814E-05, 6.13256910E-05, 6.13250002E-05, & 6.13243120E-05, 6.13242216E-05, 6.13241312E-05, 6.13240408E-05, & 6.13239505E-05, 6.13238602E-05, 6.13237700E-05, 6.13236798E-05, & 6.13235897E-05, 6.13234996E-05, 6.13234124E-05, 6.13233224E-05, & 6.13232324E-05, 6.13231425E-05, 6.13230526E-05, 6.13229628E-05, & 6.13228730E-05, 6.13227833E-05, 6.13226936E-05, 6.13226039E-05, & 6.13225143E-05, 6.13224247E-05, 6.13223352E-05, 6.13222457E-05/ DATA ((DAS (I,J), I=1601,1700), J=2,2) / & 6.13221563E-05, 6.13220669E-05, 6.13213895E-05, 6.13207174E-05, & 6.13200450E-05, 6.13193751E-05, 6.13187078E-05, 6.13180457E-05, & 6.13173834E-05, 6.13167237E-05, 6.13160664E-05, 6.13154144E-05, & 6.13147621E-05, 6.13141124E-05, 6.13134679E-05, 6.13128232E-05, & 6.13121811E-05, 6.13115414E-05, 6.13109069E-05, 6.13102723E-05, & 6.13096402E-05, 6.13090106E-05, 6.13083861E-05, 6.13077616E-05, & 6.13071396E-05, 6.13065200E-05, 6.13059056E-05, 6.13052911E-05, & 6.13046791E-05, 6.13040722E-05, 6.13034652E-05, 6.13028608E-05, & 6.13022588E-05, 6.13016619E-05, 6.13010650E-05, 6.13004706E-05, & 6.12998787E-05, 6.12992918E-05, 6.12987049E-05, 6.12975388E-05, & 6.12227034E-05, 6.11961646E-05, 6.11696769E-05, 6.11417492E-05, & 6.11848357E-05, 6.13234514E-05, 6.15602407E-05, 6.19032504E-05, & 6.17644968E-05, 6.16761496E-05, 6.17531991E-05, 6.20671992E-05, & 6.24438755E-05, 6.23906558E-05, 6.24930543E-05, 6.27344214E-05, & 6.31490039E-05, 6.37814573E-05, 6.56923734E-05, 6.82866410E-05, & 7.27931940E-05, 7.79634853E-05, 8.48219285E-05, 9.50413802E-05, & 9.39082878E-05, 9.27144818E-05, 1.06544018E-04, 8.33661306E-05, & 8.64334320E-05, 7.55213346E-05, 6.88311076E-05, 6.81853349E-05, & 6.33453224E-05, 6.56792378E-05, 6.06501223E-05, 5.99259982E-05, & 5.53588103E-05, 5.37405700E-05, 5.16841922E-05, 5.17862520E-05, & 5.19709125E-05, 5.22313596E-05, 5.25102885E-05, 5.28353117E-05, & 5.32048024E-05, 5.36133505E-05, 5.39481895E-05, 5.33373589E-05, & 5.29304958E-05, 5.26302290E-05, 5.24962612E-05, 5.24964072E-05, & 5.25003427E-05, 5.25057124E-05, 5.24907973E-05, 5.24790257E-05, & 5.24703996E-05, 5.24649263E-05, 5.24626134E-05, 5.24634693E-05/ DATA ((DAS (I,J), I=1701,1800), J=2,2) / & 5.24675047E-05, 5.24747307E-05, 5.24851624E-05, 5.24988142E-05, & 5.24475088E-05, 5.23943399E-05, 5.23807129E-05, 5.23461985E-05, & 5.23030768E-05, 5.22649559E-05, 5.22306092E-05, 5.21888101E-05, & 5.21516217E-05, 5.21053058E-05, 5.21020486E-05, 5.20944201E-05, & 5.20929015E-05, 5.20913936E-05, 5.20898868E-05, 5.20883860E-05, & 5.20868958E-05, 5.20854069E-05, 5.20839239E-05, 5.20824515E-05, & 5.20809804E-05, 5.20795152E-05, 5.20780605E-05, 5.20766072E-05, & 5.20758850E-05, 5.20751598E-05, 5.20744406E-05, 5.20737229E-05, & 5.20730021E-05, 5.20722874E-05, 5.20715741E-05, 5.20708578E-05, & 5.20701475E-05, 5.20694386E-05, 5.20687268E-05, 5.20680209E-05, & 5.20673165E-05, 5.20672230E-05, 5.20671340E-05, 5.20670450E-05, & 5.20669515E-05, 5.20668626E-05, 5.20667736E-05, 5.20666802E-05, & 5.20665914E-05, 5.20665025E-05, 5.20664092E-05, 5.20663204E-05, & 5.20662316E-05, 5.20661384E-05, 5.20660496E-05, 5.20659609E-05, & 5.20658678E-05, 5.20657791E-05, 5.20656904E-05, 5.20655974E-05, & 5.20655088E-05, 5.20654202E-05, 5.20653272E-05, 5.20652387E-05, & 5.20651502E-05, 5.20650617E-05, 5.20643591E-05, 5.20636624E-05, & 5.20629628E-05, 5.20622690E-05, 5.20615767E-05, 5.20608816E-05, & 5.20601923E-05, 5.20595044E-05, 5.20588137E-05, 5.20581288E-05, & 5.20574454E-05, 5.20567592E-05, 5.20560787E-05, 5.20553998E-05, & 5.20540420E-05, 5.20526901E-05, 5.20513484E-05, 5.20500084E-05, & 5.20486743E-05, 5.20473504E-05, 5.20460281E-05, 5.20447118E-05, & 5.20434056E-05, 5.20421011E-05, 5.20408026E-05, 5.19641497E-05, & 5.19400190E-05, 5.19083749E-05, 5.18813005E-05, 5.18450628E-05, & 5.18123830E-05, 5.17846491E-05, 5.17618594E-05, 5.17440077E-05/ DATA ((DAS (I,J), I=1801,1900), J=2,2) / & 5.17255451E-05, 5.16556755E-05, 5.15891153E-05, 5.15120820E-05, & 5.14372933E-05, 5.13660932E-05, 5.08795139E-05, 5.05062430E-05, & 5.02608323E-05, 5.01624618E-05, 4.99421520E-05, 4.94697813E-05, & 4.90727875E-05, 4.85460030E-05, 4.84041155E-05, 4.81593382E-05, & 4.77589866E-05, 4.73540416E-05, 4.68551148E-05, 4.72619928E-05, & 4.80180569E-05, 4.84749404E-05, 4.88739114E-05, 4.92636699E-05, & 4.96943916E-05, 5.01997529E-05, 5.08569956E-05, 5.17127230E-05, & 5.27726418E-05, 5.40719516E-05, 5.56719922E-05, 5.76691343E-05, & 6.02155343E-05, 6.35617541E-05, 6.81501785E-05, 7.48472120E-05, & 8.05247090E-05, 7.85983627E-05, 7.85943742E-05, 7.85199621E-05, & 7.85024127E-05, 7.33928932E-05, 7.18451287E-05, 6.92872966E-05, & 6.89061708E-05, 6.75239097E-05, 6.69114716E-05, 6.67669918E-05, & 6.60604928E-05, 6.58141468E-05, 6.57384559E-05, 6.53638694E-05, & 6.52066668E-05, 6.51186629E-05, 6.47205040E-05, 6.45782609E-05, & 6.44575095E-05, 6.41685460E-05, 6.40332199E-05, 6.40122666E-05, & 6.38954017E-05, 6.38247797E-05, 6.38316568E-05, 6.37495313E-05, & 6.37336191E-05, 6.37264595E-05, 6.37011509E-05, 6.37297122E-05, & 6.37099077E-05, 6.37442205E-05, 6.37658712E-05, 6.38155232E-05, & 6.38970396E-05, 6.41816098E-05, 6.45874374E-05, 6.48048052E-05, & 6.49986968E-05, 6.51884065E-05, 6.53513528E-05, 6.55641806E-05, & 6.57120751E-05, 6.59179926E-05, 6.61045463E-05, 6.63009267E-05, & 6.65648196E-05, 6.67376510E-05, 6.69929198E-05, 6.73107727E-05, & 6.75238640E-05, 6.78687900E-05, 6.83815065E-05, 6.87213488E-05, & 6.91097733E-05, 6.97823441E-05, 7.01454583E-05, 7.06169088E-05, & 7.13583917E-05, 7.20587964E-05, 7.28448062E-05, 7.37242033E-05/ DATA ((DAS (I,J), I=1901,2000), J=2,2) / & 7.44283847E-05, 7.57440196E-05, 7.80524391E-05, 7.94261191E-05, & 8.36014765E-05, 8.70882552E-05, 9.60705925E-05, 1.01534843E-04, & 1.15187364E-04, 1.15919141E-04, 9.76394714E-05, 9.19306631E-05, & 9.05483580E-05, 8.83555400E-05, 8.27493648E-05, 7.85726210E-05, & 7.64100153E-05, 7.48305974E-05, 7.36368307E-05, 7.21872419E-05, & 7.05157373E-05, 6.94824148E-05, 6.84253316E-05, 6.79960043E-05, & 6.77468807E-05, 6.69911585E-05, 6.66284203E-05, 6.61660973E-05, & 6.60038074E-05, 6.60941645E-05, 6.63509257E-05, 6.62679778E-05, & 6.63768055E-05, 6.66794776E-05, 6.71491349E-05, 6.78257567E-05, & 6.87784668E-05, 7.01804041E-05, 7.10068334E-05, 7.22411210E-05, & 7.49780647E-05, 7.11095150E-05, 6.83644670E-05, 6.92726443E-05, & 6.32807285E-05, 6.96060456E-05, 7.17178774E-05, 7.16486353E-05, & 7.39707179E-05, 7.53712522E-05, 7.38069280E-05, 7.28278714E-05, & 7.24394178E-05, 7.16600733E-05, 7.10760760E-05, 7.07320568E-05, & 7.05424915E-05, 7.04825726E-05, 7.05144548E-05, 7.06560727E-05, & 7.08928223E-05, 7.12594229E-05, 7.17660907E-05, 7.24515771E-05, & 7.30298803E-05, 7.36388618E-05, 7.45063039E-05, 7.56718297E-05, & 7.72184434E-05, 7.89675030E-05, 8.06074416E-05, 8.24820623E-05, & 8.51360233E-05, 8.88275834E-05, 9.35748046E-05, 9.97894678E-05, & 1.08240191E-04, 1.08300241E-04, 1.01576015E-04, 9.30880065E-05, & 9.32593085E-05, 9.65113542E-05, 9.96459328E-05, 1.02675864E-04, & 1.05530675E-04, 1.08205475E-04, 1.10775981E-04, 1.13257477E-04, & 1.15669501E-04, 1.11942740E-04, 1.08260013E-04, 1.05187339E-04, & 1.02626512E-04, 1.00407931E-04, 9.84391010E-05, 9.67710444E-05, & 9.53784148E-05, 9.42063880E-05, 9.32311975E-05, 9.23391659E-05/ DATA ((DAS (I,J), I=2001,2100), J=2,2) / & 9.15433062E-05, 9.09188325E-05, 9.05230362E-05, 9.01298858E-05, & 8.97946997E-05, 8.99415319E-05, 8.95169666E-05, 9.00518224E-05, & 8.81350719E-05, 8.64689558E-05, 8.55325218E-05, 8.58478556E-05, & 8.37633174E-05, 8.14228621E-05, 8.08477064E-05, 8.01922503E-05, & 8.23548207E-05, 8.35545777E-05, 8.63050577E-05, 8.87359359E-05, & 8.87932352E-05, 9.00357256E-05, 9.19640378E-05, 9.41074643E-05, & 9.38337354E-05, 9.44803127E-05, 9.45468852E-05, 9.50662481E-05, & 9.56207765E-05, 9.61519890E-05, 9.68820438E-05, 9.77515010E-05, & 9.86747994E-05, 9.96219976E-05, 1.00748532E-04, 1.02023270E-04, & 1.03503950E-04, 1.05204175E-04, 1.07045460E-04, 1.09092562E-04, & 1.11493691E-04, 1.14305193E-04, 1.17289877E-04, 1.17747337E-04, & 1.18813774E-04, 1.20667843E-04, 1.23592094E-04, 1.27873529E-04, & 1.32026433E-04, 1.30093556E-04, 1.28180474E-04, 1.19919395E-04, & 1.39722430E-04, 1.52883196E-04, 1.58441169E-04, 1.62482898E-04, & 1.65670725E-04, 1.68698096E-04, 1.71581847E-04, 1.74173463E-04, & 1.76599182E-04, 1.78550896E-04, 1.80678322E-04, 1.82586828E-04, & 1.11218262E-04, 3.98496949E-05, 3.72497689E-05, 3.50356434E-05, & 3.32752237E-05, 3.17193621E-05, 3.04444848E-05, 2.92894342E-05, & 2.83229167E-05, 2.74314350E-05, 2.66412905E-05, 2.59653571E-05, & 2.53296941E-05, 2.47800343E-05, 2.42581088E-05, 2.38028271E-05, & 2.33670607E-05, 2.29841484E-05, 2.26151812E-05, 2.22889453E-05, & 2.19727768E-05, 2.16917213E-05, 2.14294766E-05, 2.11734837E-05, & 2.09443733E-05, 2.07197962E-05, 2.05180145E-05, 2.03194934E-05, & 2.01404971E-05, 1.99638079E-05, 1.98039926E-05, 1.96457631E-05, & 1.95022344E-05, 1.93597417E-05, 1.92244074E-05, 1.91011724E-05/ DATA ((DAS (I,J), I=2101,2180), J=2,2) / & 1.89783750E-05, 1.88662998E-05, 1.87543773E-05, 1.86520118E-05, & 1.85495786E-05, 1.84557093E-05, 1.83616016E-05, 1.82752056E-05, & 1.81884392E-05, 1.81086489E-05, 1.80318115E-05, 1.79544612E-05, & 1.78831664E-05, 1.78112904E-05, 1.77449474E-05, 1.76779717E-05, & 1.76160694E-05, 1.75534964E-05, 1.74955910E-05, 1.74369874E-05, & 1.73826916E-05, 1.73276784E-05, 1.72743692E-05, 1.72248973E-05, & 1.71746915E-05, 1.71280523E-05, 1.70806747E-05, 1.70366205E-05, & 1.69918271E-05, 1.69501382E-05, 1.69077122E-05, 1.68681927E-05, & 1.68279408E-05, 1.67904159E-05, 1.67521653E-05, 1.67164785E-05, & 1.66816381E-05, 1.66460846E-05, 1.66128781E-05, 1.65789682E-05, & 1.65472751E-05, 1.65148892E-05, 1.64846008E-05, 1.64536305E-05, & 1.64246481E-05, 1.63949953E-05, 1.63672295E-05, 1.63388049E-05, & 1.60643809E-05, 1.58399484E-05, 1.58076943E-05, 1.48549884E-05, & 1.45945643E-05, 1.41279516E-05, 1.39491927E-05, 1.39415779E-05, & 1.37630598E-05, 1.37625765E-05, 1.36601107E-05, 1.36566322E-05, & 1.36545652E-05, 1.36120309E-05, 1.35861222E-05, 1.35816676E-05, & 1.35745074E-05, 1.35641623E-05, 1.35570495E-05, 1.35526589E-05, & 1.35129259E-05, 1.35110453E-05, 1.35003092E-05, 1.34983732E-05, & 1.34898207E-05, 1.34865093E-05, 1.34839037E-05, 1.34814954E-05, & 1.34746172E-05, 1.34649393E-05, 1.34609385E-05, 1.34360659E-05/ DATA ((DAS (I,J), I= 1, 100), J=3,3) / & 6.70580485E-06, 7.09910623E-06, 7.53022281E-06, 8.00956629E-06, & 8.56361235E-06, 8.87902746E-06, 9.65042307E-06, 1.06323249E-05, & 1.09519198E-05, 1.12523291E-05, 1.10575329E-05, 1.08439402E-05, & 1.07792085E-05, 1.08654493E-05, 1.10288465E-05, 1.14206121E-05, & 1.18535415E-05, 1.22099748E-05, 1.27023417E-05, 1.30755690E-05, & 1.34135108E-05, 1.38957122E-05, 1.41824062E-05, 1.44135489E-05, & 1.47034541E-05, 1.48985782E-05, 1.50018796E-05, 1.53659608E-05, & 1.57648797E-05, 1.61562967E-05, 1.65821964E-05, 1.70041869E-05, & 1.74166302E-05, 1.78236231E-05, 1.82276927E-05, 1.86457599E-05, & 1.90909814E-05, 1.95627978E-05, 1.99268985E-05, 2.04207088E-05, & 2.09446387E-05, 2.13599625E-05, 2.19449353E-05, 2.25566266E-05, & 2.30063646E-05, 2.35839083E-05, 2.40270269E-05, 2.46274567E-05, & 2.75410714E-05, 3.02824398E-05, 3.39226046E-05, 3.38731631E-05, & 3.83910887E-05, 3.98291778E-05, 4.13682531E-05, 4.35779471E-05, & 4.66279122E-05, 4.98116769E-05, 5.30252130E-05, 5.42994501E-05, & 5.64844117E-05, 6.04934036E-05, 6.43414368E-05, 6.86605275E-05, & 7.16289475E-05, 7.58315608E-05, 7.62627705E-05, 7.77119609E-05, & 7.92654730E-05, 8.12621913E-05, 8.52720539E-05, 9.00155972E-05, & 9.62939676E-05, 1.04332197E-04, 1.14455490E-04, 1.30016145E-04, & 1.51393621E-04, 1.60720860E-04, 1.97447917E-04, 2.52905310E-04, & 2.27196737E-04, 2.39159356E-04, 2.69542223E-04, 3.20923270E-04, & 3.59613579E-04, 3.93784181E-04, 4.28068951E-04, 4.52188043E-04, & 4.70445243E-04, 4.85815364E-04, 4.93812568E-04, 4.95512116E-04, & 4.97027012E-04, 4.88870553E-04, 4.83161883E-04, 4.77367583E-04, & 4.62993041E-04, 4.49536023E-04, 4.36894582E-04, 4.20471865E-04/ DATA ((DAS (I,J), I= 101, 200), J=3,3) / & 4.01193416E-04, 3.80374940E-04, 3.62363778E-04, 3.45332447E-04, & 3.28152417E-04, 3.09716559E-04, 2.91376224E-04, 2.73131411E-04, & 2.52205752E-04, 2.29173171E-04, 2.03435635E-04, 1.74851802E-04, & 1.43986629E-04, 1.08961369E-04, 7.13565110E-05, 3.47525110E-05, & 3.95381945E-05, 4.48238964E-05, 4.12106927E-05, 1.43554912E-04, & 1.91990915E-04, 2.29699420E-04, 2.61735751E-04, 2.90687991E-04, & 3.17694084E-04, 3.43425102E-04, 3.69423343E-04, 3.92506783E-04, & 4.10984982E-04, 4.26743224E-04, 4.40294072E-04, 4.51908175E-04, & 4.61613682E-04, 4.69588991E-04, 4.75843560E-04, 4.80326066E-04, & 4.82947702E-04, 4.86142914E-04, 4.89588585E-04, 4.91322702E-04, & 4.92625142E-04, 4.93372157E-04, 4.93369576E-04, 4.91689870E-04, & 4.87150194E-04, 4.78753897E-04, 4.67804824E-04, 4.52730564E-04, & 4.33458469E-04, 4.11645450E-04, 3.84067477E-04, 3.53226250E-04, & 3.16998595E-04, 3.08507518E-04, 2.81847935E-04, 2.45982751E-04, & 2.35545219E-04, 2.26976856E-04, 2.26344356E-04, 2.43660550E-04, & 2.59229433E-04, 2.12160910E-04, 1.69114936E-04, 1.40919989E-04, & 1.34498142E-04, 1.29187821E-04, 1.24833868E-04, 1.20562589E-04, & 1.18495892E-04, 1.07367897E-04, 9.81568878E-05, 9.03814403E-05, & 8.46499902E-05, 7.28780629E-05, 6.83809736E-05, 6.42533291E-05, & 5.96972361E-05, 5.59580898E-05, 5.30463105E-05, 5.14989819E-05, & 4.91426798E-05, 4.81642836E-05, 4.65155735E-05, 4.55703605E-05, & 4.50798062E-05, 4.52660503E-05, 4.63887805E-05, 4.80248333E-05, & 5.03183528E-05, 5.38652624E-05, 5.59482201E-05, 5.74129470E-05, & 6.13356420E-05, 6.34969798E-05, 6.57614319E-05, 6.80771482E-05, & 7.17185607E-05, 7.71363628E-05, 8.40633269E-05, 1.12932654E-04/ DATA ((DAS (I,J), I= 201, 300), J=3,3) / & 1.10039724E-04, 1.07467388E-04, 1.08647248E-04, 1.10296642E-04, & 1.12366228E-04, 1.14806449E-04, 1.17600093E-04, 1.20713372E-04, & 1.23985462E-04, 1.28252492E-04, 1.32576274E-04, 1.36792244E-04, & 1.40742396E-04, 1.44684352E-04, 1.48334666E-04, 1.51778977E-04, & 1.54706538E-04, 1.56947327E-04, 1.58946548E-04, 1.60762566E-04, & 1.62505273E-04, 1.64256633E-04, 1.66139716E-04, 1.68246292E-04, & 1.70606628E-04, 1.73215475E-04, 1.75933168E-04, 1.78178106E-04, & 1.78273075E-04, 1.68615998E-04, 1.45853035E-04, 1.53096127E-04, & 1.72191549E-04, 2.05816196E-04, 2.25729947E-04, 2.41199157E-04, & 2.88803956E-04, 3.06160184E-04, 3.25325715E-04, 3.46319151E-04, & 3.69544461E-04, 3.95453897E-04, 4.24651604E-04, 4.61389309E-04, & 4.98127013E-04, 5.45525671E-04, 5.96057638E-04, 6.46430774E-04, & 6.94209403E-04, 7.32077166E-04, 7.61400015E-04, 7.89516668E-04, & 8.30584815E-04, 8.97629405E-04, 9.17734490E-04, 9.37671013E-04, & 9.58025739E-04, 9.80320592E-04, 1.00210253E-03, 1.02229216E-03, & 1.04020941E-03, 1.05281449E-03, 1.05234031E-03, 1.03398121E-03, & 1.00568780E-03, 9.60825226E-04, 8.43846892E-04, 7.41076826E-04, & 6.85046720E-04, 5.67524304E-04, 4.44598785E-04, 3.15802812E-04, & 1.75443916E-04, 7.94767355E-05, 2.04087702E-04, 3.68720134E-04, & 5.35917167E-04, 7.01127912E-04, 8.48159658E-04, 9.64360453E-04, & 1.04418239E-03, 1.09204406E-03, 1.12009839E-03, 1.13775519E-03, & 1.14962007E-03, 1.15408065E-03, 1.15169871E-03, 1.14379772E-03, & 1.13162325E-03, 1.11509884E-03, 1.09629749E-03, 1.06862026E-03, & 1.05084495E-03, 1.04301521E-03, 1.03035040E-03, 1.01856580E-03, & 1.00447054E-03, 9.86433281E-04, 9.65169849E-04, 9.41388108E-04/ DATA ((DAS (I,J), I= 301, 400), J=3,3) / & 9.16481337E-04, 8.93829127E-04, 8.73547498E-04, 8.55881591E-04, & 8.05778761E-04, 7.63472561E-04, 7.19296230E-04, 6.76640401E-04, & 6.36245374E-04, 5.97439171E-04, 5.65754711E-04, 5.40417140E-04, & 5.19289437E-04, 5.00736669E-04, 4.83720317E-04, 4.69796363E-04, & 4.57219849E-04, 4.45802394E-04, 4.36984215E-04, 4.28582482E-04, & 3.76766242E-04, 3.63708088E-04, 3.48460449E-04, 3.29423002E-04, & 2.94534743E-04, 2.10306586E-04, 2.23878544E-04, 3.06776312E-04, & 3.18267462E-04, 3.25369329E-04, 3.28037260E-04, 3.29637856E-04, & 3.29774043E-04, 3.29418824E-04, 3.28607681E-04, 3.27482079E-04, & 3.26138124E-04, 3.24632490E-04, 3.23016438E-04, 3.21355688E-04, & 3.19661440E-04, 3.05614347E-04, 3.02969934E-04, 3.00347029E-04, & 2.97740868E-04, 2.95178917E-04, 2.92645072E-04, 2.90143754E-04, & 2.87677343E-04, 2.85256486E-04, 2.82886454E-04, 2.80563814E-04, & 2.78288400E-04, 2.76058400E-04, 2.73871869E-04, 2.71848477E-04, & 2.60666652E-04, 2.37273006E-04, 2.05149363E-04, 1.83998908E-04, & 1.68932231E-04, 1.57812621E-04, 1.49329444E-04, 1.42772537E-04, & 1.37818821E-04, 1.37391522E-04, 1.32503523E-04, 1.29964358E-04, & 1.29274024E-04, 1.28070844E-04, 1.27680223E-04, 1.27684441E-04, & 1.27970912E-04, 1.28576881E-04, 1.28998893E-04, 1.29566819E-04, & 1.31110115E-04, 1.33158934E-04, 1.35744926E-04, 1.38712278E-04, & 1.40788158E-04, 1.42280592E-04, 1.46399936E-04, 1.51090063E-04, & 1.51588474E-04, 1.56419108E-04, 1.62734386E-04, 1.66292726E-04, & 1.70117258E-04, 1.78593168E-04, 1.88296706E-04, 2.00195464E-04, & 2.04214040E-04, 2.14549772E-04, 2.22852839E-04, 2.31962408E-04, & 2.53691556E-04, 2.83197681E-04, 2.87000708E-04, 3.21924000E-04/ DATA ((DAS (I,J), I= 401, 500), J=3,3) / & 3.87734878E-04, 4.01146826E-04, 3.55987814E-04, 3.21614204E-04, & 3.08724101E-04, 2.73984328E-04, 2.65260335E-04, 2.60575787E-04, & 2.54888946E-04, 2.44327565E-04, 2.32662950E-04, 2.21474394E-04, & 2.20174108E-04, 2.09149535E-04, 2.07999118E-04, 2.02141556E-04, & 1.97301462E-04, 1.81522827E-04, 1.78945369E-04, 1.61125823E-04, & 1.59786718E-04, 1.58446473E-04, 1.45454997E-04, 1.34749772E-04, & 1.33036994E-04, 1.24853146E-04, 1.24279100E-04, 1.21728584E-04, & 1.21264001E-04, 1.18359154E-04, 1.16629377E-04, 1.10813603E-04, & 1.10107245E-04, 1.02231868E-04, 9.46168554E-05, 9.05825903E-05, & 8.98390988E-05, 8.14265918E-05, 8.03522956E-05, 7.63486023E-05, & 7.45268404E-05, 7.39763196E-05, 7.36704977E-05, 7.35360422E-05, & 7.27543903E-05, 7.27133259E-05, 7.29288402E-05, 7.36997408E-05, & 7.43871666E-05, 7.91362997E-05, 8.74201741E-05, 8.96169062E-05, & 9.07782612E-05, 9.81349764E-05, 1.02060136E-04, 1.06060910E-04, & 1.23927965E-04, 1.26209567E-04, 1.32070314E-04, 1.35271739E-04, & 1.37929018E-04, 1.38285564E-04, 1.38854687E-04, 1.39096615E-04, & 1.39150877E-04, 1.38663286E-04, 1.37547704E-04, 1.36735952E-04, & 1.34824290E-04, 1.33129398E-04, 1.32850408E-04, 1.28522779E-04, & 1.26243518E-04, 1.25263922E-04, 1.25273002E-04, 1.25368085E-04, & 1.25352440E-04, 1.25443302E-04, 1.18931871E-04, 1.14197792E-04, & 1.16002281E-04, 1.51973203E-04, 1.78207645E-04, 1.97943140E-04, & 2.53160075E-04, 3.08066130E-04, 3.17997936E-04, 3.22960119E-04, & 3.30144834E-04, 3.31791634E-04, 3.36415042E-04, 3.37566596E-04, & 3.43242764E-04, 3.55322867E-04, 3.73578979E-04, 3.82923502E-04, & 5.40799109E-04, 6.42873406E-04, 5.49771926E-04, 3.68289579E-04/ DATA ((DAS (I,J), I= 501, 600), J=3,3) / & 2.93356212E-04, 2.63341717E-04, 2.21465205E-04, 2.17249375E-04, & 2.07414623E-04, 1.96722750E-04, 1.78204421E-04, 1.71816111E-04, & 1.66535502E-04, 1.62257502E-04, 1.58981789E-04, 1.56541344E-04, & 1.54865475E-04, 1.53902231E-04, 1.53622163E-04, 1.54034011E-04, & 1.55171706E-04, 1.55497975E-04, 1.55858405E-04, 1.56253696E-04, & 1.56685228E-04, 1.57154254E-04, 1.57662826E-04, 1.58211818E-04, & 1.58326653E-04, 1.58443204E-04, 1.58561306E-04, 1.58681519E-04, & 1.58803315E-04, 1.58926894E-04, 1.59052272E-04, 1.59179466E-04, & 1.59308495E-04, 1.59439373E-04, 1.60143293E-04, 1.60541302E-04, & 1.60754863E-04, 1.60907296E-04, 1.61066792E-04, 1.61228008E-04, & 1.61391827E-04, 1.61558234E-04, 1.61726708E-04, 1.61811803E-04, & 1.61897477E-04, 1.61983735E-04, 1.62070092E-04, 1.62158154E-04, & 1.62246151E-04, 1.62334671E-04, 1.62423882E-04, 1.62513691E-04, & 1.62604107E-04, 1.62695133E-04, 1.62786158E-04, 1.62878297E-04, & 1.62971179E-04, 1.63064702E-04, 1.63159210E-04, 1.63254204E-04, & 1.63349188E-04, 1.63445351E-04, 1.63542196E-04, 1.63640398E-04, & 1.63738420E-04, 1.63837043E-04, 1.63936267E-04, 1.64036094E-04, & 1.64136315E-04, 1.64237539E-04, 1.64339133E-04, 1.64441305E-04, & 1.64544051E-04, 1.64647567E-04, 1.64751837E-04, 1.64856870E-04, & 1.64962676E-04, 1.65068872E-04, 1.65176647E-04, 1.65284834E-04, & 1.65393835E-04, 1.65503662E-04, 1.65614327E-04, 1.65669997E-04, & 1.65725856E-04, 1.65781910E-04, 1.65838159E-04, 1.65894606E-04, & 1.65951253E-04, 1.66007302E-04, 1.66064690E-04, 1.66122423E-04, & 1.66179047E-04, 1.66237009E-04, 1.66294876E-04, 1.66352714E-04, & 1.66411227E-04, 1.66469795E-04, 1.66528549E-04, 1.66587531E-04/ DATA ((DAS (I,J), I= 601, 700), J=3,3) / & 1.66646721E-04, 1.66706172E-04, 1.66765861E-04, 1.66825813E-04, & 1.66885998E-04, 1.66946391E-04, 1.67007058E-04, 1.67068424E-04, & 1.67129491E-04, 1.67190801E-04, 1.67252354E-04, 1.67314149E-04, & 1.67376599E-04, 1.67438909E-04, 1.67501461E-04, 1.67564254E-04, & 1.67626754E-04, 1.67690445E-04, 1.67754027E-04, 1.67817850E-04, & 1.67881916E-04, 1.67972014E-04, 1.68010773E-04, 1.68075567E-04, & 1.68140608E-04, 1.68205897E-04, 1.68271434E-04, 1.68337217E-04, & 1.68403248E-04, 1.68469524E-04, 1.68536047E-04, 1.68602816E-04, & 1.68669829E-04, 1.68737086E-04, 1.68787012E-04, 1.68924378E-04, & 1.69062722E-04, 1.69202027E-04, 1.69342268E-04, 1.69483603E-04, & 1.69626296E-04, 1.69770389E-04, 1.69915916E-04, 1.70062915E-04, & 1.70211421E-04, 1.70218790E-04, 1.70226164E-04, 1.70233541E-04, & 1.70240922E-04, 1.70248307E-04, 1.70255695E-04, 1.70263087E-04, & 1.70270484E-04, 1.70277883E-04, 1.70285287E-04, 1.70292695E-04, & 1.70300106E-04, 1.70307521E-04, 1.70308263E-04, 1.70320135E-04, & 1.70325481E-04, 1.70328749E-04, 1.70331126E-04, 1.70332761E-04, & 1.70334098E-04, 1.70335139E-04, 1.70336179E-04, 1.70336922E-04, & 1.70337665E-04, 1.70338260E-04, 1.70338855E-04, 1.70339301E-04, & 1.70339895E-04, 1.70340193E-04, 1.70340639E-04, 1.70341085E-04, & 1.70341382E-04, 1.70341828E-04, 1.70342126E-04, 1.70342423E-04, & 1.70342720E-04, 1.70343018E-04, 1.70343315E-04, 1.70343613E-04, & 1.70343910E-04, 1.70344208E-04, 1.70344505E-04, 1.70344802E-04, & 1.70345249E-04, 1.70345546E-04, 1.70345992E-04, 1.70346438E-04, & 1.70347628E-04, 1.70348819E-04, 1.70349265E-04, 1.70349711E-04, & 1.70350009E-04, 1.70350455E-04, 1.70350753E-04, 1.70351050E-04/ DATA ((DAS (I,J), I= 701, 800), J=3,3) / & 1.70351348E-04, 1.70351645E-04, 1.70351943E-04, 1.70352241E-04, & 1.70352538E-04, 1.70352836E-04, 1.70353133E-04, 1.70353431E-04, & 1.70353877E-04, 1.70354175E-04, 1.70354622E-04, 1.70355068E-04, & 1.70355366E-04, 1.70355961E-04, 1.70356408E-04, 1.70357003E-04, & 1.70357598E-04, 1.70358343E-04, 1.70359087E-04, 1.70360129E-04, & 1.70361171E-04, 1.70362511E-04, 1.70364150E-04, 1.70366532E-04, & 1.70369810E-04, 1.70375174E-04, 1.70381882E-04, 1.70389340E-04, & 1.70396801E-04, 1.70404298E-04, 1.70411735E-04, 1.70419237E-04, & 1.70426712E-04, 1.70434191E-04, 1.70441649E-04, 1.70449026E-04, & 1.70456525E-04, 1.70464146E-04, 1.70471645E-04, 1.70479147E-04, & 1.70486637E-04, 1.70494164E-04, 1.70501678E-04, 1.70509196E-04, & 1.70658431E-04, 1.70809237E-04, 1.70961667E-04, 1.71115749E-04, & 1.71271522E-04, 1.71429021E-04, 1.71588283E-04, 1.71749344E-04, & 1.71912242E-04, 1.72077016E-04, 1.72098861E-04, 1.72268020E-04, & 1.72439195E-04, 1.72612727E-04, 1.72788924E-04, 1.72967790E-04, & 1.73149339E-04, 1.73333593E-04, 1.73520579E-04, 1.73710328E-04, & 1.73902878E-04, 1.74098271E-04, 1.74296500E-04, 1.74497748E-04, & 1.74701988E-04, 1.74909277E-04, 1.75119370E-04, 1.75333251E-04, & 1.75550071E-04, 1.75770210E-04, 1.75993603E-04, 1.76220595E-04, & 1.76451563E-04, 1.76685668E-04, 1.76923522E-04, 1.77165226E-04, & 1.77410872E-04, 1.77660689E-04, 1.77914684E-04, 1.78172705E-04, & 1.78435335E-04, 1.78702528E-04, 1.78974427E-04, 1.79251180E-04, & 1.79532944E-04, 1.79820661E-04, 1.80113029E-04, 1.80410930E-04, & 1.80714981E-04, 1.81024471E-04, 1.81339839E-04, 1.81661939E-04, & 1.81990667E-04, 1.82326284E-04, 1.82669067E-04, 1.83019310E-04/ DATA ((DAS (I,J), I= 801, 900), J=3,3) / & 1.83377325E-04, 1.83743447E-04, 1.84117689E-04, 1.84501045E-04, & 1.84894367E-04, 1.85296734E-04, 1.85709264E-04, 1.86132463E-04, & 1.86566878E-04, 1.87013099E-04, 1.87471764E-04, 1.87943564E-04, & 1.88429253E-04, 1.88929185E-04, 1.89445582E-04, 1.89978176E-04, & 1.90528424E-04, 1.91097518E-04, 1.91686723E-04, 1.92297515E-04, & 1.92931500E-04, 1.93590834E-04, 1.94276904E-04, 1.94991660E-04, & 1.95738310E-04, 1.96520216E-04, 1.97340166E-04, 1.98201976E-04, & 1.99110062E-04, 2.00069572E-04, 2.01086557E-04, 2.02167464E-04, & 2.03321935E-04, 2.04560423E-04, 2.05895149E-04, 2.07342230E-04, & 2.08921834E-04, 2.10659740E-04, 2.10821358E-04, 2.10971536E-04, & 2.11110000E-04, 2.11235909E-04, 2.11347752E-04, 2.11442563E-04, & 2.11511155E-04, 2.11546148E-04, 2.11551243E-04, 2.13359432E-04, & 2.13611811E-04, 2.13771877E-04, 2.13936605E-04, 2.14024054E-04, & 2.14121033E-04, 2.14211563E-04, 2.14308162E-04, 2.14387503E-04, & 2.14474896E-04, 1.96013082E-04, 1.92338356E-04, 1.98533260E-04, & 2.06070138E-04, 2.18631602E-04, 2.39946000E-04, 2.51158053E-04, & 2.64802509E-04, 2.66738704E-04, 2.77125832E-04, 2.83764098E-04, & 2.85047481E-04, 3.04511879E-04, 3.40507435E-04, 3.44108959E-04, & 3.43383966E-04, 3.47131619E-04, 3.52051870E-04, 3.43994200E-04, & 3.38500947E-04, 3.34530234E-04, 3.31524271E-04, 3.29201775E-04, & 3.27474865E-04, 3.26319340E-04, 3.25596877E-04, 3.25396757E-04, & 3.25195179E-04, 3.24981109E-04, 3.24740172E-04, 3.24452462E-04, & 3.24139683E-04, 3.24014241E-04, 3.23916794E-04, 3.23849521E-04, & 3.23814560E-04, 3.23814035E-04, 3.23850081E-04, 3.23924866E-04, & 3.24040605E-04, 3.24191773E-04, 3.24374530E-04, 3.24586049E-04/ DATA ((DAS (I,J), I= 901,1000), J=3,3) / & 3.24827525E-04, 3.25147095E-04, 3.25310470E-04, 3.25506074E-04, & 3.25716651E-04, 3.25942852E-04, 3.26185347E-04, 3.26444829E-04, & 3.26722011E-04, 3.27017638E-04, 3.27332483E-04, 3.27670721E-04, & 3.28039060E-04, 3.28442253E-04, 3.28884443E-04, 3.29365882E-04, & 3.29886403E-04, 3.30440785E-04, 3.31027801E-04, 3.31647737E-04, & 3.32135116E-04, 3.32300967E-04, 3.32435648E-04, 3.32657707E-04, & 3.32716609E-04, 3.32760634E-04, 3.32795954E-04, 3.32825033E-04, & 3.32849099E-04, 3.32870667E-04, 3.32889725E-04, 3.32904989E-04, & 3.32920270E-04, 3.32934291E-04, 3.32947050E-04, 3.32958543E-04, & 3.32970045E-04, 3.32978997E-04, 3.32989235E-04, 3.32998199E-04, & 3.33007169E-04, 3.33016144E-04, 3.33023841E-04, 3.33032827E-04, & 3.33040533E-04, 3.33048244E-04, 3.33055958E-04, 3.33064964E-04, & 3.33072687E-04, 3.33081703E-04, 3.33089435E-04, 3.33099751E-04, & 3.33110074E-04, 3.33124281E-04, 3.33135914E-04, 3.33148851E-04, & 3.33155324E-04, 3.33161800E-04, 3.33168278E-04, 3.33186433E-04, & 3.33200714E-04, 3.33211108E-04, 3.33221510E-04, 3.33229316E-04, & 3.33238428E-04, 3.33246243E-04, 3.33255365E-04, 3.33263189E-04, & 3.33271017E-04, 3.33278849E-04, 3.33287992E-04, 3.33295833E-04, & 3.33304986E-04, 3.33314144E-04, 3.33323308E-04, 3.33333789E-04, & 3.33342965E-04, 3.33354771E-04, 3.33366586E-04, 3.33379726E-04, & 3.33394192E-04, 3.33409989E-04, 3.33425803E-04, 3.33445593E-04, & 3.33468054E-04, 3.33493196E-04, 3.33523686E-04, 3.33560887E-04, & 3.33607515E-04, 3.33670352E-04, 3.33709251E-04, 3.33760369E-04, & 3.33830591E-04, 3.33925615E-04, 3.33993838E-04, 3.34172582E-04, & 3.34251577E-04, 3.34465503E-04, 3.35257457E-04, 3.36085965E-04/ DATA ((DAS (I,J), I=1001,1100), J=3,3) / & 3.36951995E-04, 3.37856642E-04, 3.38801148E-04, 3.39781404E-04, & 3.40779664E-04, 3.41794508E-04, 3.42826052E-04, 3.43874440E-04, & 3.44939849E-04, 3.46022492E-04, 3.47122616E-04, 3.48220671E-04, & 3.49388722E-04, 3.50520971E-04, 3.51697303E-04, 3.52891737E-04, & 3.55117332E-04, 3.58660413E-04, 3.61335446E-04, 3.67267877E-04, & 3.73339256E-04, 3.82406128E-04, 3.89387329E-04, 3.78053250E-04, & 3.61741724E-04, 3.49159208E-04, 3.40022559E-04, 3.34122066E-04, & 3.30265515E-04, 3.27525727E-04, 3.25468166E-04, 3.23859198E-04, & 3.22561373E-04, 3.21486922E-04, 3.20582052E-04, 3.19805173E-04, & 3.19129100E-04, 3.18534457E-04, 3.18005016E-04, 3.17529108E-04, & 3.17097386E-04, 3.16691795E-04, 3.16354198E-04, 3.15992789E-04, & 3.15630348E-04, 3.15313456E-04, 3.14975035E-04, 3.14623179E-04, & 3.14278239E-04, 3.13929095E-04, 3.13571778E-04, 3.13202796E-04, & 3.12815580E-04, 3.12403241E-04, 3.11951164E-04, 3.11431998E-04, & 3.10775704E-04, 3.09227422E-04, 3.06719913E-04, 3.05585439E-04, & 3.04652547E-04, 3.03803470E-04, 3.02993693E-04, 3.02198788E-04, & 3.01410355E-04, 3.00582965E-04, 2.99705710E-04, 2.98423560E-04, & 2.97665882E-04, 2.96365911E-04, 2.94634950E-04, 2.91823682E-04, & 2.92144408E-04, 2.92477734E-04, 2.95621884E-04, 2.97659978E-04, & 2.99131878E-04, 3.00330538E-04, 3.01327064E-04, 3.02209848E-04, & 3.02996402E-04, 3.03716494E-04, 3.04388999E-04, 3.04864393E-04, & 3.05406602E-04, 3.05354196E-04, 3.05330821E-04, 3.05361892E-04, & 3.05500994E-04, 3.05883713E-04, 3.06991175E-04, 3.09845016E-04, & 3.10964520E-04, 3.16709884E-04, 3.27873589E-04, 3.27835586E-04, & 3.21768140E-04, 3.18445617E-04, 3.18707361E-04, 3.32848028E-04/ DATA ((DAS (I,J), I=1101,1200), J=3,3) / & 3.47693914E-04, 3.49752050E-04, 3.43397697E-04, 3.38500548E-04, & 3.32300981E-04, 3.29228444E-04, 3.27702650E-04, 3.27853789E-04, & 3.32367308E-04, 3.30556521E-04, 3.24220390E-04, 3.54124371E-04, & 3.58538160E-04, 3.33001458E-04, 3.07464756E-04, 2.81928054E-04, & 3.01173342E-04, 3.07694743E-04, 3.06884995E-04, 3.31159804E-04, & 3.56438339E-04, 3.91033872E-04, 3.61046026E-04, 3.08410181E-04, & 3.04549114E-04, 3.08873307E-04, 3.09653420E-04, 3.00827790E-04, & 2.92856612E-04, 3.27300426E-04, 3.95615320E-04, 5.08754832E-04, & 5.77819000E-04, 4.87576203E-04, 1.33562283E-04, 1.13424568E-04, & 1.21693345E-04, 1.56382995E-04, 1.47541356E-04, 1.26475814E-04, & 1.11332426E-04, 1.28303355E-04, 1.48156939E-04, 1.47857951E-04, & 1.43766886E-04, 1.36115068E-04, 1.33439726E-04, 1.34761649E-04, & 1.37043779E-04, 1.42148642E-04, 1.45788384E-04, 1.51292211E-04, & 1.48137884E-04, 1.24294324E-04, 1.15588188E-04, 1.16569944E-04, & 1.19878629E-04, 1.35941098E-04, 1.73848586E-04, 2.34848862E-04, & 2.46154353E-04, 2.18827974E-04, 1.94610753E-04, 1.68680401E-04, & 1.26504321E-04, 1.10091272E-04, 1.33863287E-04, 1.77015226E-04, & 1.78857983E-04, 1.11548955E-04, 1.09445648E-04, 1.25293340E-04, & 1.72310897E-04, 1.27146511E-04, 1.11269671E-04, 1.09392423E-04, & 1.09530004E-04, 1.10402854E-04, 1.11146494E-04, 1.08923939E-04, & 1.15535348E-04, 1.15527055E-04, 1.17112843E-04, 1.30150061E-04, & 1.63547573E-04, 1.91417033E-04, 2.49968869E-04, 2.80756505E-04, & 1.40824509E-04, 1.19458263E-04, 1.08234973E-04, 1.50583175E-04, & 1.71169116E-04, 2.61044936E-04, 2.63277386E-04, 2.59880691E-04, & 2.54978338E-04, 1.32824490E-04, 1.24992748E-04, 2.93494294E-04/ DATA ((DAS (I,J), I=1201,1300), J=3,3) / & 2.69062183E-04, 1.63499285E-04, 1.44751453E-04, 1.38959683E-04, & 1.29107538E-04, 1.25318340E-04, 1.27724002E-04, 1.28879342E-04, & 1.23692049E-04, 1.20408688E-04, 1.14690489E-04, 1.13165353E-04, & 1.07034660E-04, 1.08425419E-04, 1.10822789E-04, 1.06300243E-04, & 1.14278507E-04, 1.34447004E-04, 1.63960581E-04, 1.36470571E-04, & 1.07907486E-04, 1.05895627E-04, 1.06996074E-04, 1.04965989E-04, & 1.11980147E-04, 1.06782373E-04, 1.05137546E-04, 1.47980806E-04, & 1.30230347E-04, 1.11370485E-04, 4.18028138E-04, 6.88608420E-04, & 7.78801848E-04, 6.18726642E-04, 4.74712583E-04, 4.33393187E-04, & 4.01732154E-04, 3.55805138E-04, 3.23674299E-04, 3.10890751E-04, & 2.99712015E-04, 2.89841991E-04, 2.81055541E-04, 2.73177987E-04, & 2.66071430E-04, 2.59625357E-04, 2.53750026E-04, 2.48371717E-04, & 2.43429235E-04, 2.38871320E-04, 2.34654666E-04, 2.30742422E-04, & 2.27103009E-04, 2.23709199E-04, 2.20537387E-04, 2.17566997E-04, & 2.14780013E-04, 2.12160591E-04, 2.09694741E-04, 2.07370067E-04, & 2.05175546E-04, 2.03101351E-04, 2.01138695E-04, 1.99279701E-04, & 1.97517295E-04, 1.95845115E-04, 1.94257425E-04, 1.92749053E-04, & 1.91315333E-04, 1.89952048E-04, 1.88655397E-04, 1.87421949E-04, & 1.86248619E-04, 1.85351368E-04, 1.84071523E-04, 1.82105351E-04, & 1.80335518E-04, 1.78751261E-04, 1.77345489E-04, 1.76114834E-04, & 1.75059915E-04, 1.74185894E-04, 1.73503406E-04, 1.73030052E-04, & 1.72792747E-04, 1.72831467E-04, 1.73205404E-04, 1.74003483E-04, & 1.75363430E-04, 1.75537883E-04, 1.77509061E-04, 1.80831263E-04, & 1.86092075E-04, 1.92814968E-04, 1.95073261E-04, 2.02374872E-04, & 2.10975384E-04, 2.13754369E-04, 2.16895424E-04, 2.18628727E-04/ DATA ((DAS (I,J), I=1301,1400), J=3,3) / & 2.20488990E-04, 2.22080123E-04, 2.23774040E-04, 2.24663337E-04, & 2.25583157E-04, 2.26535426E-04, 2.27522256E-04, 2.28545975E-04, & 2.29609153E-04, 2.30156420E-04, 2.30714647E-04, 2.31284244E-04, & 2.31865644E-04, 2.32459307E-04, 2.33065723E-04, 2.33685417E-04, & 2.34318948E-04, 2.34966920E-04, 2.35210459E-04, 2.35356260E-04, & 2.35502811E-04, 2.35650120E-04, 2.35798195E-04, 2.35947044E-04, & 2.36096675E-04, 2.36247097E-04, 2.36398318E-04, 2.36550347E-04, & 2.36703194E-04, 2.36856868E-04, 2.37011377E-04, 2.37166733E-04, & 2.37322946E-04, 2.37480025E-04, 2.37637982E-04, 2.37796829E-04, & 2.37956576E-04, 2.38117237E-04, 2.38278824E-04, 2.38441351E-04, & 2.38604832E-04, 2.38769281E-04, 2.38934715E-04, 2.39101150E-04, & 2.39268605E-04, 2.39437099E-04, 2.39606653E-04, 2.39777291E-04, & 2.39949037E-04, 2.40121921E-04, 2.40295975E-04, 2.40471234E-04, & 2.40647742E-04, 2.40825547E-04, 2.41004710E-04, 2.41185302E-04, & 2.41367414E-04, 2.41551160E-04, 2.41736695E-04, 2.41924226E-04, & 2.42114055E-04, 2.42306639E-04, 2.42502726E-04, 2.42703678E-04, & 2.42912402E-04, 2.43137162E-04, 2.43429620E-04, 2.43413174E-04, & 2.43580324E-04, 2.43605733E-04, 2.43610016E-04, 2.43612187E-04, & 2.43616573E-04, 2.43621016E-04, 2.43625525E-04, 2.43630090E-04, & 2.43634708E-04, 2.43639377E-04, 2.43644094E-04, 2.43648851E-04, & 2.43653658E-04, 2.43658506E-04, 2.43663395E-04, 2.43668321E-04, & 2.43673284E-04, 2.43678281E-04, 2.43680789E-04, 2.43683305E-04, & 2.43685836E-04, 2.43688368E-04, 2.43690915E-04, 2.43693462E-04, & 2.43696017E-04, 2.43698586E-04, 2.43701155E-04, 2.43703738E-04, & 2.43706320E-04, 2.43706320E-04, 2.43706698E-04, 2.43707076E-04/ DATA ((DAS (I,J), I=1401,1500), J=3,3) / & 2.43707453E-04, 2.43707831E-04, 2.43708210E-04, 2.43708966E-04, & 2.43709723E-04, 2.43710102E-04, 2.43710860E-04, 2.43711619E-04, & 2.43712385E-04, 2.43713144E-04, 2.43713905E-04, 2.43714665E-04, & 2.43715427E-04, 2.43717113E-04, 2.43719730E-04, 2.43722359E-04, & 2.43724987E-04, 2.43727629E-04, 2.43730269E-04, 2.43732915E-04, & 2.43735573E-04, 2.43738230E-04, 2.43740900E-04, 2.43743568E-04, & 2.43748926E-04, 2.43754306E-04, 2.43759705E-04, 2.43770552E-04, & 2.43781480E-04, 2.43792476E-04, 2.43797998E-04, 2.43803529E-04, & 2.43809082E-04, 2.43814651E-04, 2.43820234E-04, 2.43825831E-04, & 2.43834249E-04, 2.43848058E-04, 2.44020544E-04, 2.44199572E-04, & 2.44383006E-04, 2.44569791E-04, 2.44759333E-04, 2.44951267E-04, & 2.45145357E-04, 2.45341444E-04, 2.45539417E-04, 2.45739197E-04, & 2.45940728E-04, 2.46143971E-04, 2.46348897E-04, 2.46555488E-04, & 2.46763731E-04, 2.46973620E-04, 2.47185153E-04, 2.47398330E-04, & 2.47613155E-04, 2.47829636E-04, 2.48047782E-04, 2.48267602E-04, & 2.48489108E-04, 2.48712316E-04, 2.48937238E-04, 2.49163893E-04, & 2.49392295E-04, 2.49622465E-04, 2.49854420E-04, 2.50088181E-04, & 2.50323769E-04, 2.50561205E-04, 2.50800512E-04, 2.51041712E-04, & 2.51284831E-04, 2.51529893E-04, 2.51776923E-04, 2.52025948E-04, & 2.52276995E-04, 2.52530092E-04, 2.52785267E-04, 2.53042550E-04, & 2.53301970E-04, 2.53563559E-04, 2.53827349E-04, 2.54093373E-04, & 2.54361663E-04, 2.54632254E-04, 2.54905182E-04, 2.57499963E-04, & 2.59781450E-04, 2.62818259E-04, 2.67969525E-04, 2.76344173E-04, & 2.93894140E-04, 2.93639216E-04, 2.93033486E-04, 2.92728336E-04, & 2.76232311E-04, 2.65115639E-04, 2.56610863E-04, 2.49777541E-04/ DATA ((DAS (I,J), I=1501,1600), J=3,3) / & 2.39258678E-04, 2.31370752E-04, 2.09679580E-04, 1.91640371E-04, & 1.81885684E-04, 1.75871201E-04, 1.73795776E-04, 1.72826699E-04, & 1.72261865E-04, 1.71892030E-04, 1.71537245E-04, 1.71502704E-04, & 1.71468516E-04, 1.71459683E-04, 1.71441071E-04, 1.71422556E-04, & 1.71404138E-04, 1.71385814E-04, 1.71367581E-04, 1.71349439E-04, & 1.71331385E-04, 1.71313419E-04, 1.71295538E-04, 1.71277741E-04, & 1.71260028E-04, 1.71242397E-04, 1.71224847E-04, 1.71207377E-04, & 1.71189988E-04, 1.71172677E-04, 1.71155443E-04, 1.71138285E-04, & 1.71127717E-04, 1.71126553E-04, 1.71125389E-04, 1.71124226E-04, & 1.71123063E-04, 1.71121901E-04, 1.71120739E-04, 1.71119577E-04, & 1.71102836E-04, 1.71102687E-04, 1.71102537E-04, 1.71102462E-04, & 1.71102387E-04, 1.71102312E-04, 1.71102237E-04, 1.71102162E-04, & 1.71102088E-04, 1.71102013E-04, 1.71101938E-04, 1.71101863E-04, & 1.71101788E-04, 1.71101713E-04, 1.71101638E-04, 1.71101564E-04, & 1.71101489E-04, 1.71101414E-04, 1.71101339E-04, 1.71101264E-04, & 1.71101189E-04, 1.71101115E-04, 1.71101040E-04, 1.71100965E-04, & 1.71100890E-04, 1.71100815E-04, 1.71100740E-04, 1.71100666E-04, & 1.71100591E-04, 1.71100516E-04, 1.71100441E-04, 1.71100366E-04, & 1.71100292E-04, 1.71100217E-04, 1.71100142E-04, 1.71100067E-04, & 1.71099992E-04, 1.71099982E-04, 1.71099973E-04, 1.71099963E-04, & 1.71099953E-04, 1.71099943E-04, 1.71099933E-04, 1.71099923E-04, & 1.71099913E-04, 1.71099904E-04, 1.71099894E-04, 1.71099884E-04, & 1.71099874E-04, 1.71099864E-04, 1.71099854E-04, 1.71099845E-04, & 1.71099835E-04, 1.71099825E-04, 1.71099815E-04, 1.71099805E-04, & 1.71099795E-04, 1.71099785E-04, 1.71099776E-04, 1.71099766E-04/ DATA ((DAS (I,J), I=1601,1700), J=3,3) / & 1.71099756E-04, 1.71099746E-04, 1.71099671E-04, 1.71099597E-04, & 1.71099522E-04, 1.71099447E-04, 1.71099372E-04, 1.71099297E-04, & 1.71099222E-04, 1.71099148E-04, 1.71099073E-04, 1.71098998E-04, & 1.71098923E-04, 1.71098848E-04, 1.71098774E-04, 1.71098699E-04, & 1.71098624E-04, 1.71098549E-04, 1.71098475E-04, 1.71098400E-04, & 1.71098325E-04, 1.71098250E-04, 1.71098176E-04, 1.71098101E-04, & 1.71098026E-04, 1.71097951E-04, 1.71097876E-04, 1.71097802E-04, & 1.71097727E-04, 1.71097652E-04, 1.71097577E-04, 1.71097503E-04, & 1.71097428E-04, 1.71097353E-04, 1.71097278E-04, 1.71097203E-04, & 1.71097129E-04, 1.71097054E-04, 1.71096979E-04, 1.71096830E-04, & 1.71081433E-04, 1.71070407E-04, 1.71053622E-04, 1.71036910E-04, & 1.71003701E-04, 1.70970777E-04, 1.70938135E-04, 1.70905770E-04, & 1.70873678E-04, 1.70841854E-04, 1.70810293E-04, 1.70778995E-04, & 1.70758086E-04, 1.70730016E-04, 1.70702158E-04, 1.70674511E-04, & 1.70647074E-04, 1.70619845E-04, 1.70486814E-04, 1.70358975E-04, & 1.70236501E-04, 1.70120298E-04, 1.70014385E-04, 1.69942603E-04, & 1.69831512E-04, 1.69725851E-04, 1.68747161E-04, 1.69610974E-04, & 1.69938055E-04, 1.70359300E-04, 1.70906307E-04, 1.71658792E-04, & 1.72113945E-04, 1.72570952E-04, 1.73489306E-04, 1.74247124E-04, & 1.74774571E-04, 1.75139778E-04, 1.75252669E-04, 1.75270110E-04, & 1.75286894E-04, 1.75303025E-04, 1.75318508E-04, 1.75333350E-04, & 1.75347553E-04, 1.75361124E-04, 1.75374067E-04, 1.75386387E-04, & 1.75398087E-04, 1.75409170E-04, 1.75419639E-04, 1.75420905E-04, & 1.75422161E-04, 1.75423408E-04, 1.75424645E-04, 1.75425873E-04, & 1.75427091E-04, 1.75428299E-04, 1.75429499E-04, 1.75430688E-04/ DATA ((DAS (I,J), I=1701,1800), J=3,3) / & 1.75431868E-04, 1.75433039E-04, 1.75434200E-04, 1.75435352E-04, & 1.75436494E-04, 1.75437627E-04, 1.75437935E-04, 1.75438751E-04, & 1.75439865E-04, 1.75440969E-04, 1.75442064E-04, 1.75443150E-04, & 1.75444226E-04, 1.75445293E-04, 1.75445370E-04, 1.75445552E-04, & 1.75445589E-04, 1.75445625E-04, 1.75445662E-04, 1.75445699E-04, & 1.75445735E-04, 1.75445772E-04, 1.75445808E-04, 1.75445845E-04, & 1.75445881E-04, 1.75445918E-04, 1.75445954E-04, 1.75445991E-04, & 1.75446009E-04, 1.75446027E-04, 1.75446045E-04, 1.75446064E-04, & 1.75446082E-04, 1.75446100E-04, 1.75446118E-04, 1.75446137E-04, & 1.75446155E-04, 1.75446173E-04, 1.75446191E-04, 1.75446209E-04, & 1.75446228E-04, 1.75446230E-04, 1.75446232E-04, 1.75446235E-04, & 1.75446237E-04, 1.75446239E-04, 1.75446242E-04, 1.75446244E-04, & 1.75446246E-04, 1.75446249E-04, 1.75446251E-04, 1.75446253E-04, & 1.75446256E-04, 1.75446258E-04, 1.75446260E-04, 1.75446263E-04, & 1.75446265E-04, 1.75446267E-04, 1.75446270E-04, 1.75446272E-04, & 1.75446274E-04, 1.75446277E-04, 1.75446279E-04, 1.75446281E-04, & 1.75446284E-04, 1.75446286E-04, 1.75446304E-04, 1.75446322E-04, & 1.75446341E-04, 1.75446359E-04, 1.75446377E-04, 1.75446395E-04, & 1.75446413E-04, 1.75446431E-04, 1.75446450E-04, 1.75446468E-04, & 1.75446486E-04, 1.75446504E-04, 1.75446522E-04, 1.75446540E-04, & 1.75446577E-04, 1.75446613E-04, 1.75446649E-04, 1.75446686E-04, & 1.75446722E-04, 1.75446758E-04, 1.75446794E-04, 1.75446831E-04, & 1.75446867E-04, 1.75446903E-04, 1.75446939E-04, 1.75449467E-04, & 1.75450486E-04, 1.75451497E-04, 1.75452498E-04, 1.75453490E-04, & 1.75454472E-04, 1.75455445E-04, 1.75456408E-04, 1.75457363E-04/ DATA ((DAS (I,J), I=1801,1900), J=3,3) / & 1.75458308E-04, 1.75459243E-04, 1.75460169E-04, 1.75461086E-04, & 1.75461994E-04, 1.75462892E-04, 1.75469741E-04, 1.75475995E-04, & 1.75481656E-04, 1.75486725E-04, 1.75491202E-04, 1.75495090E-04, & 1.75498389E-04, 1.75503224E-04, 1.75505708E-04, 1.75506068E-04, & 1.75505840E-04, 1.75495193E-04, 1.75456634E-04, 1.75389005E-04, & 1.75289868E-04, 1.75154418E-04, 1.74991333E-04, 1.74815201E-04, & 1.74626657E-04, 1.74426288E-04, 1.74228397E-04, 1.74041261E-04, & 1.73859731E-04, 1.73680921E-04, 1.73503030E-04, 1.73324862E-04, & 1.73145597E-04, 1.72964676E-04, 1.72781807E-04, 1.72597418E-04, & 1.72411449E-04, 1.72218921E-04, 1.72089296E-04, 1.69670921E-04, & 1.69100570E-04, 1.68778959E-04, 1.68570745E-04, 1.68421048E-04, & 1.68305969E-04, 1.68213171E-04, 1.68135960E-04, 1.68070499E-04, & 1.68013382E-04, 1.67962662E-04, 1.67917373E-04, 1.67876540E-04, & 1.67839175E-04, 1.67804282E-04, 1.67771873E-04, 1.67741958E-04, & 1.67713530E-04, 1.67686087E-04, 1.67660141E-04, 1.67635696E-04, & 1.67611228E-04, 1.67588267E-04, 1.67565286E-04, 1.67542795E-04, & 1.67520284E-04, 1.67497754E-04, 1.67475204E-04, 1.67452635E-04, & 1.67428505E-04, 1.67403324E-04, 1.67376575E-04, 1.67345678E-04, & 1.67307522E-04, 1.67219142E-04, 1.67130474E-04, 1.67092014E-04, & 1.67060792E-04, 1.67033705E-04, 1.67008156E-04, 1.66983629E-04, & 1.66960648E-04, 1.66937648E-04, 1.66914630E-04, 1.66891594E-04, & 1.66868540E-04, 1.66844942E-04, 1.66821326E-04, 1.66796114E-04, & 1.66770880E-04, 1.66744046E-04, 1.66715607E-04, 1.66686087E-04, & 1.66654953E-04, 1.66621145E-04, 1.66584654E-04, 1.66545471E-04, & 1.66502524E-04, 1.66454651E-04, 1.66400926E-04, 1.66340819E-04/ DATA ((DAS (I,J), I=1901,2000), J=3,3) / & 1.66270351E-04, 1.66187412E-04, 1.66087077E-04, 1.65961653E-04, & 1.65796812E-04, 1.65564296E-04, 1.65197374E-04, 1.64465013E-04, & 1.61245251E-04, 1.61072671E-04, 1.59723999E-04, 1.58751073E-04, & 1.58007695E-04, 1.57414876E-04, 1.56927201E-04, 1.56515796E-04, & 1.56162508E-04, 1.55853511E-04, 1.55580285E-04, 1.55335087E-04, & 1.55113624E-04, 1.54911718E-04, 1.54725843E-04, 1.54553610E-04, & 1.54393223E-04, 1.54242933E-04, 1.54101036E-04, 1.53966891E-04, & 1.53838359E-04, 1.53715862E-04, 1.53597820E-04, 1.53483685E-04, & 1.53372921E-04, 1.53264522E-04, 1.53157995E-04, 1.53052863E-04, & 1.52948190E-04, 1.52842612E-04, 1.52736207E-04, 1.52626314E-04, & 1.52511756E-04, 1.52388765E-04, 1.52250767E-04, 1.52081870E-04, & 1.51705674E-04, 1.51393278E-04, 1.51264197E-04, 1.51164512E-04, & 1.51079582E-04, 1.51003742E-04, 1.50933821E-04, 1.50868572E-04, & 1.50806822E-04, 1.50747475E-04, 1.50690477E-04, 1.50635134E-04, & 1.50581116E-04, 1.50528418E-04, 1.50476435E-04, 1.50424907E-04, & 1.50374463E-04, 1.50324274E-04, 1.50274140E-04, 1.50224696E-04, & 1.50175223E-04, 1.50126101E-04, 1.50076709E-04, 1.50027713E-04, & 1.49978579E-04, 1.49929768E-04, 1.49880881E-04, 1.49832253E-04, & 1.49783869E-04, 1.49736010E-04, 1.49688886E-04, 1.49642864E-04, & 1.49598362E-04, 1.49556173E-04, 1.49517085E-04, 1.49482593E-04, & 1.49470309E-04, 1.49480892E-04, 1.49492291E-04, 1.49504484E-04, & 1.49517379E-04, 1.49530884E-04, 1.49544908E-04, 1.49559496E-04, & 1.49574724E-04, 1.49590384E-04, 1.49606591E-04, 1.49623305E-04, & 1.49640488E-04, 1.49658098E-04, 1.49676284E-04, 1.49695028E-04, & 1.49714115E-04, 1.49733920E-04, 1.49754451E-04, 1.49775490E-04/ DATA ((DAS (I,J), I=2001,2100), J=3,3) / & 1.49797481E-04, 1.49819978E-04, 1.49843456E-04, 1.49867943E-04, & 1.49893471E-04, 1.49920341E-04, 1.49948332E-04, 1.49978340E-04, & 1.50010480E-04, 1.50045181E-04, 1.50082921E-04, 1.50125215E-04, & 1.50173794E-04, 1.50232430E-04, 1.50310466E-04, 1.50510822E-04, & 1.50735879E-04, 1.50839430E-04, 1.50924552E-04, 1.51000531E-04, & 1.51071222E-04, 1.51138285E-04, 1.51203631E-04, 1.51267637E-04, & 1.51330738E-04, 1.51392808E-04, 1.51455609E-04, 1.51518495E-04, & 1.51582082E-04, 1.51646371E-04, 1.51711160E-04, 1.51777656E-04, & 1.51844492E-04, 1.51912351E-04, 1.51982683E-04, 1.52053357E-04, & 1.52126577E-04, 1.52201660E-04, 1.52278642E-04, 1.52358343E-04, & 1.52440838E-04, 1.52526204E-04, 1.52614519E-04, 1.52706695E-04, & 1.52802011E-04, 1.52901407E-04, 1.53005883E-04, 1.53115612E-04, & 1.53230766E-04, 1.53351036E-04, 1.53477231E-04, 1.54141356E-04, & 1.56524593E-04, 1.59552223E-04, 1.63016543E-04, 1.67293855E-04, & 1.72077787E-04, 1.77884983E-04, 1.84302844E-04, 1.92035638E-04, & 2.00970687E-04, 2.10832230E-04, 2.22784063E-04, 2.36137160E-04, & 2.59860711E-04, 2.83584262E-04, 2.73188879E-04, 2.63944965E-04, & 2.56307562E-04, 2.49321657E-04, 2.43415507E-04, 2.37909382E-04, & 2.33178619E-04, 2.28707039E-04, 2.24650162E-04, 2.21104649E-04, & 2.17702784E-04, 2.14704903E-04, 2.11806935E-04, 2.09235764E-04, & 2.06734945E-04, 2.04503587E-04, 2.02322019E-04, 2.00366174E-04, & 1.98445485E-04, 1.96716410E-04, 1.95083921E-04, 1.93471867E-04, & 1.92013074E-04, 1.90567961E-04, 1.89256315E-04, 1.87953293E-04, & 1.86767445E-04, 1.85586404E-04, 1.84508974E-04, 1.83433451E-04, & 1.82450137E-04, 1.81466519E-04, 1.80525363E-04, 1.79662361E-04/ DATA ((DAS (I,J), I=2101,2180), J=3,3) / & 1.78796660E-04, 1.78001459E-04, 1.77202435E-04, 1.76467297E-04, & 1.75727480E-04, 1.75045802E-04, 1.74358800E-04, 1.73724908E-04, & 1.73085212E-04, 1.72494209E-04, 1.71922589E-04, 1.71344682E-04, & 1.70809820E-04, 1.70268464E-04, 1.69766883E-04, 1.69258771E-04, & 1.68787412E-04, 1.68309349E-04, 1.67865524E-04, 1.67414963E-04, & 1.66996288E-04, 1.66570882E-04, 1.66157511E-04, 1.65772900E-04, & 1.65381616E-04, 1.65017265E-04, 1.64646305E-04, 1.64300618E-04, & 1.63948402E-04, 1.63619948E-04, 1.63285047E-04, 1.62972534E-04, & 1.62653683E-04, 1.62355946E-04, 1.62051979E-04, 1.61767963E-04, & 1.61490303E-04, 1.61206579E-04, 1.60941248E-04, 1.60669969E-04, & 1.60416136E-04, 1.60156473E-04, 1.59913380E-04, 1.59664317E-04, & 1.59431287E-04, 1.59192662E-04, 1.58969044E-04, 1.58739949E-04, & 1.56520959E-04, 1.54700438E-04, 1.54438741E-04, 1.46812644E-04, & 1.44801711E-04, 1.41316880E-04, 1.40027584E-04, 1.39968742E-04, & 1.38700154E-04, 1.38696749E-04, 1.37978317E-04, 1.37954050E-04, & 1.37939651E-04, 1.37643665E-04, 1.37463969E-04, 1.37433125E-04, & 1.37383578E-04, 1.37312054E-04, 1.37262921E-04, 1.37232608E-04, & 1.36957901E-04, 1.36945903E-04, 1.36872587E-04, 1.36859297E-04, & 1.36811402E-04, 1.36777496E-04, 1.36762245E-04, 1.36745782E-04, & 1.36696040E-04, 1.36629832E-04, 1.36602484E-04, 1.36432768E-04/ c ++++ deghadslow26 ++++ c update 05/28/26 c****************************************************************************** c* * c* --- intRdatx --- Thu May 28 15:09:38 2026 * c* * c***************************# FJ@HU Berlin #*********************************** c "Delta alpha" Update version (24/02/2026) c ISCAN: 1, Ismooth: 0, IGS: 0, DSET: EPM2, 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.1880, MTOP: 172.40 c NF,IOR,ICHK: 5,4,2,ISU2: 2,NFL: 5,INAG: 1,inotail: 0, sin2W_ref: 0.23153 c CHPTCUT,EC,ECUT: 0.3180, 5.20, 11.50, sin2W_eff: 0.23153, s2W_ref/eff: 1.000 c iintRd,IUNMIX,iomegaphidat,iresonances,IRESON:1, 1, 3, 1, 1 DATA ((DGS (I,J), I= 1, 100), J=1,1) / & -1.92997094E-03,-2.05819812E-03,-2.18311394E-03,-2.31260868E-03, & -2.44902043E-03,-2.51388703E-03,-2.60815760E-03,-2.81048205E-03, & -2.89149526E-03,-2.96488597E-03,-3.08314351E-03,-3.19727217E-03, & -3.41657797E-03,-3.52411562E-03,-3.63371805E-03,-3.74317282E-03, & -3.85399731E-03,-3.94348041E-03,-4.06014443E-03,-4.15398927E-03, & -4.26481595E-03,-4.48193371E-03,-4.58210773E-03,-4.68276566E-03, & -4.80505931E-03,-4.87471078E-03,-4.90501355E-03,-5.00929217E-03, & -5.11581894E-03,-5.22299877E-03,-5.33116605E-03,-5.44291454E-03, & -5.56059124E-03,-5.67995204E-03,-5.80282806E-03,-5.92970541E-03, & -6.05901252E-03,-6.19165531E-03,-6.28932607E-03,-6.42546236E-03, & -6.56465898E-03,-6.66786948E-03,-6.81097452E-03,-6.95209138E-03, & -7.06224540E-03,-7.21723389E-03,-7.33315105E-03,-7.50105556E-03, & -8.41803203E-03,-9.38485160E-03,-1.07424193E-02,-1.21100140E-02, & -1.29899772E-02,-1.31597504E-02,-1.36637515E-02,-1.43378768E-02, & -1.50469599E-02,-1.57522131E-02,-1.64641570E-02,-1.67272202E-02, & -1.71675820E-02,-1.78997135E-02,-1.85062343E-02,-1.91366386E-02, & -1.96250283E-02,-1.99923949E-02,-2.00471700E-02,-2.01173752E-02, & -2.01464744E-02,-2.00501629E-02,-1.96813387E-02,-1.88565740E-02, & -1.76746498E-02,-1.59091029E-02,-1.34919330E-02,-1.05741270E-02, & -7.60986158E-03,-6.47086389E-03,-3.63482452E-03,-2.27200844E-03, & -6.44653071E-04, 5.93668798E-04, 2.44221909E-03, 5.07319591E-03, & 5.69475439E-03, 6.59249388E-03, 7.17868862E-03, 7.68276483E-03, & 8.23667256E-03, 8.69168174E-03, 9.12141513E-03, 9.47159113E-03, & 9.78372139E-03, 1.02648385E-02, 1.03793067E-02, 1.04954920E-02, & 1.06420759E-02, 1.07793033E-02, 1.09082139E-02, 1.10429088E-02/ DATA ((DGS (I,J), I= 101, 200), J=1,1) / & 1.10644440E-02, 1.11681335E-02, 1.12540902E-02, 1.12799237E-02, & 1.13135906E-02, 1.13408596E-02, 1.13679874E-02, 1.13949738E-02, & 1.14591682E-02, 1.13970965E-02, 1.14006494E-02, 1.14148497E-02, & 1.14301833E-02, 1.14475836E-02, 1.15167512E-02, 1.15579110E-02, & 1.16204371E-02, 1.16367603E-02, 1.16709863E-02, 1.18062978E-02, & 1.19743846E-02, 1.21729677E-02, 1.22679772E-02, 1.24340985E-02, & 1.25711253E-02, 1.28055422E-02, 1.33334231E-02, 1.29055099E-02, & 1.29663441E-02, 1.30527505E-02, 1.30822606E-02, 1.32018739E-02, & 1.33042873E-02, 1.35138849E-02, 1.35753309E-02, 1.36872583E-02, & 1.37987221E-02, 1.39144264E-02, 1.41079575E-02, 1.42092162E-02, & 1.43368596E-02, 1.45049916E-02, 1.47293095E-02, 1.49539807E-02, & 1.51507570E-02, 1.54396304E-02, 1.55906474E-02, 1.57869990E-02, & 1.61277250E-02, 1.63932476E-02, 1.67669583E-02, 1.71549343E-02, & 1.77222381E-02, 1.78656769E-02, 1.83160340E-02, 1.87146036E-02, & 1.90755397E-02, 1.93676253E-02, 1.95140815E-02, 1.92879261E-02, & 1.91278006E-02, 1.91999855E-02, 2.04244431E-02, 2.11227359E-02, & 2.13648789E-02, 2.15721019E-02, 2.17215736E-02, 2.17680794E-02, & 2.17846917E-02, 2.16508464E-02, 2.13776865E-02, 2.10345849E-02, & 2.07253522E-02, 1.97826993E-02, 1.92350488E-02, 1.87024394E-02, & 1.79829113E-02, 1.72405080E-02, 1.65973823E-02, 1.62605879E-02, & 1.56198782E-02, 1.53402590E-02, 1.46233376E-02, 1.40780809E-02, & 1.33235379E-02, 1.26013487E-02, 1.16471961E-02, 1.07791242E-02, & 9.84632763E-03, 8.67604407E-03, 8.12861057E-03, 7.74104128E-03, & 6.93650457E-03, 6.55271154E-03, 6.15788879E-03, 5.76809395E-03, & 5.25504213E-03, 4.84632921E-03, 4.25274779E-03, 3.11738487E-03/ DATA ((DGS (I,J), I= 201, 300), J=1,1) / & 2.19992235E-04,-3.83037550E-04,-7.63000925E-04,-1.18060563E-03, & -1.62025764E-03,-2.06765796E-03,-2.51447898E-03,-2.99799585E-03, & -3.48508134E-03,-4.06908064E-03,-4.52404698E-03,-5.17377900E-03, & -5.67827683E-03,-6.29881168E-03,-6.92544872E-03,-7.58068837E-03, & -8.19497547E-03,-8.80517143E-03,-9.45421142E-03,-1.01117531E-02, & -1.08137649E-02,-1.15296858E-02,-1.22769928E-02,-1.30602349E-02, & -1.38408679E-02,-1.46405968E-02,-1.55229004E-02,-1.63925999E-02, & -1.72328063E-02,-1.80298655E-02,-1.81311231E-02,-1.83370209E-02, & -1.88798424E-02,-2.01297847E-02,-2.12292847E-02,-2.22807534E-02, & -2.87694963E-02,-3.06319314E-02,-3.26132923E-02,-3.48019405E-02, & -3.72043696E-02,-3.97317290E-02,-4.25598262E-02,-4.59729670E-02, & -4.93861078E-02,-5.36883264E-02,-5.84292366E-02,-6.35576219E-02, & -6.91861948E-02,-7.54223465E-02,-8.17528578E-02,-8.85693700E-02, & -9.65003492E-02,-1.04286563E-01,-1.06110005E-01,-1.07696353E-01, & -1.09076421E-01,-1.10288870E-01,-1.11052860E-01,-1.11383744E-01, & -1.10901921E-01,-1.09568677E-01,-1.07219196E-01,-1.03843305E-01, & -9.89017590E-02,-9.27239490E-02,-8.09471631E-02,-7.17551633E-02, & -6.67091775E-02,-5.58594406E-02,-4.36697643E-02,-3.06063198E-02, & -1.74909400E-02,-3.95377716E-03, 9.65116644E-03, 2.31905430E-02, & 3.65028468E-02, 4.94122945E-02, 6.19033410E-02, 7.37060251E-02, & 8.42265319E-02, 9.43814905E-02, 1.02629848E-01, 1.09391968E-01, & 1.14998079E-01, 1.19378770E-01, 1.22712562E-01, 1.24938947E-01, & 1.26511097E-01, 1.26738095E-01, 1.26813235E-01, 1.25657673E-01, & 1.24670053E-01, 1.24027036E-01, 1.22360938E-01, 1.20941891E-01, & 1.19929867E-01, 1.18094145E-01, 1.15851418E-01, 1.14028179E-01/ DATA ((DGS (I,J), I= 301, 400), J=1,1) / & 1.12194925E-01, 1.10395141E-01, 1.08768572E-01, 1.06998063E-01, & 1.01625497E-01, 9.63401649E-02, 9.12036985E-02, 8.63652096E-02, & 8.17032998E-02, 7.76244210E-02, 7.39938058E-02, 7.07854880E-02, & 6.80876560E-02, 6.55264234E-02, 6.30164694E-02, 6.06569914E-02, & 5.83837861E-02, 5.62167157E-02, 5.41386391E-02, 5.22509104E-02, & 4.40065259E-02, 4.26249119E-02, 4.10498001E-02, 3.90662804E-02, & 3.55711560E-02, 2.72725820E-02, 2.86339096E-02, 2.24738958E-02, & 3.76264199E-02, 3.81046475E-02, 3.82282156E-02, 3.82090010E-02, & 3.80442100E-02, 3.77795541E-02, 3.74861415E-02, 3.71492383E-02, & 3.68295415E-02, 3.64890318E-02, 3.62932174E-02, 3.57865598E-02, & 3.54186107E-02, 3.50044853E-02, 3.45602065E-02, 3.41948646E-02, & 3.37589103E-02, 3.33605131E-02, 3.29950053E-02, 3.26067341E-02, & 3.22342120E-02, 3.18614540E-02, 3.15270787E-02, 3.12025693E-02, & 3.08741126E-02, 3.05511295E-02, 3.02328291E-02, 2.99262568E-02, & 2.90740581E-02, 2.72156854E-02, 2.42520188E-02, 2.20519050E-02, & 2.03716969E-02, 1.90270557E-02, 1.78859425E-02, 1.69061651E-02, & 1.60681168E-02, 1.59901435E-02, 1.50242196E-02, 1.43690186E-02, & 1.41453660E-02, 1.36096928E-02, 1.30978291E-02, 1.30485318E-02, & 1.26148363E-02, 1.21556620E-02, 1.19366695E-02, 1.17232911E-02, & 1.13292409E-02, 1.09790914E-02, 1.06603268E-02, 1.03667093E-02, & 1.01933391E-02, 1.00759795E-02, 9.79405324E-03, 9.52202466E-03, & 9.49460691E-03, 9.27639340E-03, 9.05857305E-03, 8.95703127E-03, & 8.85276781E-03, 8.64603627E-03, 8.43402565E-03, 8.22654058E-03, & 8.16887683E-03, 8.03207759E-03, 7.94658591E-03, 7.87454873E-03, & 7.73830354E-03, 7.60453770E-03, 7.59038799E-03, 7.48894111E-03/ DATA ((DGS (I,J), I= 401, 500), J=1,1) / & 7.26479589E-03, 7.19859825E-03, 7.19677340E-03, 7.20941043E-03, & 7.21414932E-03, 7.26085932E-03, 7.28351213E-03, 7.29740957E-03, & 7.32230686E-03, 7.37527540E-03, 7.46296800E-03, 7.57140877E-03, & 7.58350678E-03, 7.70658722E-03, 7.71949732E-03, 7.78421247E-03, & 7.83303403E-03, 7.97189193E-03, 7.99016321E-03, 8.09041531E-03, & 8.09672518E-03, 8.10353531E-03, 8.16134202E-03, 8.21569103E-03, & 8.22645752E-03, 8.30439186E-03, 8.31161190E-03, 8.35487034E-03, & 8.36449324E-03, 8.42595883E-03, 8.45798921E-03, 8.57068268E-03, & 8.58264626E-03, 8.72154188E-03, 8.83555887E-03, 8.90186377E-03, & 8.91509882E-03, 9.07638690E-03, 9.10547794E-03, 9.27646366E-03, & 9.43008915E-03, 9.49988842E-03, 9.54826112E-03, 9.57326624E-03, & 9.82644446E-03, 9.87769480E-03, 1.00187419E-02, 1.01507567E-02, & 1.02096767E-02, 1.03907634E-02, 1.05456945E-02, 1.05806231E-02, & 1.05975484E-02, 1.07016155E-02, 1.07518011E-02, 1.08037599E-02, & 1.10098021E-02, 1.10358865E-02, 1.10930380E-02, 1.11202013E-02, & 1.11403388E-02, 1.11422445E-02, 1.11430617E-02, 1.11401470E-02, & 1.11328924E-02, 1.11096116E-02, 1.10673677E-02, 1.10106257E-02, & 1.09047319E-02, 1.07930472E-02, 1.07804005E-02, 1.06114490E-02, & 1.04938297E-02, 1.03888240E-02, 1.03717745E-02, 1.02252452E-02, & 1.01996638E-02, 1.01217345E-02, 9.89938092E-03, 9.89348817E-03, & 9.90645127E-03, 9.96200127E-03, 9.93119149E-03, 9.89140547E-03, & 9.76803244E-03, 9.59878667E-03, 9.53285877E-03, 9.47054905E-03, & 9.37090500E-03, 9.34729006E-03, 9.28264781E-03, 9.27060662E-03, & 9.22360812E-03, 9.17331101E-03, 9.12562974E-03, 9.11559392E-03, & 8.96334420E-03, 8.67435653E-03, 8.66083536E-03, 9.35894745E-03/ DATA ((DGS (I,J), I= 501, 600), J=1,1) / & 9.82446003E-03, 1.00429486E-02, 1.03477859E-02, 1.03577496E-02, & 1.04574388E-02, 1.05335333E-02, 1.05400853E-02, 1.04625709E-02, & 1.03150209E-02, 1.01148287E-02, 9.87765353E-03, 9.56097721E-03, & 9.14603503E-03, 8.57628041E-03, 7.76566967E-03, 6.58487055E-03, & 4.77125709E-03, 4.29469493E-03, 3.76424907E-03, 3.17049730E-03, & 2.50286670E-03, 1.74201188E-03, 8.71492357E-04,-1.36004177E-04, & -3.56959413E-04,-5.85170736E-04,-8.19134646E-04,-1.06260862E-03, & -1.31423403E-03,-1.57444324E-03,-1.84422050E-03,-2.12311330E-03, & -2.41266486E-03,-2.71292023E-03,-4.19996533E-03,-5.36666088E-03, & -6.00975449E-03,-6.46184222E-03,-6.93429342E-03,-7.42936848E-03, & -7.94899779E-03,-8.49578562E-03,-9.07005172E-03,-9.36848520E-03, & -9.67461230E-03,-9.98909074E-03,-1.03122939E-02,-1.06445875E-02, & -1.09861145E-02,-1.13373054E-02,-1.16987885E-02,-1.20708863E-02, & -1.24539488E-02,-1.28486332E-02,-1.32554762E-02,-1.36752514E-02, & -1.41084449E-02,-1.45555221E-02,-1.50170719E-02,-1.54941236E-02, & -1.59871362E-02,-1.64971128E-02,-1.70251197E-02,-1.75722195E-02, & -1.81392378E-02,-1.87272833E-02,-1.93375470E-02,-1.99713641E-02, & -2.06301124E-02,-2.13155604E-02,-2.20282842E-02,-2.27713906E-02, & -2.35462269E-02,-2.43548764E-02,-2.51994596E-02,-2.60828821E-02, & -2.70070463E-02,-2.79750419E-02,-2.89905062E-02,-3.00565843E-02, & -3.11774024E-02,-3.23573328E-02,-3.36012143E-02,-3.42487687E-02, & -3.49143906E-02,-3.55987123E-02,-3.63026093E-02,-3.70269628E-02, & -3.77727075E-02,-3.85409594E-02,-3.93324260E-02,-4.01482009E-02, & -4.09898409E-02,-4.18580982E-02,-4.27546184E-02,-4.36801269E-02, & -4.46389344E-02,-4.56283159E-02,-4.66519340E-02,-4.77115676E-02/ DATA ((DGS (I,J), I= 601, 700), J=1,1) / & -4.88090349E-02,-4.99466355E-02,-5.11244096E-02,-5.23490580E-02, & -5.36208091E-02,-5.49425710E-02,-5.63175099E-02,-5.77487223E-02, & -5.92400578E-02,-6.07948394E-02,-6.24174960E-02,-6.41127293E-02, & -6.58851137E-02,-6.77407502E-02,-6.96852208E-02,-7.17250779E-02, & -7.38673774E-02,-7.61203266E-02,-7.84924505E-02,-8.09935078E-02, & -8.36356410E-02,-8.75912725E-02,-8.93868171E-02,-9.25257051E-02, & -9.58622455E-02,-9.94157243E-02,-1.03208026E-01,-1.07263980E-01, & -1.11612185E-01,-1.16285486E-01,-1.21321789E-01,-1.26765167E-01, & -1.32666953E-01,-1.39088006E-01,-1.44215686E-01,-1.60198902E-01, & -1.79794444E-01,-2.04387395E-01,-2.36180524E-01,-2.78914819E-01, & -3.39577287E-01,-4.36308387E-01,-5.85951485E-01,-9.01563687E-01, & -1.92624682E+00,-2.03963566E+00,-2.16709440E+00,-2.31561958E+00, & -2.47594871E+00,-2.66552910E+00,-2.88618699E+00,-3.14618416E+00, & -3.45696603E+00,-3.83483710E+00,-4.30378702E+00,-4.90258017E+00, & -5.68415358E+00,-6.75432193E+00,-6.88300294E+00,-8.71444176E+00, & -1.20021749E+01,-1.37619338E+01,-1.47892355E+01,-1.63651599E+01, & -1.72808667E+01,-1.79471917E+01,-1.84916913E+01,-1.50975566E+01, & -1.88667787E+01,-1.88143619E+01,-1.85971489E+01,-1.82988155E+01, & -1.76773216E+01,-1.69378724E+01,-1.58038537E+01,-1.54544510E+01, & -1.46589484E+01,-1.32711086E+01,-1.22157689E+01,-1.10589157E+01, & -9.80537142E+00,-8.46228817E+00,-7.03905519E+00,-5.92764751E+00, & -4.02334406E+00,-2.42742444E+00,-8.04722277E-01,-6.99594513E-01, & 3.25213830E+00, 4.80442527E+00, 7.06405907E+00, 7.92461113E+00, & 1.26655973E+01, 1.64179674E+01, 1.74902787E+01, 1.83587205E+01, & 1.83232534E+01, 1.86253198E+01, 1.87592655E+01, 1.88461363E+01/ DATA ((DGS (I,J), I= 701, 800), J=1,1) / & 1.88911756E+01, 1.47304030E+01, 1.53540706E+01, 1.59658044E+01, & 1.87394249E+01, 1.86364607E+01, 1.85136262E+01, 1.83736341E+01, & 1.81370165E+01, 1.79649425E+01, 1.76906221E+01, 1.74023015E+01, & 1.72048447E+01, 1.68025929E+01, 1.65998798E+01, 1.56015682E+01, & 1.52768900E+01, 1.51901563E+01, 1.47057903E+01, 1.40553130E+01, & 1.34410547E+01, 1.27056855E+01, 1.18874713E+01, 1.06958151E+01, & 9.64442784E+00, 8.11224310E+00, 6.77983547E+00, 5.71036196E+00, & 4.92682338E+00, 4.33003489E+00, 3.86107729E+00, 3.48320991E+00, & 3.17242995E+00, 2.91242277E+00, 2.69178491E+00, 2.50219378E+00, & 2.33758183E+00, 2.19332584E+00, 2.06586368E+00, 1.95247890E+00, & 1.85092460E+00, 1.75945780E+00, 1.67664959E+00, 1.60132830E+00, & 8.51599963E-01, 5.82917344E-01, 4.45051672E-01, 3.63286693E-01, & 3.03350962E-01, 2.62054423E-01, 2.31174995E-01, 2.07155589E-01, & 1.87924832E-01, 1.72175127E-01, 1.70310669E-01, 1.57312593E-01, & 1.46306090E-01, 1.36865527E-01, 1.28678477E-01, 1.21510598E-01, & 1.15182573E-01, 1.09554968E-01, 1.04517101E-01, 9.99809398E-02, & 9.58752035E-02, 9.21398214E-02, 8.87293798E-02, 8.56023175E-02, & 8.27246072E-02, 8.00674884E-02, 7.76066159E-02, 7.53207311E-02, & 7.31921526E-02, 7.12047724E-02, 6.93449904E-02, 6.76010434E-02, & 6.59635879E-02, 6.44212317E-02, 6.29665745E-02, 6.15924632E-02, & 6.02922804E-02, 5.90604223E-02, 5.78915105E-02, 5.67809312E-02, & 5.57243626E-02, 5.47179520E-02, 5.37581422E-02, 5.28417158E-02, & 5.19659055E-02, 5.11280468E-02, 5.03257468E-02, 4.95567322E-02, & 4.88188760E-02, 4.81106382E-02, 4.74302042E-02, 4.67757578E-02, & 4.61458281E-02, 4.55391912E-02, 4.49532520E-02, 4.43895436E-02/ DATA ((DGS (I,J), I= 801, 900), J=1,1) / & 4.38456604E-02, 4.33206030E-02, 4.28133621E-02, 4.23230393E-02, & 4.18486519E-02, 4.13894941E-02, 4.09449304E-02, 4.05142879E-02, & 4.00969154E-02, 3.96918619E-02, 3.92992692E-02, 3.89183400E-02, & 3.85485512E-02, 3.81893622E-02, 3.78405041E-02, 3.75013780E-02, & 3.71717412E-02, 3.68512328E-02, 3.65395797E-02, 3.62364077E-02, & 3.59414183E-02, 3.56542830E-02, 3.53749223E-02, 3.51031100E-02, & 3.48383491E-02, 3.45808183E-02, 3.43302669E-02, 3.40865598E-02, & 3.38496271E-02, 3.36194309E-02, 3.33960074E-02, 3.31794327E-02, & 3.29698554E-02, 3.27674495E-02, 3.25726465E-02, 3.23862623E-02, & 3.22092480E-02, 3.16582088E-02, 3.14589520E-02, 3.12645335E-02, & 3.10730265E-02, 3.08850903E-02, 3.06991521E-02, 3.05180342E-02, & 3.03399305E-02, 3.01651072E-02, 3.00117378E-02, 2.98214987E-02, & 2.96542000E-02, 2.94935166E-02, 2.93350342E-02, 2.91812688E-02, & 2.90299356E-02, 2.88813024E-02, 2.87351936E-02, 2.85923156E-02, & 2.84513634E-02, 2.41868774E-02, 2.12545020E-02, 1.86996506E-02, & 1.78522446E-02, 1.64399014E-02, 1.49497404E-02, 1.42571831E-02, & 1.34635989E-02, 1.33600874E-02, 1.28317220E-02, 1.25158139E-02, & 1.24574293E-02, 1.16394909E-02, 1.05438104E-02, 9.50190665E-03, & 6.09151327E-03, 8.51874179E-03, 8.54869125E-03, 7.87345895E-03, & 7.09637324E-03, 6.21133892E-03, 5.18742390E-03, 3.98163011E-03, & 2.53301195E-03, 7.53396554E-04,-1.49432385E-03,-2.57086232E-03, & -3.77723715E-03,-5.13931644E-03,-6.69029378E-03,-8.47348791E-03, & -1.05466207E-02,-1.17158405E-02,-1.29895348E-02,-1.43825924E-02, & -1.59125551E-02,-1.76009711E-02,-1.94739009E-02,-2.15639613E-02, & -2.39111755E-02,-2.65657964E-02,-2.95945255E-02,-3.30817871E-02/ DATA ((DGS (I,J), I= 901,1000), J=1,1) / & -3.71408579E-02,-4.17172672E-02,-4.47106531E-02,-4.80297859E-02, & -5.17311199E-02,-5.58849721E-02,-6.05800606E-02,-6.57651765E-02, & -7.19051750E-02,-7.90416736E-02,-8.74396531E-02,-9.76966947E-02, & -1.09906570E-01,-1.25063290E-01,-1.44386145E-01,-1.69878378E-01, & -2.05082925E-01,-2.56930744E-01,-3.41148105E-01,-5.03391485E-01, & -7.86059585E-01,-9.76905613E-01,-1.24482879E+00,-1.76869278E+00, & -1.89780320E+00,-2.01348568E+00,-2.10985449E+00,-2.19984419E+00, & -2.28209461E+00,-2.35006354E+00,-2.40785907E+00,-2.45126122E+00, & -2.49070151E+00,-2.52183063E+00,-2.54440318E+00,-2.55866079E+00, & -2.56542645E+00,-2.56516319E+00,-2.55747234E+00,-2.54349287E+00, & -2.52108766E+00,-2.48987492E+00,-2.45511018E+00,-2.47581562E+00, & -2.35120161E+00,-2.28846787E+00,-2.21536026E+00,-2.11608827E+00, & -2.01751601E+00,-1.88845411E+00,-1.76453374E+00,-1.58047374E+00, & -1.37537069E+00,-1.06173232E+00,-7.81904118E-01,-4.52815095E-01, & -2.83539406E-01,-1.12611329E-01, 5.87902635E-02, 5.31162516E-01, & 8.82282670E-01, 1.12023947E+00, 1.34016847E+00, 1.47145275E+00, & 1.63519565E+00, 1.76323099E+00, 1.89782776E+00, 2.00041926E+00, & 2.09835806E+00, 2.17500232E+00, 2.25387316E+00, 2.30790754E+00, & 2.35787952E+00, 2.39882178E+00, 2.42962140E+00, 2.45379100E+00, & 2.46644107E+00, 2.47265283E+00, 2.46926499E+00, 2.45624524E+00, & 2.43274411E+00, 2.39934357E+00, 2.35925612E+00, 2.30313642E+00, & 2.23451558E+00, 2.15488786E+00, 2.05809735E+00, 1.94367496E+00, & 1.80965682E+00, 1.64842234E+00, 1.55967694E+00, 1.45472544E+00, & 1.32963675E+00, 1.18932487E+00, 1.10501088E+00, 9.31802775E-01, & 8.71740479E-01, 7.43739412E-01, 8.94093201E-01, 3.47282759E-01/ DATA ((DGS (I,J), I=1001,1100), J=1,1) / & 2.71941070E-01, 2.25182479E-01, 1.93021500E-01, 1.69470978E-01, & 1.51454866E-01, 1.37215005E-01, 1.25669179E-01, 1.16112629E-01, & 1.08064005E-01, 1.01172063E-01, 9.52374892E-02, 9.01425757E-02, & 8.56322736E-02, 8.16260127E-02, 7.80457966E-02, 7.48394316E-02, & 6.97378483E-02, 6.33821615E-02, 5.99775153E-02, 5.44002504E-02, & 5.00189012E-02, 4.56954776E-02, 3.95265470E-02, 3.26087495E-02, & 2.82773807E-02, 2.62365125E-02, 2.52356449E-02, 2.44702904E-02, & 2.39045420E-02, 2.34620986E-02, 2.31027902E-02, 2.28029564E-02, & 2.25456802E-02, 2.23229022E-02, 2.21424984E-02, 2.19732316E-02, & 2.18199495E-02, 2.16795521E-02, 2.15494171E-02, 2.14278023E-02, & 2.13133728E-02, 2.11852767E-02, 2.10893191E-02, 2.09995429E-02, & 2.09151814E-02, 2.08358330E-02, 2.07609320E-02, 2.06901975E-02, & 2.06232144E-02, 2.05600293E-02, 2.05003236E-02, 2.04441350E-02, & 2.03914089E-02, 2.03426408E-02, 2.02984113E-02, 2.02607989E-02, & 2.02328976E-02, 2.02702416E-02, 2.04795462E-02, 2.06306402E-02, & 2.07784561E-02, 2.09280745E-02, 2.10817296E-02, 2.12398199E-02, & 2.14026447E-02, 2.15720077E-02, 2.17467929E-02, 2.19275291E-02, & 2.21114280E-02, 2.23039742E-02, 2.24994833E-02, 2.27025611E-02, & 2.29025166E-02, 2.31103276E-02, 2.33041579E-02, 2.34951798E-02, & 2.36794744E-02, 2.38538063E-02, 2.40143901E-02, 2.41565023E-02, & 2.42760573E-02, 2.43674165E-02, 2.44246668E-02, 2.44170537E-02, & 2.44083707E-02, 2.43198621E-02, 2.41646447E-02, 2.39315314E-02, & 2.36044037E-02, 2.31329982E-02, 2.25036085E-02, 2.15737729E-02, & 2.13019952E-02, 2.05730662E-02, 1.94997982E-02, 1.93899019E-02, & 1.86571589E-02, 1.83602351E-02, 1.81243162E-02, 1.79254181E-02/ DATA ((DGS (I,J), I=1101,1200), J=1,1) / & 1.76137270E-02, 1.72825752E-02, 1.72133989E-02, 1.72051013E-02, & 1.71546015E-02, 1.70525538E-02, 1.69985318E-02, 1.70190166E-02, & 1.72422948E-02, 1.72218472E-02, 1.69843577E-02, 1.68906558E-02, & 1.67059672E-02, 1.65477515E-02, 1.63895357E-02, 1.62313199E-02, & 1.61202088E-02, 1.58401232E-02, 1.54186774E-02, 1.48372268E-02, & 1.44649100E-02, 1.38949005E-02, 1.35237458E-02, 1.37213900E-02, & 1.46167437E-02, 1.52290543E-02, 1.66098234E-02, 1.71914662E-02, & 1.76684912E-02, 1.82011021E-02, 1.86145804E-02, 1.85316615E-02, & 1.84242549E-02, 1.86390807E-02, 1.92608548E-02, 1.88094992E-02, & 1.82450142E-02, 1.83471481E-02, 1.85414180E-02, 1.86780558E-02, & 1.88767379E-02, 1.89039747E-02, 1.87709292E-02, 1.84844594E-02, & 1.83127120E-02, 1.79843837E-02, 1.79455222E-02, 1.81665430E-02, & 1.84167494E-02, 1.87286065E-02, 1.88657389E-02, 1.91567537E-02, & 1.92800196E-02, 1.91146153E-02, 1.92772252E-02, 1.96393050E-02, & 2.00238647E-02, 2.04150312E-02, 2.06487429E-02, 2.08474417E-02, & 2.10923768E-02, 2.12782839E-02, 2.14120674E-02, 2.15548871E-02, & 2.17584528E-02, 2.19342383E-02, 2.20879780E-02, 2.22453138E-02, & 2.19935457E-02, 2.12023100E-02, 2.10291350E-02, 2.11551939E-02, & 2.14169787E-02, 2.11130073E-02, 2.11112745E-02, 2.13299058E-02, & 2.14699034E-02, 2.02763824E-02, 1.90080392E-02, 1.85851888E-02, & 1.82822703E-02, 1.87655501E-02, 1.87782968E-02, 1.85802991E-02, & 1.84052295E-02, 1.83029763E-02, 1.81580170E-02, 1.79640048E-02, & 1.74213196E-02, 1.74590277E-02, 1.75090173E-02, 1.74132899E-02, & 1.73776799E-02, 1.73600924E-02, 1.74471638E-02, 1.74900728E-02, & 1.75135476E-02, 1.75773458E-02, 1.75571352E-02, 1.76252370E-02/ DATA ((DGS (I,J), I=1201,1300), J=1,1) / & 1.82414161E-02, 1.88990968E-02, 1.90850039E-02, 1.91403261E-02, & 1.91753518E-02, 1.89666429E-02, 1.94015715E-02, 1.99383154E-02, & 2.01441951E-02, 2.02297236E-02, 2.03785508E-02, 2.04010166E-02, & 2.02581765E-02, 2.00043497E-02, 1.99192921E-02, 2.01033885E-02, & 2.01049353E-02, 1.95918078E-02, 1.96197504E-02, 1.98970052E-02, & 1.98486425E-02, 1.95730497E-02, 1.94443823E-02, 1.94997470E-02, & 1.96838006E-02, 1.96975210E-02, 2.01102330E-02, 2.03373036E-02, & 2.07767212E-02, 2.12436025E-02, 2.13308727E-02, 2.14078758E-02, & 2.14335435E-02, 2.15199970E-02, 2.17212644E-02, 2.18216845E-02, & 2.19209241E-02, 2.21153960E-02, 2.23044075E-02, 2.23968982E-02, & 2.24880762E-02, 2.25780742E-02, 2.26667016E-02, 2.27540905E-02, & 2.28402641E-02, 2.29252444E-02, 2.30090523E-02, 2.30917069E-02, & 2.31732263E-02, 2.32536272E-02, 2.33329247E-02, 2.34111329E-02, & 2.34882646E-02, 2.35643313E-02, 2.36393432E-02, 2.37133095E-02, & 2.37862381E-02, 2.38581358E-02, 2.39290080E-02, 2.39988593E-02, & 2.40676925E-02, 2.41355099E-02, 2.42023121E-02, 2.42680985E-02, & 2.43328672E-02, 2.43966148E-02, 2.44593366E-02, 2.45210263E-02, & 2.45816759E-02, 2.46412758E-02, 2.46998143E-02, 2.47572780E-02, & 2.48136515E-02, 2.48579526E-02, 2.49230508E-02, 2.50278352E-02, & 2.51277761E-02, 2.52225826E-02, 2.53118835E-02, 2.53952051E-02, & 2.54719382E-02, 2.55412901E-02, 2.56022134E-02, 2.56532965E-02, & 2.56925869E-02, 2.57172942E-02, 2.57232786E-02, 2.57040337E-02, & 2.56486584E-02, 2.56404854E-02, 2.55370947E-02, 2.53273164E-02, & 2.49119576E-02, 2.42013733E-02, 2.39034338E-02, 2.26439780E-02, & 2.02058471E-02, 1.90407610E-02, 1.73682123E-02, 1.62296741E-02/ DATA ((DGS (I,J), I=1301,1400), J=1,1) / & 1.47834027E-02, 1.33144026E-02, 1.14502729E-02, 1.03186502E-02, & 9.01460359E-03, 7.49704376E-03, 5.71099888E-03, 3.58129197E-03, & 1.00244699E-03,-5.00559024E-04,-2.17807548E-03,-4.06126807E-03, & -6.18906150E-03,-8.61069146E-03,-1.13893295E-02,-1.46073444E-02, & -1.83741299E-02,-2.28380832E-02,-2.47053673E-02,-2.58791682E-02, & -2.71040463E-02,-2.83833228E-02,-2.97206100E-02,-3.11198441E-02, & -3.25853219E-02,-3.41217430E-02,-3.57342581E-02,-3.74285237E-02, & -3.92107660E-02,-4.10878540E-02,-4.30673841E-02,-4.51577789E-02, & -4.73684019E-02,-4.97096925E-02,-5.21933240E-02,-5.48323915E-02, & -5.76416334E-02,-6.06376974E-02,-6.38394585E-02,-6.72684032E-02, & -7.09490958E-02,-7.49097480E-02,-7.91829201E-02,-8.38063897E-02, & -8.88242369E-02,-9.42882125E-02,-1.00259477E-01,-1.06810837E-01, & -1.14029645E-01,-1.22021617E-01,-1.30915913E-01,-1.40872003E-01, & -1.52089089E-01,-1.64819279E-01,-1.79386360E-01,-1.96213181E-01, & -2.15862599E-01,-2.39100566E-01,-2.66996680E-01,-3.01090994E-01, & -3.43684351E-01,-3.98373933E-01,-4.71115383E-01,-5.72534227E-01, & -7.23620320E-01,-9.72439386E-01,-1.45736332E+00,-1.74427678E+00, & -3.68684108E+00,-5.51306312E+00,-5.50058988E+00,-5.56480780E+00, & -5.74858353E+00,-5.98298014E+00,-6.26049786E+00,-6.57934103E+00, & -6.94275193E+00,-7.35424233E+00,-7.82319746E+00,-8.35288100E+00, & -8.95586554E+00,-9.64764773E+00,-1.04169907E+01,-1.12884200E+01, & -1.22461497E+01,-1.32478856E+01,-1.37324506E+01,-1.41191165E+01, & -1.44575194E+01,-1.47363898E+01,-1.47099496E+01,-1.48877964E+01, & -1.34960119E+01,-1.19911212E+01,-9.72344531E+00,-6.65749067E+00, & -2.95189871E+00,-2.95189871E+00,-2.37449121E+00,-1.79133155E+00/ DATA ((DGS (I,J), I=1401,1500), J=1,1) / & -1.20376399E+00,-6.13167390E-01,-2.09445945E-02, 1.16271508E+00, & 2.33593640E+00, 2.91518861E+00, 4.05241671E+00, 5.15316807E+00, & 6.21821676E+00, 7.22048510E+00, 8.16390285E+00, 9.04386884E+00, & 9.85723153E+00, 1.14138805E+01, 1.31761390E+01, 1.42422628E+01, & 1.47600921E+01, 1.48924131E+01, 1.46875048E+01, 1.43833161E+01, & 1.39957654E+01, 1.35567070E+01, 1.30579051E+01, 1.25564013E+01, & 1.15864478E+01, 1.06985693E+01, 9.91484828E+00, 8.58939941E+00, & 7.56710020E+00, 6.77530625E+00, 6.44898360E+00, 6.16460545E+00, & 5.92224344E+00, 5.72823501E+00, 5.61091334E+00, 5.83150599E+00, & 4.92827793E+00, 4.22852471E+00, 1.83286713E+00, 1.20162002E+00, & 9.01623555E-01, 7.25597044E-01, 6.09629031E-01, 5.27356103E-01, & 4.65894983E-01, 4.18196368E-01, 3.80075996E-01, 3.48892266E-01, & 3.22894754E-01, 3.00877331E-01, 2.81981689E-01, 2.65580275E-01, & 2.51203557E-01, 2.38493179E-01, 2.27170861E-01, 2.17017186E-01, & 2.07856805E-01, 1.99547880E-01, 1.91974439E-01, 1.85040726E-01, & 1.78666972E-01, 1.72786188E-01, 1.67341699E-01, 1.62285229E-01, & 1.57575398E-01, 1.53176532E-01, 1.49057706E-01, 1.45191981E-01, & 1.41555781E-01, 1.38128378E-01, 1.34891480E-01, 1.31828875E-01, & 1.28926151E-01, 1.26170443E-01, 1.23550239E-01, 1.21055200E-01, & 1.18676016E-01, 1.16404280E-01, 1.14232382E-01, 1.12153415E-01, & 1.10161096E-01, 1.08249695E-01, 1.06413979E-01, 1.04649155E-01, & 1.02950826E-01, 1.01314951E-01, 9.97378104E-02, 8.75910436E-02, & 7.98441265E-02, 7.20808860E-02, 6.27879196E-02, 5.29804962E-02, & 4.07717141E-02, 3.59014559E-02, 2.90175477E-02, 2.64568673E-02, & 2.79842249E-02, 2.86385860E-02, 2.89612978E-02, 2.91119462E-02/ DATA ((DGS (I,J), I=1501,1600), J=1,1) / & 2.91648053E-02, 2.90770208E-02, 2.83270248E-02, 2.71947491E-02, & 2.62686600E-02, 2.46555948E-02, 2.25521430E-02, 2.00855515E-02, & 1.69008097E-02, 1.25381369E-02, 1.68928828E-03,-3.56500709E-04, & -2.76097511E-03,-3.45680642E-03,-5.04127899E-03,-6.79925391E-03, & -8.76089300E-03,-1.09637811E-02,-1.34553594E-02,-1.62963825E-02, & -1.95659417E-02,-2.33689466E-02,-2.78475970E-02,-3.31995673E-02, & -3.97079833E-02,-4.77931923E-02,-5.81073638E-02,-7.17198733E-02, & -9.05144771E-02,-1.18147003E-01,-1.62770607E-01,-2.47028692E-01, & -3.50747862E-01,-3.67210173E-01,-3.85174665E-01,-4.04857096E-01, & -4.26516690E-01,-4.50467687E-01,-4.77094789E-01,-5.06874129E-01, & -4.20449695E+00,-4.28010530E+00,-4.43344904E+00,-4.52713118E+00, & -4.62966562E+00,-4.74188588E+00,-4.86324451E+00,-4.99336786E+00, & -5.13259384E+00,-5.28231392E+00,-5.44255383E+00,-5.61385255E+00, & -5.79521798E+00,-5.99259441E+00,-6.20692374E+00,-6.43407650E+00, & -6.66908855E+00,-6.92809824E+00,-7.20599399E+00,-7.50977203E+00, & -7.82247751E+00,-8.16474832E+00,-8.53040925E+00,-8.91783391E+00, & -9.32903224E+00,-9.75923522E+00,-1.02019742E+01,-1.06437968E+01, & -1.10263393E+01,-1.13728143E+01,-1.17105017E+01,-1.17987359E+01, & -1.16093850E+01,-1.09973489E+01,-9.78411215E+00,-7.82697229E+00, & -5.09614159E+00,-4.68479501E+00,-4.26319587E+00,-3.83209319E+00, & -3.39230273E+00,-2.94470290E+00,-2.49022971E+00,-2.02987093E+00, & -1.56465941E+00,-1.09566566E+00,-6.38759254E-01,-1.65554560E-01, & 3.08112366E-01, 7.81104221E-01, 1.25228909E+00, 1.72054941E+00, & 2.18479077E+00, 2.64395023E+00, 3.09700417E+00, 3.54297560E+00, & 3.98094062E+00, 4.41003408E+00, 4.82945456E+00, 5.23846810E+00/ DATA ((DGS (I,J), I=1601,1700), J=1,1) / & 5.63641132E+00, 6.02269345E+00, 8.53408845E+00, 1.02592128E+01, & 1.12873271E+01, 1.17548760E+01, 1.18504160E+01, 1.16329697E+01, & 1.13311133E+01, 1.09697885E+01, 1.05690085E+01, 1.01258563E+01, & 9.68585809E+00, 9.26072379E+00, 8.85741411E+00, 8.81945917E+00, & 8.11634666E+00, 7.78079775E+00, 7.46885967E+00, 7.17677178E+00, & 6.90453773E+00, 6.65079104E+00, 6.42122017E+00, 6.19668956E+00, & 5.98715812E+00, 5.79464496E+00, 5.61689601E+00, 5.44862753E+00, & 5.29152933E+00, 5.14535281E+00, 5.00834440E+00, 4.88091435E+00, & 4.88561571E+00, 4.65310240E+00, 4.55279588E+00, 4.46201666E+00, & 4.38238609E+00, 4.38404450E+00, 4.27078741E+00, 4.38441537E+00, & 5.94404627E-01, 3.81093514E-01, 2.51988581E-01, 1.91886872E-01, & 1.34471696E-01, 1.06712111E-01, 9.03470556E-02, 7.95532161E-02, & 7.19000625E-02, 6.61902477E-02, 6.17666515E-02, 5.82384044E-02, & 5.62409300E-02, 5.39138941E-02, 5.19285206E-02, 5.02145948E-02, & 4.87199062E-02, 4.74048251E-02, 4.26502222E-02, 3.96748650E-02, & 3.76335314E-02, 3.61424665E-02, 3.50007272E-02, 3.40834287E-02, & 3.33555923E-02, 3.27511508E-02, 2.76726980E-02, 2.62801045E-02, & 2.59288290E-02, 2.55210297E-02, 2.50343737E-02, 2.44282588E-02, & 2.40619003E-02, 2.36395595E-02, 2.25511999E-02, 2.09084918E-02, & 1.80420474E-02, 1.15027914E-02, 5.22554654E-03, 3.60063115E-03, & 1.72398186E-03,-4.68006730E-04,-3.06245293E-03,-6.18181821E-03, & -1.00036795E-02,-1.47961096E-02,-2.09834516E-02,-2.92792216E-02, & -4.09841739E-02,-5.87460686E-02,-8.89108982E-02,-9.42306893E-02, & -1.00058748E-01,-1.06473058E-01,-1.13565969E-01,-1.21450305E-01, & -1.30268423E-01,-1.40195547E-01,-1.51453675E-01,-1.64332820E-01/ DATA ((DGS (I,J), I=1701,1800), J=1,1) / & -1.79208617E-01,-1.96582506E-01,-2.17146588E-01,-2.41865826E-01, & -2.72138219E-01,-3.10082557E-01,-3.22158649E-01,-3.59035257E-01, & -4.24597963E-01,-5.16993398E-01,-6.56969234E-01,-8.94271941E-01, & -1.38636992E+00,-3.09362930E+00,-3.41833421E+00,-4.99905391E+00, & -5.10202684E+00,-5.17930178E+00,-5.37552041E+00,-5.63324940E+00, & -5.94178208E+00,-6.30341086E+00,-6.72213965E+00,-7.20467505E+00, & -7.76450854E+00,-8.41197740E+00,-9.16699158E+00,-1.03410215E+01, & -1.04860000E+01,-1.09830975E+01,-1.14951643E+01,-1.20133066E+01, & -1.25197857E+01,-1.29288551E+01,-1.32599746E+01,-1.34733113E+01, & -1.33085519E+01,-1.26655501E+01,-1.13189391E+01,-9.10558006E+00, & -5.96570908E+00,-5.48521642E+00,-5.01577747E+00,-4.53560132E+00, & -4.02080378E+00,-3.52138362E+00,-3.01406126E+00,-2.47402111E+00, & -1.95384677E+00,-1.42913188E+00,-8.74589116E-01,-3.44291991E-01, & 1.86867705E-01, 7.44165392E-01, 1.27324410E+00, 1.79944618E+00, & 2.34755605E+00, 2.86416151E+00, 3.37435390E+00, 3.90197920E+00, & 4.39572641E+00, 4.87996174E+00, 5.37719975E+00, 5.83923355E+00, & 6.28926864E+00, 6.72664151E+00, 9.70050221E+00, 1.17214535E+01, & 1.29044133E+01, 1.34312712E+01, 1.35187176E+01, 1.32557373E+01, & 1.29020405E+01, 1.24725145E+01, 1.19605956E+01, 1.14423643E+01, & 1.09333075E+01, 1.04409535E+01, 9.97702786E+00, 9.54072253E+00, & 8.74950810E+00, 8.06377288E+00, 7.47534947E+00, 6.95898244E+00, & 6.51657839E+00, 6.13421560E+00, 5.80455175E+00, 5.52595100E+00, & 5.30350051E+00, 5.16350423E+00, 5.46412693E+00, 8.94697094E-01, & 6.81561205E-01, 5.52651563E-01, 4.66240154E-01, 4.04276161E-01, & 3.57655807E-01, 3.21308850E-01, 2.92178120E-01, 2.68303243E-01/ DATA ((DGS (I,J), I=1801,1900), J=1,1) / & 2.48381113E-01, 2.31506614E-01, 2.17027023E-01, 2.04467455E-01, & 1.93470813E-01, 1.83760401E-01, 1.33948849E-01, 1.08222939E-01, & 9.25127592E-02, 8.19216108E-02, 7.42972673E-02, 6.85457123E-02, & 6.40521140E-02, 5.74830531E-02, 5.29110575E-02, 5.11090440E-02, & 4.95444603E-02, 4.38954938E-02, 3.97340918E-02, 3.72303705E-02, & 3.55532735E-02, 3.43482894E-02, 3.34375709E-02, 3.27215637E-02, & 3.21412853E-02, 3.16591636E-02, 3.12488432E-02, 3.08921560E-02, & 3.05770535E-02, 3.02945307E-02, 3.00377012E-02, 2.98011659E-02, & 2.95805798E-02, 2.93723413E-02, 2.91733431E-02, 2.89806377E-02, & 2.87916886E-02, 2.86057012E-02, 2.84179845E-02, 2.49158150E-02, & 2.40898612E-02, 2.32987314E-02, 2.25489076E-02, 2.19283086E-02, & 2.14057349E-02, 2.09612467E-02, 2.05834544E-02, 2.02658791E-02, & 2.00163605E-02, 1.98119331E-02, 1.96485732E-02, 1.95205523E-02, & 1.93771478E-02, 1.93220059E-02, 1.93034868E-02, 1.93196084E-02, & 1.93695405E-02, 1.94548003E-02, 1.92518503E-02, 1.97244004E-02, & 1.99170479E-02, 2.01414441E-02, 2.04102206E-02, 2.07186063E-02, & 2.10746823E-02, 2.14805902E-02, 2.19378546E-02, 2.24474979E-02, & 2.30488041E-02, 2.37369122E-02, 2.45314430E-02, 2.55216672E-02, & 2.68303480E-02, 3.00284891E-02, 3.30518849E-02, 3.41928525E-02, & 3.50197609E-02, 3.56603245E-02, 3.61973028E-02, 3.66522110E-02, & 3.70260470E-02, 3.73515417E-02, 3.76311474E-02, 3.78676727E-02, & 3.80611562E-02, 3.82219717E-02, 3.87368053E-02, 3.84478226E-02, & 3.85161279E-02, 3.85582237E-02, 3.85729107E-02, 3.85600571E-02, & 3.85200146E-02, 3.84048401E-02, 3.83053096E-02, 3.81820932E-02, & 3.80315794E-02, 3.78324397E-02, 3.76089606E-02, 3.73589295E-02/ DATA ((DGS (I,J), I=1901,2000), J=1,1) / & 3.70412972E-02, 3.66739361E-02, 3.62482134E-02, 3.57531052E-02, & 3.51742751E-02, 3.44679008E-02, 3.35957261E-02, 3.24654270E-02, & 2.99162182E-02, 2.97795803E-02, 2.92613846E-02, 2.89216095E-02, & 2.86566650E-02, 2.84273560E-02, 2.82109105E-02, 2.79782217E-02, & 2.76490238E-02, 2.76775332E-02, 2.75938484E-02, 2.74980674E-02, & 2.73999076E-02, 2.73015351E-02, 2.72030094E-02, 2.71054182E-02, & 2.70081241E-02, 2.69108961E-02, 2.68134106E-02, 2.67158157E-02, & 2.65409000E-02, 2.65140511E-02, 2.64100847E-02, 2.63064842E-02, & 2.61983286E-02, 2.60863115E-02, 2.59698030E-02, 2.58480985E-02, & 2.57154187E-02, 2.55827710E-02, 2.54364531E-02, 2.52763519E-02, & 2.50995959E-02, 2.48990088E-02, 2.46624814E-02, 2.43642439E-02, & 2.38184756E-02, 2.41174574E-02, 2.47975216E-02, 2.56735817E-02, & 2.66787043E-02, 2.77482059E-02, 2.88228772E-02, 2.98392901E-02, & 3.07553035E-02, 3.15484579E-02, 3.22006597E-02, 3.27162838E-02, & 3.31048049E-02, 3.33792852E-02, 3.35549752E-02, 3.36520088E-02, & 3.36839309E-02, 3.36643310E-02, 3.35801834E-02, 3.34841191E-02, & 3.33668649E-02, 3.32319944E-02, 3.30808011E-02, 3.29086365E-02, & 3.27244895E-02, 3.25305920E-02, 3.23236298E-02, 3.20972847E-02, & 3.17905992E-02, 3.16665722E-02, 3.15027404E-02, 3.13161805E-02, & 3.11133467E-02, 3.08715896E-02, 3.06736031E-02, 3.04258611E-02, & 2.86548130E-02, 2.85362719E-02, 2.84205384E-02, 2.83077395E-02, & 2.81991136E-02, 2.80961725E-02, 2.80072913E-02, 2.79258320E-02, & 2.78539934E-02, 2.77939596E-02, 2.77598952E-02, 2.77136441E-02, & 2.77202646E-02, 2.77590774E-02, 2.78370993E-02, 2.79627458E-02, & 2.81426197E-02, 2.83882947E-02, 2.87161405E-02, 2.92070308E-02/ DATA ((DGS (I,J), I=2001,2100), J=1,1) / & 2.94781873E-02, 2.98499199E-02, 3.03012008E-02, 3.07944723E-02, & 3.13032878E-02, 3.18078048E-02, 3.22800288E-02, 3.27130623E-02, & 3.30886650E-02, 3.33966719E-02, 3.36313801E-02, 3.37928862E-02, & 3.38808199E-02, 3.38948336E-02, 3.38059432E-02, 3.34575329E-02, & 3.30423944E-02, 3.28759658E-02, 3.28383690E-02, 3.26487541E-02, & 3.25600707E-02, 3.24833473E-02, 3.24105513E-02, 3.23435330E-02, & 3.22820859E-02, 3.22249995E-02, 3.21703747E-02, 3.21186006E-02, & 3.20703992E-02, 3.20227530E-02, 3.19767873E-02, 3.19316711E-02, & 3.18884794E-02, 3.18990549E-02, 3.18058029E-02, 3.17665804E-02, & 3.17277635E-02, 3.16895724E-02, 3.16522430E-02, 3.16153680E-02, & 3.15789766E-02, 3.15430989E-02, 3.15077667E-02, 3.14727159E-02, & 3.14383301E-02, 3.14042869E-02, 3.13999680E-02, 3.13370230E-02, & 3.13041197E-02, 3.12719491E-02, 3.12405811E-02, 3.11386821E-02, & 3.05637422E-02, 3.02297427E-02, 2.99966947E-02, 2.98007273E-02, & 2.96424176E-02, 2.94914066E-02, 2.93606193E-02, 2.92311364E-02, & 2.91052335E-02, 2.89849982E-02, 2.88562965E-02, 2.87279006E-02, & 2.86898203E-02, 2.86517401E-02, 2.87668718E-02, 2.88741443E-02, & 2.89670117E-02, 2.90559950E-02, 2.91347851E-02, 2.92116824E-02, & 2.92808248E-02, 2.93491840E-02, 2.94140881E-02, 2.94733602E-02, & 2.95327505E-02, 2.95873776E-02, 2.96424592E-02, 2.96934061E-02, & 2.97450312E-02, 2.97929921E-02, 2.98417837E-02, 2.98872736E-02, & 2.99337002E-02, 2.99771105E-02, 3.00196196E-02, 3.00631660E-02, & 3.01040232E-02, 3.01459620E-02, 3.01853835E-02, 3.02259172E-02, & 3.02640775E-02, 3.03033711E-02, 3.03404132E-02, 3.03786026E-02, & 3.04146452E-02, 3.04518801E-02, 3.04886104E-02, 3.05233266E-02/ DATA ((DGS (I,J), I=2101,2180), J=1,1) / & 3.05592051E-02, 3.05931438E-02, 3.06282457E-02, 3.06614737E-02, & 3.06958636E-02, 3.07284384E-02, 3.07621727E-02, 3.07941446E-02, & 3.08272722E-02, 3.08586851E-02, 3.08898391E-02, 3.09221420E-02, & 3.09527933E-02, 3.09845880E-02, 3.10147690E-02, 3.10390156E-02, & 3.10713549E-02, 3.11023498E-02, 3.11318007E-02, 3.11623907E-02, & 3.11914654E-02, 3.12216733E-02, 3.12516937E-02, 3.12802383E-02, & 3.13099067E-02, 3.13381230E-02, 3.13674568E-02, 3.13953610E-02, & 3.14243763E-02, 3.14519830E-02, 3.14811518E-02, 3.15082809E-02, & 3.15367427E-02, 3.15637948E-02, 3.15919384E-02, 3.16187287E-02, & 3.16453950E-02, 3.16731432E-02, 3.16995629E-02, 3.17270584E-02, & 3.17532410E-02, 3.17804931E-02, 3.18064471E-02, 3.19081951E-02, & 3.19339044E-02, 3.19606259E-02, 3.19860381E-02, 3.20124530E-02, & 3.22202175E-02, 3.24913863E-02, 3.25338584E-02, 3.43879645E-02, & 3.52088442E-02, 3.73450348E-02, 3.87631941E-02, 3.85962864E-02, & 4.01874337E-02, 4.01924726E-02, 4.13837629E-02, 4.14291638E-02, & 4.14565288E-02, 4.20474296E-02, 4.24408543E-02, 4.25114290E-02, & 4.26267665E-02, 4.27976981E-02, 4.29182939E-02, 4.29940353E-02, & 4.37290650E-02, 4.37670776E-02, 4.39904038E-02, 4.40305313E-02, & 4.46445747E-02, 4.42764004E-02, 4.43996727E-02, 4.44536998E-02, & 4.45409663E-02, 4.47655964E-02, 4.48610756E-02, 4.54928336E-02/ DATA ((DGS (I,J), I= 1, 100), J=2,2) / & 2.34116635E-06, 2.59430741E-06, 2.91026167E-06, 3.37473550E-06, & 4.06686518E-06, 4.31816027E-06, 5.50101928E-06, 4.99264138E-06, & 5.51015202E-06, 6.43848186E-06, 6.09074127E-06, 6.41190821E-06, & 6.83162875E-06, 7.09053723E-06, 8.01713967E-06, 8.17464151E-06, & 8.48861325E-06, 8.70018866E-06, 9.03179250E-06, 8.54459008E-06, & 8.78851602E-06, 9.20114585E-06, 9.39902138E-06, 1.03161322E-05, & 1.06230159E-05, 1.06855820E-05, 1.07028262E-05, 1.09065332E-05, & 1.12373528E-05, 1.13385467E-05, 1.17212770E-05, 1.21008053E-05, & 1.25139418E-05, 1.29771538E-05, 1.34803202E-05, 1.42011643E-05, & 1.48394159E-05, 1.54921941E-05, 1.62019322E-05, 1.70697123E-05, & 1.80814974E-05, 1.90530943E-05, 2.06651561E-05, 2.31185041E-05, & 2.50672454E-05, 2.56719387E-05, 2.55253503E-05, 2.48481456E-05, & 2.99943733E-05, 3.57197671E-05, 3.87607688E-05, 3.71348897E-05, & 4.16861545E-05, 4.02084350E-05, 4.04594621E-05, 3.71967188E-05, & 3.56318752E-05, 3.55318091E-05, 3.67583620E-05, 3.65228218E-05, & 3.72866528E-05, 3.75187402E-05, 3.92238554E-05, 3.97238524E-05, & 4.10103705E-05, 4.47573895E-05, 4.64630840E-05, 4.71225130E-05, & 5.09130900E-05, 4.85342337E-05, 4.92356578E-05, 5.09618310E-05, & 5.28531633E-05, 5.40081977E-05, 5.35582749E-05, 5.35233898E-05, & 5.26762231E-05, 1.36373107E-04, 1.19004499E-04, 1.22677274E-04, & 1.14920482E-04, 1.12538708E-04, 9.82733611E-05, 9.49170074E-05, & 9.64676518E-05, 8.77690231E-05, 8.71613687E-05, 8.70465385E-05, & 8.33797243E-05, 8.31131275E-05, 7.95291068E-05, 7.77892717E-05, & 7.62384653E-05, 7.39736196E-05, 7.32235454E-05, 7.24622202E-05, & 7.17448327E-05, 7.10732360E-05, 7.04423420E-05, 6.98713706E-05/ DATA ((DGS (I,J), I= 101, 200), J=2,2) / & 6.93938835E-05, 6.91632461E-05, 6.95307216E-05, 6.90945998E-05, & 6.83952548E-05, 6.70910851E-05, 6.57936728E-05, 6.45030178E-05, & 6.41453194E-05, 6.24917871E-05, 6.08552794E-05, 6.03553989E-05, & 5.98156219E-05, 5.92030922E-05, 5.87952655E-05, 5.86415586E-05, & 5.86661540E-05, 5.86501484E-05, 5.86609170E-05, 6.28214544E-05, & 6.61547911E-05, 6.92924643E-05, 7.28680932E-05, 7.80332395E-05, & 8.66691868E-05, 1.04119517E-04, 2.23232395E-04, 7.35832972E-05, & 6.07385030E-05, 6.46627005E-05, 7.02679006E-05, 7.87378727E-05, & 7.85611415E-05, 8.06017841E-05, 8.12174417E-05, 8.08919769E-05, & 7.95750446E-05, 7.54718520E-05, 7.11131866E-05, 6.83997888E-05, & 6.61135952E-05, 6.48271794E-05, 6.21049959E-05, 6.10570568E-05, & 6.05730904E-05, 6.08202943E-05, 6.17274797E-05, 6.15580763E-05, & 6.43233146E-05, 6.53213170E-05, 6.68734258E-05, 6.51882639E-05, & 6.83086321E-05, 6.97148170E-05, 7.41298403E-05, 4.18912500E-05, & 3.99398454E-05, 3.83350992E-05, 3.86482099E-05, 3.75882977E-05, & 3.75230778E-05, 4.63848790E-05, 4.19024637E-05, 4.15097102E-05, & 3.98149224E-05, 4.09960278E-05, 4.31101554E-05, 4.09572279E-05, & 4.09053347E-05, 3.87053221E-05, 3.92949989E-05, 3.78647587E-05, & 3.65058057E-05, 3.50234926E-05, 3.70931876E-05, 3.83913880E-05, & 3.56924436E-05, 3.37702080E-05, 3.38507947E-05, 3.32988390E-05, & 3.28575300E-05, 3.27039199E-05, 3.15202777E-05, 3.06605225E-05, & 3.02577194E-05, 2.95086220E-05, 2.98796297E-05, 2.86382823E-05, & 2.94858786E-05, 2.81804066E-05, 2.82522125E-05, 2.83727547E-05, & 2.97201961E-05, 3.07118710E-05, 2.92888465E-05, 2.83969044E-05, & 2.68517763E-05, 2.69813207E-05, 2.60703141E-05, 2.49248292E-05/ DATA ((DGS (I,J), I= 201, 300), J=2,2) / & 4.81020283E-05, 2.59452392E-05, 2.60423210E-05, 2.63905797E-05, & 2.71312889E-05, 2.83606057E-05, 2.96437427E-05, 2.99914825E-05, & 2.97757280E-05, 2.97465308E-05, 2.98733278E-05, 3.01438215E-05, & 3.05784297E-05, 3.05433246E-05, 3.03862081E-05, 3.04381029E-05, & 3.04650375E-05, 3.04745036E-05, 3.05456614E-05, 3.06848552E-05, & 3.09141735E-05, 3.12830534E-05, 3.18725311E-05, 3.27770253E-05, & 3.40700306E-05, 3.57123272E-05, 3.75445303E-05, 3.82350161E-05, & 3.67184861E-05, 3.44224354E-05, 5.12707798E-05, 4.98401747E-05, & 4.60685792E-05, 3.90845527E-05, 3.81525491E-05, 3.82825148E-05, & 5.33844394E-05, 5.56441522E-05, 5.83124371E-05, 6.12520849E-05, & 6.44571928E-05, 6.78588914E-05, 7.13237698E-05, 7.45635729E-05, & 7.78033760E-05, 8.07561153E-05, 8.44619470E-05, 8.96233553E-05, & 9.71679048E-05, 1.06925288E-04, 1.15484391E-04, 1.17677144E-04, & 1.27333277E-04, 1.46080332E-04, 1.53599423E-04, 1.61504746E-04, & 1.66863630E-04, 1.75157902E-04, 1.84790228E-04, 1.89058761E-04, & 1.87386403E-04, 1.82100454E-04, 1.80909685E-04, 1.84080741E-04, & 1.84658366E-04, 1.85246540E-04, 1.87839643E-04, 1.89836855E-04, & 1.89634932E-04, 1.91347228E-04, 1.90979325E-04, 1.90078600E-04, & 1.99246960E-04, 1.97441963E-04, 1.91606730E-04, 1.90793202E-04, & 1.90076510E-04, 1.89289868E-04, 1.88004387E-04, 1.86640544E-04, & 1.86930300E-04, 1.89465056E-04, 1.91294030E-04, 1.91248471E-04, & 1.90372891E-04, 1.88021171E-04, 1.84276407E-04, 1.81101854E-04, & 1.78319217E-04, 1.74788047E-04, 1.71073777E-04, 1.65662939E-04, & 1.60886568E-04, 1.57833180E-04, 1.53009491E-04, 1.48627995E-04, & 1.45053652E-04, 1.45498734E-04, 1.41508971E-04, 1.32713234E-04/ DATA ((DGS (I,J), I= 301, 400), J=2,2) / & 1.27345901E-04, 1.25069416E-04, 1.19688684E-04, 1.14489034E-04, & 1.02475514E-04, 9.53752421E-05, 9.52407373E-05, 9.00192151E-05, & 8.30859911E-05, 7.60717164E-05, 7.02864012E-05, 6.58046419E-05, & 6.22191119E-05, 5.92427978E-05, 5.67357297E-05, 5.45908715E-05, & 5.27343851E-05, 5.11490095E-05, 4.98500952E-05, 4.88681397E-05, & 4.17559782E-05, 4.27384562E-05, 4.46020294E-05, 4.85008619E-05, & 6.02562115E-05, 1.02689479E-04, 9.49534420E-05, 5.23025081E-05, & 4.51510932E-05, 4.07154850E-05, 3.83522814E-05, 3.67250618E-05, & 3.57593654E-05, 3.51680463E-05, 3.48427443E-05, 3.47194353E-05, & 3.47564095E-05, 3.49259422E-05, 3.52100348E-05, 3.55976415E-05, & 3.60819613E-05, 3.65362889E-05, 3.68418588E-05, 3.73678318E-05, & 3.76154957E-05, 3.73106583E-05, 3.71401173E-05, 3.71314639E-05, & 3.73121173E-05, 3.77207263E-05, 3.83929195E-05, 3.88128672E-05, & 3.79727217E-05, 3.71610800E-05, 3.63856096E-05, 3.56556280E-05, & 3.39413776E-05, 3.46634845E-05, 3.59028996E-05, 4.17043358E-05, & 4.08997658E-05, 3.98992902E-05, 3.87691936E-05, 3.85891484E-05, & 3.58899455E-05, 3.49683592E-05, 3.16932936E-05, 3.50011261E-05, & 3.45470597E-05, 3.26565907E-05, 3.26930996E-05, 3.16872809E-05, & 3.13520368E-05, 3.17776944E-05, 2.94695596E-05, 3.14199536E-05, & 2.93426769E-05, 2.99411076E-05, 2.92207261E-05, 3.04742939E-05, & 2.82071541E-05, 3.00443247E-05, 2.76722691E-05, 2.93331609E-05, & 2.85387034E-05, 2.85883647E-05, 2.94828899E-05, 2.77308391E-05, & 2.98200808E-05, 2.85227402E-05, 2.86130123E-05, 3.00049986E-05, & 2.93878604E-05, 3.28642440E-05, 3.09678452E-05, 3.31841317E-05, & 3.31618953E-05, 3.78236414E-05, 3.70573885E-05, 3.62220297E-05/ DATA ((DGS (I,J), I= 401, 500), J=2,2) / & 3.79338172E-05, 4.28143407E-05, 4.51468787E-05, 4.17687378E-05, & 4.05019349E-05, 4.21512725E-05, 4.51893877E-05, 4.77239615E-05, & 4.79465065E-05, 4.54794376E-05, 4.75913381E-05, 4.77678295E-05, & 4.92686387E-05, 5.49741033E-05, 5.34326920E-05, 4.95625440E-05, & 5.12577544E-05, 4.74685460E-05, 4.80000197E-05, 5.30146632E-05, & 5.38652863E-05, 5.53780822E-05, 5.75468808E-05, 5.53050437E-05, & 5.30196848E-05, 5.51197342E-05, 5.51475201E-05, 6.16065146E-05, & 6.17062588E-05, 5.99982671E-05, 6.32596893E-05, 5.92873306E-05, & 6.06547249E-05, 6.25153388E-05, 6.61072208E-05, 6.14460773E-05, & 6.16293614E-05, 5.96225266E-05, 6.24323398E-05, 6.87797615E-05, & 6.73996099E-05, 6.87983236E-05, 6.64893998E-05, 6.69455254E-05, & 6.50290636E-05, 6.41352370E-05, 7.30891758E-05, 6.79126717E-05, & 7.15775884E-05, 6.45526752E-05, 7.39572986E-05, 7.36011073E-05, & 7.39180410E-05, 7.51986539E-05, 7.00379586E-05, 6.45445062E-05, & 6.23809450E-05, 6.51342804E-05, 7.12024240E-05, 7.20410695E-05, & 7.17656843E-05, 7.06132838E-05, 7.09054146E-05, 6.89499587E-05, & 7.00969325E-05, 7.01585088E-05, 6.75885340E-05, 7.01351565E-05, & 7.49666234E-05, 7.20070877E-05, 7.34542165E-05, 7.36828938E-05, & 7.93921672E-05, 8.32303634E-05, 8.38977566E-05, 9.13049548E-05, & 9.42897764E-05, 9.07504085E-05, 9.62579441E-05, 9.13740319E-05, & 8.96791289E-05, 1.06455882E-04, 1.17077060E-04, 1.17571216E-04, & 1.01900771E-04, 1.09463695E-04, 1.15422028E-04, 1.21396424E-04, & 1.12019569E-04, 1.13904391E-04, 1.14277089E-04, 1.15124505E-04, & 1.19446628E-04, 1.19381502E-04, 1.12251564E-04, 1.09529039E-04, & 1.27838139E-04, 1.49789306E-04, 1.53235788E-04, 1.85544688E-04/ DATA ((DGS (I,J), I= 501, 600), J=2,2) / & 1.92493180E-04, 1.77587088E-04, 1.56789966E-04, 1.53197557E-04, & 1.13635660E-04, 1.12870678E-04, 1.11134838E-04, 9.39717800E-05, & 8.36045565E-05, 7.87330556E-05, 7.70336309E-05, 7.60572666E-05, & 7.53535441E-05, 7.47171975E-05, 7.38975672E-05, 7.19515773E-05, & 6.21728746E-05, 6.47421121E-05, 5.68776605E-05, 5.30246846E-05, & 5.04817544E-05, 4.82344259E-05, 4.46707800E-05, 4.42795456E-05, & 4.33511241E-05, 4.31703455E-05, 4.35026057E-05, 4.42256029E-05, & 4.53007857E-05, 4.35060937E-05, 4.20642958E-05, 4.10050406E-05, & 4.04602923E-05, 3.98759182E-05, 3.73350256E-05, 3.74880822E-05, & 3.85325494E-05, 3.83345580E-05, 3.79529551E-05, 3.81075778E-05, & 3.78972686E-05, 3.76227013E-05, 3.71505014E-05, 3.68759264E-05, & 3.67850758E-05, 3.65490920E-05, 3.64931137E-05, 3.62845819E-05, & 3.62543958E-05, 3.60655926E-05, 3.60542249E-05, 3.58799132E-05, & 3.58833488E-05, 3.57198625E-05, 3.55747989E-05, 3.54444904E-05, & 3.53261901E-05, 3.52177728E-05, 3.51175428E-05, 3.50241046E-05, & 3.49362711E-05, 3.48529954E-05, 3.47733149E-05, 3.46967951E-05, & 3.46231318E-05, 3.45516165E-05, 3.44815196E-05, 3.44120534E-05, & 3.43425588E-05, 3.42721699E-05, 3.41995173E-05, 3.41228620E-05, & 3.40398833E-05, 3.40128511E-05, 3.39885618E-05, 3.39669050E-05, & 3.39477880E-05, 3.39311343E-05, 3.39168824E-05, 3.39049855E-05, & 3.38954108E-05, 3.38881402E-05, 3.38831708E-05, 3.38527919E-05, & 3.38800798E-05, 3.38504551E-05, 3.38785464E-05, 3.38497665E-05, & 3.38787466E-05, 3.38508994E-05, 3.38808541E-05, 3.38540314E-05, & 3.38850538E-05, 3.38593580E-05, 3.38915544E-05, 3.38671055E-05, & 3.39006038E-05, 3.38775487E-05, 3.39125087E-05, 3.38910333E-05/ DATA ((DGS (I,J), I= 601, 700), J=2,2) / & 3.39276622E-05, 3.38866942E-05, 3.39362446E-05, 3.39174119E-05, & 3.39019871E-05, 3.38897159E-05, 3.38804078E-05, 3.38739275E-05, & 3.38701889E-05, 3.38691518E-05, 3.38708203E-05, 3.38752433E-05, & 3.38825176E-05, 3.38927925E-05, 3.38935861E-05, 3.38689384E-05, & 3.38724989E-05, 3.38479722E-05, 3.38539894E-05, 3.38291878E-05, & 3.38374180E-05, 3.38093301E-05, 3.38223014E-05, 3.37963285E-05, & 3.38081102E-05, 3.37811201E-05, 3.37941414E-05, 3.37658214E-05, & 3.37796674E-05, 3.37495461E-05, 3.37639807E-05, 3.37314501E-05, & 3.37454471E-05, 3.37096080E-05, 3.37088597E-05, 3.37883690E-05, & 3.38861009E-05, 3.38990118E-05, 3.39234756E-05, 3.39350671E-05, & 3.39520576E-05, 3.39659152E-05, 3.39816157E-05, 3.39990537E-05, & 3.40082815E-05, 3.40048394E-05, 3.40023806E-05, 3.40009040E-05, & 3.40004090E-05, 3.40008949E-05, 3.40023612E-05, 3.40048076E-05, & 3.40082340E-05, 3.40126406E-05, 3.40180273E-05, 3.40245326E-05, & 3.40317434E-05, 3.40402162E-05, 3.40409610E-05, 3.40564918E-05, & 3.40643027E-05, 3.40693275E-05, 3.40731019E-05, 3.40757553E-05, & 3.40779619E-05, 3.40797002E-05, 3.40814578E-05, 3.40827252E-05, & 3.40840024E-05, 3.40850312E-05, 3.40860664E-05, 3.40868470E-05, & 3.40878933E-05, 3.40884188E-05, 3.40892100E-05, 3.40900048E-05, & 3.40905366E-05, 3.40913374E-05, 3.40918731E-05, 3.40917592E-05, & 3.40913414E-05, 3.40910780E-05, 3.40908161E-05, 3.40907089E-05, & 3.40902972E-05, 3.40900401E-05, 3.40897846E-05, 3.40895307E-05, & 3.40891528E-05, 3.40889029E-05, 3.40885310E-05, 3.40881627E-05, & 3.40871981E-05, 3.40862589E-05, 3.40859133E-05, 3.40855713E-05, & 3.40853452E-05, 3.40850092E-05, 3.40847871E-05, 3.40845667E-05/ DATA ((DGS (I,J), I= 701, 800), J=2,2) / & 3.40845032E-05, 3.40841305E-05, 3.40839148E-05, 3.40838564E-05, & 3.40834882E-05, 3.40832773E-05, 3.40830680E-05, 3.40828602E-05, & 3.40825516E-05, 3.40825041E-05, 3.40820452E-05, 3.40817461E-05, & 3.40815487E-05, 3.40811586E-05, 3.40808703E-05, 3.40804914E-05, & 3.40802761E-05, 3.40796621E-05, 3.40792153E-05, 3.40786064E-05, & 3.40780170E-05, 3.40772878E-05, 3.40764401E-05, 3.40752930E-05, & 3.40738814E-05, 3.40719855E-05, 3.40703376E-05, 3.40694469E-05, & 3.40695451E-05, 3.40706319E-05, 3.40727069E-05, 3.40757697E-05, & 3.40798205E-05, 3.40848593E-05, 3.40908865E-05, 3.40979025E-05, & 3.41059079E-05, 3.41149037E-05, 3.41248906E-05, 3.41358700E-05, & 3.41478431E-05, 3.41591795E-05, 3.41616474E-05, 3.41652440E-05, & 3.42249662E-05, 3.42814380E-05, 3.43356038E-05, 3.43881757E-05, & 3.44344163E-05, 3.44800167E-05, 3.45253199E-05, 3.45706043E-05, & 3.45452020E-05, 3.45152741E-05, 3.45243334E-05, 3.45975957E-05, & 3.46657935E-05, 3.47306853E-05, 3.47935652E-05, 3.48551920E-05, & 3.49162048E-05, 3.49770041E-05, 3.50380496E-05, 3.50995154E-05, & 3.51616585E-05, 3.52287883E-05, 3.52962223E-05, 3.53642806E-05, & 3.54332065E-05, 3.55031929E-05, 3.55743983E-05, 3.56469578E-05, & 3.57209898E-05, 3.57966006E-05, 3.58738879E-05, 3.59529435E-05, & 3.60338550E-05, 3.61167068E-05, 3.62015829E-05, 3.62885647E-05, & 3.63777349E-05, 3.64691763E-05, 3.65629732E-05, 3.66592115E-05, & 3.67579791E-05, 3.68593667E-05, 3.69634678E-05, 3.70703796E-05, & 3.71802028E-05, 3.72930425E-05, 3.74090084E-05, 3.75282154E-05, & 3.76507838E-05, 3.77768400E-05, 3.79065169E-05, 3.80399547E-05, & 3.81773011E-05, 3.83187120E-05, 3.84643527E-05, 3.86143979E-05/ DATA ((DGS (I,J), I= 801, 900), J=2,2) / & 3.87690330E-05, 3.89284549E-05, 3.90928729E-05, 3.92625096E-05, & 3.94376023E-05, 3.96184042E-05, 3.98051859E-05, 3.99982365E-05, & 4.01978659E-05, 4.04044061E-05, 4.06182140E-05, 4.08396728E-05, & 4.10691680E-05, 4.13073244E-05, 4.15542491E-05, 4.18107805E-05, & 4.20773851E-05, 4.23546793E-05, 4.26433223E-05, 4.29440373E-05, & 4.32575960E-05, 4.35848959E-05, 4.39268691E-05, 4.42845556E-05, & 4.46591004E-05, 4.50517680E-05, 4.54639577E-05, 4.58972249E-05, & 4.63532956E-05, 4.68341071E-05, 4.73418252E-05, 4.78788884E-05, & 4.84480505E-05, 4.90524343E-05, 4.96955957E-05, 5.03815982E-05, & 5.11164213E-05, 5.19161095E-05, 5.27639335E-05, 5.36786361E-05, & 5.46692443E-05, 5.57466766E-05, 5.69246126E-05, 5.82184761E-05, & 5.96505614E-05, 6.12467811E-05, 6.28503503E-05, 6.28257573E-05, & 6.26000176E-05, 6.23737983E-05, 6.21462815E-05, 6.19190294E-05, & 6.16923135E-05, 6.14668829E-05, 6.12433404E-05, 6.10232052E-05, & 6.07942860E-05, 8.00588958E-05, 9.46766835E-05, 9.38273883E-05, & 9.20245165E-05, 8.90197302E-05, 7.79007586E-05, 7.00495937E-05, & 6.40235419E-05, 6.46791951E-05, 6.49174282E-05, 6.17317431E-05, & 6.19665139E-05, 5.43832643E-05, 5.36083125E-05, 5.49174950E-05, & 5.73397632E-05, 5.43610391E-05, 5.24808731E-05, 5.03403131E-05, & 4.90467666E-05, 4.81735507E-05, 4.75006028E-05, 4.68668191E-05, & 4.60129973E-05, 4.58389272E-05, 4.58373841E-05, 4.54755526E-05, & 4.57092152E-05, 4.57653863E-05, 4.58339824E-05, 4.62892580E-05, & 4.61228601E-05, 4.60179766E-05, 4.60570244E-05, 4.59894108E-05, & 4.60926087E-05, 4.60866552E-05, 4.62225634E-05, 4.62513897E-05, & 4.64207984E-05, 4.64824472E-05, 4.66753122E-05, 4.67615898E-05/ DATA ((DGS (I,J), I= 901,1000), J=2,2) / & 4.68750595E-05, 4.70089833E-05, 4.70966438E-05, 4.72277503E-05, & 4.73479749E-05, 4.74828898E-05, 4.76012098E-05, 4.77318063E-05, & 4.78732757E-05, 4.80149007E-05, 4.81796540E-05, 4.83343265E-05, & 4.85226507E-05, 4.86928498E-05, 4.88966148E-05, 4.90952619E-05, & 4.93158039E-05, 4.95473964E-05, 4.97903862E-05, 5.00574082E-05, & 5.02548464E-05, 5.03211782E-05, 5.03755950E-05, 5.04622651E-05, & 5.04872146E-05, 5.05063890E-05, 5.05220950E-05, 5.05352405E-05, & 5.05462661E-05, 5.05541604E-05, 5.05625995E-05, 5.05684503E-05, & 5.05702106E-05, 5.05783763E-05, 5.05848278E-05, 5.05893677E-05, & 5.05939390E-05, 5.05975162E-05, 5.06016278E-05, 5.06052459E-05, & 5.06088830E-05, 5.06125392E-05, 5.06156882E-05, 5.06193798E-05, & 5.06225592E-05, 5.06257527E-05, 5.06289601E-05, 5.06307785E-05, & 5.06359578E-05, 5.06353541E-05, 5.06430214E-05, 5.06474010E-05, & 5.06518056E-05, 5.06574451E-05, 5.06595700E-05, 5.06621402E-05, & 5.06690898E-05, 5.06715459E-05, 5.06740122E-05, 5.06764104E-05, & 5.06864997E-05, 5.06905504E-05, 5.06946277E-05, 5.06977031E-05, & 5.07013100E-05, 5.07044178E-05, 5.07080625E-05, 5.07112027E-05, & 5.07143579E-05, 5.07128207E-05, 5.07212456E-05, 5.07197143E-05, & 5.07282036E-05, 5.07319794E-05, 5.07328333E-05, 5.07353458E-05, & 5.07439790E-05, 5.07489462E-05, 5.07539471E-05, 5.07595433E-05, & 5.07657474E-05, 5.07725732E-05, 5.07745224E-05, 5.07787209E-05, & 5.07885554E-05, 5.07996898E-05, 5.08195220E-05, 5.08303246E-05, & 5.08493061E-05, 5.08793373E-05, 5.08960167E-05, 5.09104764E-05, & 5.09400703E-05, 5.09770118E-05, 5.10041017E-05, 5.10867934E-05, & 5.11147224E-05, 5.11963146E-05, 5.14922891E-05, 5.18120153E-05/ DATA ((DGS (I,J), I=1001,1100), J=2,2) / & 5.20981909E-05, 5.24625485E-05, 5.28509501E-05, 5.32752143E-05, & 5.36238429E-05, 5.39812629E-05, 5.44242855E-05, 5.49415416E-05, & 5.53180920E-05, 5.57865264E-05, 5.63585595E-05, 5.68894557E-05, & 5.73404836E-05, 5.78523909E-05, 5.84853247E-05, 5.92454681E-05, & 5.95842497E-05, 6.06052614E-05, 6.16083835E-05, 6.37204426E-05, & 6.26167927E-05, 6.15111384E-05, 6.32994832E-05, 6.07203190E-05, & 6.43391874E-05, 6.36336842E-05, 6.91301448E-05, 6.68638727E-05, & 6.81114135E-05, 6.72726573E-05, 6.71818131E-05, 6.74256407E-05, & 6.68200082E-05, 6.71240144E-05, 6.68145728E-05, 6.67315568E-05, & 6.70005117E-05, 6.66513337E-05, 6.67078237E-05, 6.65982752E-05, & 6.59694058E-05, 6.58779742E-05, 6.57401096E-05, 6.51885915E-05, & 6.48759244E-05, 6.46192456E-05, 6.46606487E-05, 6.44565289E-05, & 6.44531576E-05, 6.43776353E-05, 6.44224143E-05, 6.43673902E-05, & 6.44342012E-05, 6.44262901E-05, 6.44537778E-05, 6.45360364E-05, & 6.46874925E-05, 6.52105023E-05, 6.58672090E-05, 6.62396256E-05, & 6.65826407E-05, 6.69368006E-05, 6.73033950E-05, 6.75743774E-05, & 6.79654238E-05, 6.82499442E-05, 6.86489171E-05, 6.90251645E-05, & 6.95654721E-05, 6.98942325E-05, 7.05736321E-05, 7.14075178E-05, & 7.19491834E-05, 7.25121287E-05, 7.26475788E-05, 7.34924373E-05, & 7.39202608E-05, 7.42560652E-05, 7.50813025E-05, 7.52858589E-05, & 7.59418707E-05, 7.69135822E-05, 7.72934607E-05, 7.83031217E-05, & 7.94546899E-05, 8.06782162E-05, 8.29797097E-05, 8.33634043E-05, & 8.84135448E-05, 8.50197829E-05, 9.17339378E-05, 1.02856216E-04, & 1.11804790E-04, 1.01565093E-04, 1.02317685E-04, 1.03103304E-04, & 1.06977092E-04, 1.13012393E-04, 1.15665675E-04, 1.07840327E-04/ DATA ((DGS (I,J), I=1101,1200), J=2,2) / & 1.05918991E-04, 1.05170920E-04, 1.07460677E-04, 1.04577753E-04, & 1.04390710E-04, 1.01367893E-04, 1.02738186E-04, 1.03267280E-04, & 1.04557675E-04, 1.05602002E-04, 1.06048106E-04, 1.06868716E-04, & 1.07639376E-04, 1.07825761E-04, 1.08012147E-04, 1.08198532E-04, & 1.08124952E-04, 1.07271779E-04, 1.12151546E-04, 1.12934528E-04, & 1.16667294E-04, 1.12862981E-04, 1.17874555E-04, 1.14139757E-04, & 1.26542466E-04, 1.26310934E-04, 1.26032574E-04, 1.25942623E-04, & 1.17243475E-04, 1.27326038E-04, 1.26738165E-04, 1.34108211E-04, & 1.30902120E-04, 1.32790665E-04, 1.27961076E-04, 1.29372337E-04, & 1.27491827E-04, 1.34540610E-04, 1.35090564E-04, 1.38139377E-04, & 1.34527799E-04, 1.38572823E-04, 1.33925427E-04, 1.38337045E-04, & 1.42989018E-04, 1.44169657E-04, 1.36286770E-04, 1.32851620E-04, & 1.43742539E-04, 1.46275764E-04, 1.44625026E-04, 1.39358452E-04, & 1.39145245E-04, 1.43755897E-04, 1.39985297E-04, 1.42499086E-04, & 1.40671691E-04, 1.44506247E-04, 1.36437620E-04, 1.45775606E-04, & 1.48785745E-04, 1.54060300E-04, 1.50123006E-04, 1.53486456E-04, & 1.57034366E-04, 1.44922747E-04, 1.45902016E-04, 1.46116874E-04, & 1.48469654E-04, 1.45943390E-04, 1.45874358E-04, 1.50978602E-04, & 1.42545990E-04, 1.49065347E-04, 1.51340033E-04, 1.56085010E-04, & 1.53727075E-04, 1.57135534E-04, 1.57003759E-04, 1.67178182E-04, & 1.70183780E-04, 1.65026507E-04, 1.58125604E-04, 1.56825434E-04, & 1.84551508E-04, 1.89842346E-04, 1.85664262E-04, 1.67161290E-04, & 1.63497601E-04, 1.68649362E-04, 1.74815490E-04, 1.78248219E-04, & 1.75157367E-04, 1.57731538E-04, 1.62927375E-04, 1.65751582E-04, & 1.69882019E-04, 1.75153005E-04, 1.75492826E-04, 1.62821979E-04/ DATA ((DGS (I,J), I=1201,1300), J=2,2) / & 1.66257314E-04, 1.62437938E-04, 1.64949183E-04, 1.62079418E-04, & 1.64557688E-04, 1.64168735E-04, 1.71533448E-04, 1.74162810E-04, & 1.88585270E-04, 1.83078188E-04, 1.85734638E-04, 1.94480462E-04, & 1.82949344E-04, 1.92850349E-04, 2.06841953E-04, 2.52025758E-04, & 2.28805879E-04, 2.44042647E-04, 2.55753218E-04, 2.29718441E-04, & 2.37767074E-04, 2.44665770E-04, 2.90867346E-04, 2.96922787E-04, & 3.75866485E-04, 3.83325974E-04, 5.21152844E-04, 6.69189492E-04, & 9.06552112E-04, 1.15874990E-03, 7.63685262E-04, 4.15098821E-04, & 2.98903341E-04, 2.15819143E-04, 1.47605025E-04, 1.29349991E-04, & 1.15825558E-04, 9.69955446E-05, 8.44308010E-05, 7.95824309E-05, & 7.54165015E-05, 7.17972652E-05, 6.86231856E-05, 6.58167037E-05, & 6.33174960E-05, 6.10779019E-05, 5.90597432E-05, 5.72320627E-05, & 5.55694848E-05, 5.40510057E-05, 5.26590880E-05, 5.13789722E-05, & 5.01981474E-05, 4.91059393E-05, 4.80931868E-05, 4.71519843E-05, & 4.62754765E-05, 4.54576915E-05, 4.46934065E-05, 4.39780366E-05, & 4.33075439E-05, 4.26783619E-05, 4.20873329E-05, 4.15316550E-05, & 4.10088383E-05, 4.05166677E-05, 4.00531711E-05, 3.96165933E-05, & 3.92053733E-05, 3.88181254E-05, 3.84536228E-05, 3.81107846E-05, & 3.77886646E-05, 3.75453299E-05, 3.72034131E-05, 3.66926854E-05, & 3.62530451E-05, 3.58827459E-05, 3.55817767E-05, 3.53520193E-05, & 3.51975487E-05, 3.51251232E-05, 3.51449501E-05, 3.52718690E-05, & 3.55271958E-05, 3.59416652E-05, 3.65602782E-05, 3.74506440E-05, & 3.87181480E-05, 3.88714591E-05, 4.05355640E-05, 4.32065710E-05, & 4.73210493E-05, 5.24966011E-05, 5.42179585E-05, 5.97091673E-05, & 6.59844085E-05, 6.79568721E-05, 7.01498819E-05, 7.13427184E-05/ DATA ((DGS (I,J), I=1301,1400), J=2,2) / & 7.26087884E-05, 7.36798469E-05, 7.48079018E-05, 7.53950376E-05, & 7.59986142E-05, 7.66194885E-05, 7.72585911E-05, 7.79169352E-05, & 7.85956286E-05, 7.89429813E-05, 7.92958859E-05, 7.96545135E-05, & 8.00190440E-05, 8.03896668E-05, 8.07665813E-05, 8.11499980E-05, & 8.15401391E-05, 8.19372399E-05, 8.20859806E-05, 8.21748941E-05, & 8.22641639E-05, 8.23537928E-05, 8.24437838E-05, 8.25341397E-05, & 8.26248635E-05, 8.27159582E-05, 8.28074269E-05, 8.28992725E-05, & 8.29914984E-05, 8.30841075E-05, 8.31771032E-05, 8.32704887E-05, & 8.33642673E-05, 8.34584424E-05, 8.35530173E-05, 8.36479955E-05, & 8.37433805E-05, 8.38391759E-05, 8.39353852E-05, 8.40320121E-05, & 8.41290604E-05, 8.42265337E-05, 8.43244359E-05, 8.44227708E-05, & 8.45215425E-05, 8.46207549E-05, 8.47204121E-05, 8.48205181E-05, & 8.49210772E-05, 8.50220937E-05, 8.51235717E-05, 8.52255158E-05, & 8.53279304E-05, 8.54308200E-05, 8.55341892E-05, 8.56380427E-05, & 8.57423853E-05, 8.58472217E-05, 8.59525569E-05, 8.60583959E-05, & 8.61647437E-05, 8.62716056E-05, 8.63789867E-05, 8.64868925E-05, & 8.65953284E-05, 8.67042998E-05, 8.68138124E-05, 8.68487718E-05, & 8.69460957E-05, 8.69698796E-05, 8.69736040E-05, 8.69754689E-05, & 8.69791942E-05, 8.69829152E-05, 8.69866417E-05, 8.69903689E-05, & 8.69940968E-05, 8.69978253E-05, 8.70015544E-05, 8.70052791E-05, & 8.70090094E-05, 8.70127404E-05, 8.70164721E-05, 8.70202043E-05, & 8.70239372E-05, 8.70276707E-05, 8.70295352E-05, 8.70313999E-05, & 8.70332697E-05, 8.70351347E-05, 8.70370048E-05, 8.70388701E-05, & 8.70407355E-05, 8.70426062E-05, 8.70444719E-05, 8.70463429E-05, & 8.70482089E-05, 8.70482089E-05, 8.70484813E-05, 8.70487536E-05/ DATA ((DGS (I,J), I=1401,1500), J=2,2) / & 8.70490260E-05, 8.70492984E-05, 8.70495707E-05, 8.70501155E-05, & 8.70506603E-05, 8.70509326E-05, 8.70514774E-05, 8.70520222E-05, & 8.70525721E-05, 8.70531169E-05, 8.70536618E-05, 8.70542066E-05, & 8.70547515E-05, 8.70559573E-05, 8.70578242E-05, 8.70596963E-05, & 8.70615635E-05, 8.70634359E-05, 8.70653034E-05, 8.70671711E-05, & 8.70690439E-05, 8.70709119E-05, 8.70727851E-05, 8.70746534E-05, & 8.70783956E-05, 8.70821384E-05, 8.70858818E-05, 8.70933655E-05, & 8.71008568E-05, 8.71083506E-05, 8.71120985E-05, 8.71158419E-05, & 8.71195911E-05, 8.71233409E-05, 8.71270913E-05, 8.71308424E-05, & 8.71364677E-05, 8.71456555E-05, 8.72573914E-05, 8.73696982E-05, & 8.74825821E-05, 8.75960496E-05, 8.77101072E-05, 8.78247615E-05, & 8.79400191E-05, 8.80558871E-05, 8.81723725E-05, 8.82894822E-05, & 8.84072238E-05, 8.85256044E-05, 8.86446319E-05, 8.87643138E-05, & 8.88846580E-05, 8.90056726E-05, 8.91273658E-05, 8.92497460E-05, & 8.93728217E-05, 8.94966015E-05, 8.96210945E-05, 8.97463098E-05, & 8.98722565E-05, 8.99989443E-05, 9.01263827E-05, 9.02545817E-05, & 9.03835515E-05, 9.05133023E-05, 9.06438449E-05, 9.07751899E-05, & 9.09073485E-05, 9.10403319E-05, 9.11741519E-05, 9.13088202E-05, & 9.14443490E-05, 9.15807507E-05, 9.17180380E-05, 9.18562241E-05, & 9.19953221E-05, 9.21353459E-05, 9.22763095E-05, 9.24182272E-05, & 9.25611137E-05, 9.27049843E-05, 9.28498544E-05, 9.29957399E-05, & 9.31426572E-05, 9.32906229E-05, 9.34396545E-05, 9.48465417E-05, & 9.60701411E-05, 9.76826582E-05, 1.00387204E-04, 1.04752498E-04, & 1.14115602E-04, 1.17336853E-04, 1.25521767E-04, 1.30904272E-04, & 1.42273822E-04, 1.53388894E-04, 1.57395285E-04, 1.70179161E-04/ DATA ((DGS (I,J), I=1501,1600), J=2,2) / & 2.00277502E-04, 1.99452180E-04, 2.68946268E-04, 3.14283580E-04, & 3.19308885E-04, 2.92587962E-04, 2.42601392E-04, 2.12976773E-04, & 2.07167265E-04, 1.98455248E-04, 1.93691304E-04, 1.91554494E-04, & 1.90301712E-04, 1.90119121E-04, 1.89901624E-04, 1.89831398E-04, & 1.89929291E-04, 1.90179334E-04, 1.90545128E-04, 1.91002893E-04, & 1.91450920E-04, 1.92104493E-04, 1.92730131E-04, 1.93544249E-04, & 1.94316612E-04, 1.95263903E-04, 1.96159024E-04, 1.97218283E-04, & 1.96322119E-04, 1.95645311E-04, 1.94879285E-04, 1.94410386E-04, & 1.94002021E-04, 1.93965629E-04, 1.93931277E-04, 1.93898963E-04, & 1.93868685E-04, 1.93840442E-04, 1.93814233E-04, 1.93790055E-04, & 1.93432126E-04, 1.93428487E-04, 1.93424872E-04, 1.93423076E-04, & 1.93421296E-04, 1.93419516E-04, 1.93417744E-04, 1.93415980E-04, & 1.93414231E-04, 1.93412483E-04, 1.93410742E-04, 1.93409010E-04, & 1.93407292E-04, 1.93405576E-04, 1.93403867E-04, 1.93402173E-04, & 1.93400479E-04, 1.93398794E-04, 1.93397117E-04, 1.93395454E-04, & 1.93393792E-04, 1.93392138E-04, 1.93389748E-04, 1.93387360E-04, & 1.93384970E-04, 1.93382589E-04, 1.93380216E-04, 1.93377862E-04, & 1.93375506E-04, 1.93373158E-04, 1.93370829E-04, 1.93368498E-04, & 1.93366176E-04, 1.93363862E-04, 1.93361565E-04, 1.93359268E-04, & 1.93356979E-04, 1.93356679E-04, 1.93356378E-04, 1.93356077E-04, & 1.93355777E-04, 1.93355477E-04, 1.93355177E-04, 1.93354877E-04, & 1.93354577E-04, 1.93354278E-04, 1.93353987E-04, 1.93353688E-04, & 1.93353389E-04, 1.93353090E-04, 1.93352791E-04, 1.93352492E-04, & 1.93352194E-04, 1.93351895E-04, 1.93351597E-04, 1.93351299E-04, & 1.93351001E-04, 1.93350703E-04, 1.93350405E-04, 1.93350107E-04/ DATA ((DGS (I,J), I=1601,1700), J=2,2) / & 1.93349810E-04, 1.93349513E-04, 1.93347260E-04, 1.93345025E-04, & 1.93342789E-04, 1.93340561E-04, 1.93338342E-04, 1.93336140E-04, & 1.93333937E-04, 1.93331743E-04, 1.93329557E-04, 1.93327389E-04, & 1.93325220E-04, 1.93323059E-04, 1.93320915E-04, 1.93318771E-04, & 1.93316636E-04, 1.93314509E-04, 1.93312399E-04, 1.93310288E-04, & 1.93308186E-04, 1.93306092E-04, 1.93304016E-04, 1.93301939E-04, & 1.93299870E-04, 1.93297810E-04, 1.93295766E-04, 1.93293723E-04, & 1.93291688E-04, 1.93289669E-04, 1.93287651E-04, 1.93285641E-04, & 1.93283639E-04, 1.93281654E-04, 1.93279669E-04, 1.93277693E-04, & 1.93275724E-04, 1.93273772E-04, 1.93271821E-04, 1.93267943E-04, & 1.93019198E-04, 1.92931099E-04, 1.92843289E-04, 1.92750684E-04, & 1.92894798E-04, 1.93356834E-04, 1.94145467E-04, 1.95287254E-04, & 1.94826399E-04, 1.94533187E-04, 1.94790203E-04, 1.95835301E-04, & 1.97088259E-04, 1.96911944E-04, 1.97252998E-04, 1.98055941E-04, & 1.99434277E-04, 2.01535716E-04, 2.07879841E-04, 2.16477360E-04, & 2.31376469E-04, 2.48425585E-04, 2.70982773E-04, 3.04500361E-04, & 3.00790803E-04, 2.96881313E-04, 3.42172636E-04, 2.66280332E-04, & 2.76355855E-04, 2.40479679E-04, 2.18400658E-04, 2.16269668E-04, & 2.00233805E-04, 2.07977165E-04, 1.91285296E-04, 1.88880986E-04, & 1.73646782E-04, 1.68234260E-04, 1.61334442E-04, 1.61677975E-04, & 1.62299016E-04, 1.63174455E-04, 1.64111613E-04, 1.65203091E-04, & 1.66443229E-04, 1.67813678E-04, 1.68936397E-04, 1.66889206E-04, & 1.65524840E-04, 1.64517570E-04, 1.64068290E-04, 1.64068839E-04, & 1.64082111E-04, 1.64100199E-04, 1.64050181E-04, 1.64010716E-04, & 1.63981813E-04, 1.63963495E-04, 1.63955788E-04, 1.63958720E-04/ DATA ((DGS (I,J), I=1701,1800), J=2,2) / & 1.63972328E-04, 1.63996649E-04, 1.64031733E-04, 1.64077627E-04, & 1.63905425E-04, 1.63726953E-04, 1.63681210E-04, 1.63565351E-04, & 1.63420596E-04, 1.63292627E-04, 1.63177329E-04, 1.63036992E-04, & 1.62912135E-04, 1.62756610E-04, 1.62745672E-04, 1.62720056E-04, & 1.62714956E-04, 1.62709892E-04, 1.62704833E-04, 1.62699793E-04, & 1.62694789E-04, 1.62689789E-04, 1.62684809E-04, 1.62679865E-04, & 1.62674925E-04, 1.62670004E-04, 1.62665120E-04, 1.62660239E-04, & 1.62657814E-04, 1.62655379E-04, 1.62652964E-04, 1.62650554E-04, & 1.62648133E-04, 1.62645733E-04, 1.62643338E-04, 1.62640933E-04, & 1.62638547E-04, 1.62636167E-04, 1.62633777E-04, 1.62631406E-04, & 1.62629041E-04, 1.62628727E-04, 1.62628428E-04, 1.62628129E-04, & 1.62627815E-04, 1.62627516E-04, 1.62627218E-04, 1.62626904E-04, & 1.62626606E-04, 1.62626307E-04, 1.62625994E-04, 1.62625696E-04, & 1.62625397E-04, 1.62625084E-04, 1.62624786E-04, 1.62624488E-04, & 1.62624176E-04, 1.62623878E-04, 1.62623580E-04, 1.62623268E-04, & 1.62622970E-04, 1.62622673E-04, 1.62622361E-04, 1.62622063E-04, & 1.62621766E-04, 1.62621469E-04, 1.62619110E-04, 1.62616770E-04, & 1.62614421E-04, 1.62612091E-04, 1.62609766E-04, 1.62607432E-04, & 1.62605117E-04, 1.62602807E-04, 1.62600488E-04, 1.62598188E-04, & 1.62595893E-04, 1.62593589E-04, 1.62591304E-04, 1.62589024E-04, & 1.62584464E-04, 1.62579924E-04, 1.62575419E-04, 1.62570919E-04, & 1.62566439E-04, 1.62561993E-04, 1.62557553E-04, 1.62553133E-04, & 1.62548747E-04, 1.62544366E-04, 1.62540006E-04, 1.62282611E-04, & 1.62201590E-04, 1.62095319E-04, 1.62004399E-04, 1.61882682E-04, & 1.61772915E-04, 1.61679767E-04, 1.61603232E-04, 1.61543291E-04/ DATA ((DGS (I,J), I=1801,1900), J=2,2) / & 1.61481296E-04, 1.61246500E-04, 1.61022805E-04, 1.60763876E-04, & 1.60512464E-04, 1.60273093E-04, 1.58636615E-04, 1.57380499E-04, & 1.56554418E-04, 1.56223497E-04, 1.55481567E-04, 1.53889306E-04, & 1.52550222E-04, 1.50772262E-04, 1.50293839E-04, 1.49466948E-04, & 1.48113377E-04, 1.46745414E-04, 1.45058761E-04, 1.46440824E-04, & 1.49002892E-04, 1.50550666E-04, 1.51901571E-04, 1.53220379E-04, & 1.54676341E-04, 1.56382616E-04, 1.58598531E-04, 1.61479173E-04, & 1.65041281E-04, 1.69399980E-04, 1.74756747E-04, 1.81428107E-04, & 1.89913229E-04, 2.01032785E-04, 2.16233106E-04, 2.38341481E-04, & 2.57029112E-04, 2.50696079E-04, 2.50684135E-04, 2.50461298E-04, & 2.50408744E-04, 2.33584968E-04, 2.28481839E-04, 2.20037644E-04, & 2.18779215E-04, 2.14209886E-04, 2.12184429E-04, 2.11706918E-04, & 2.09368883E-04, 2.08553668E-04, 2.08303433E-04, 2.07063186E-04, & 2.06542782E-04, 2.06251557E-04, 2.04932584E-04, 2.04461457E-04, & 2.04061503E-04, 2.03103881E-04, 2.02655463E-04, 2.02586217E-04, & 2.02198950E-04, 2.01964983E-04, 2.01988000E-04, 2.01715869E-04, & 2.01663308E-04, 2.01639773E-04, 2.01556050E-04, 2.01650976E-04, & 2.01585520E-04, 2.01699542E-04, 2.01771586E-04, 2.01936520E-04, & 2.02207171E-04, 2.03151458E-04, 2.04497418E-04, 2.05218087E-04, & 2.05860798E-04, 2.06489529E-04, 2.07029513E-04, 2.07734626E-04, & 2.08224600E-04, 2.08906642E-04, 2.09524482E-04, 2.10174772E-04, & 2.11048416E-04, 2.11620582E-04, 2.12465444E-04, 2.13517209E-04, & 2.14222270E-04, 2.15363216E-04, 2.17058629E-04, 2.18182190E-04, & 2.19466066E-04, 2.21688284E-04, 2.22887826E-04, 2.24444821E-04, & 2.26892648E-04, 2.29203041E-04, 2.31795816E-04, 2.34696643E-04/ DATA ((DGS (I,J), I=1901,2000), J=2,2) / & 2.37017890E-04, 2.41352306E-04, 2.48951110E-04, 2.53469992E-04, & 2.67189664E-04, 2.78632778E-04, 3.08059800E-04, 3.25934809E-04, & 3.70525790E-04, 3.72915873E-04, 3.13220774E-04, 2.94540803E-04, & 2.90016788E-04, 2.82833937E-04, 2.64444702E-04, 2.50722860E-04, & 2.43610526E-04, 2.38412514E-04, 2.34481609E-04, 2.29704814E-04, & 2.24192068E-04, 2.20782145E-04, 2.17291652E-04, 2.15874144E-04, & 2.15051922E-04, 2.12554377E-04, 2.11355727E-04, 2.09827253E-04, & 2.09291267E-04, 2.09591267E-04, 2.10441784E-04, 2.10168289E-04, & 2.10529260E-04, 2.11531409E-04, 2.13085544E-04, 2.15323329E-04, & 2.18472290E-04, 2.23102491E-04, 2.25830624E-04, 2.29902524E-04, & 2.38921807E-04, 2.26172262E-04, 2.17110487E-04, 2.20111925E-04, & 2.00291195E-04, 2.21219248E-04, 2.28189053E-04, 2.27961677E-04, & 2.35616400E-04, 2.40229441E-04, 2.35078266E-04, 2.31852674E-04, & 2.30572848E-04, 2.28003761E-04, 2.26078122E-04, 2.24943759E-04, & 2.24318887E-04, 2.24121790E-04, 2.24227630E-04, 2.24695571E-04, & 2.25477339E-04, 2.26687350E-04, 2.28359053E-04, 2.30619833E-04, & 2.32526631E-04, 2.34533977E-04, 2.37392009E-04, 2.41230167E-04, & 2.46320088E-04, 2.52072333E-04, 2.57462296E-04, 2.63619651E-04, & 2.72330039E-04, 2.84434146E-04, 2.99982246E-04, 3.20311480E-04, & 3.47918115E-04, 3.48114938E-04, 3.26153364E-04, 2.98393427E-04, & 2.98960921E-04, 3.09602419E-04, 3.19852826E-04, 3.29755349E-04, & 3.39080889E-04, 3.47814635E-04, 3.56204657E-04, 3.64301403E-04, & 3.72169045E-04, 3.60012565E-04, 3.47993956E-04, 3.37961464E-04, & 3.29596561E-04, 3.22346721E-04, 3.15910624E-04, 3.10455904E-04, & 3.05900499E-04, 3.02065716E-04, 2.98874266E-04, 2.95954374E-04/ DATA ((DGS (I,J), I=2001,2100), J=2,2) / & 2.93348806E-04, 2.91304051E-04, 2.90008009E-04, 2.88720513E-04, & 2.87622784E-04, 2.88104066E-04, 2.86713477E-04, 2.88465924E-04, & 2.82185963E-04, 2.76724623E-04, 2.73654142E-04, 2.74688680E-04, & 2.67850918E-04, 2.60168396E-04, 2.58280065E-04, 2.56128438E-04, & 2.63232085E-04, 2.67170633E-04, 2.76193388E-04, 2.84161763E-04, & 2.84349878E-04, 2.88420806E-04, 2.94736077E-04, 3.01752443E-04, & 3.00856911E-04, 3.02973082E-04, 3.03191183E-04, 3.04890797E-04, & 3.06705260E-04, 3.08443240E-04, 3.10831371E-04, 3.13675008E-04, & 3.16694187E-04, 3.19790960E-04, 3.23473307E-04, 3.27639169E-04, & 3.32476873E-04, 3.38030394E-04, 3.44042983E-04, 3.50725705E-04, & 3.58561670E-04, 3.67733704E-04, 3.77467278E-04, 3.78959037E-04, & 3.82436045E-04, 3.88479925E-04, 3.98009918E-04, 4.11958036E-04, & 4.25482493E-04, 4.19188767E-04, 4.12958534E-04, 3.86043077E-04, & 4.50539109E-04, 4.93353228E-04, 5.11426883E-04, 5.24567918E-04, & 5.34931460E-04, 5.44772318E-04, 5.54145178E-04, 5.62568027E-04, & 5.70451127E-04, 5.76793710E-04, 5.83706665E-04, 5.89907963E-04, & 3.55933343E-04, 1.21958724E-04, 1.13018728E-04, 1.05340406E-04, & 9.91835852E-05, 9.36964907E-05, 8.91629971E-05, 8.50221020E-05, & 8.15292964E-05, 7.82823856E-05, 7.53819921E-05, 7.28822601E-05, & 7.05143528E-05, 6.84523125E-05, 6.64808788E-05, 6.47497189E-05, & 6.30820990E-05, 6.16076152E-05, 6.01782980E-05, 5.89071875E-05, & 5.76684337E-05, 5.65613396E-05, 5.55231325E-05, 5.45046585E-05, & 5.35888064E-05, 5.26869960E-05, 5.18731965E-05, 5.10692226E-05, & 5.03414450E-05, 4.96203352E-05, 4.89657453E-05, 4.83154374E-05, & 4.77236340E-05, 4.71342979E-05, 4.65729059E-05, 4.60603014E-05/ DATA ((DGS (I,J), I=2101,2180), J=2,2) / & 4.55481979E-05, 4.50796725E-05, 4.46107186E-05, 4.41808916E-05, & 4.37499228E-05, 4.33542509E-05, 4.29568908E-05, 4.25915110E-05, & 4.22240264E-05, 4.18856331E-05, 4.15593724E-05, 4.12305685E-05, & 4.09272022E-05, 4.06210905E-05, 4.03383205E-05, 4.00526592E-05, & 3.97884826E-05, 3.95213133E-05, 3.92739762E-05, 3.90235805E-05, & 3.87915407E-05, 3.85564045E-05, 3.83285405E-05, 3.81170852E-05, & 3.79025169E-05, 3.77032283E-05, 3.75008363E-05, 3.73127034E-05, & 3.71214890E-05, 3.69436087E-05, 3.67626786E-05, 3.65942416E-05, & 3.64227940E-05, 3.62630732E-05, 3.61003868E-05, 3.59487270E-05, & 3.58007892E-05, 3.56499604E-05, 3.55092233E-05, 3.53656490E-05, & 3.52316016E-05, 3.50947728E-05, 3.49669510E-05, 3.48364047E-05, & 3.47143858E-05, 3.45897001E-05, 3.44730985E-05, 3.43538880E-05, & 3.32127005E-05, 3.22961636E-05, 3.21659813E-05, 2.85806437E-05, & 2.77151011E-05, 2.63083884E-05, 2.58171571E-05, 2.57967847E-05, & 2.53314999E-05, 2.53302714E-05, 2.50734388E-05, 2.50648440E-05, & 2.50597407E-05, 2.49553457E-05, 2.48923288E-05, 2.48815370E-05, & 2.48642169E-05, 2.48392499E-05, 2.48221228E-05, 2.48115662E-05, & 2.47165746E-05, 2.47121024E-05, 2.46866125E-05, 2.46820235E-05, & 2.46617775E-05, 2.46539505E-05, 2.46477963E-05, 2.46421116E-05, & 2.46258949E-05, 2.46031251E-05, 2.45937281E-05, 2.45355183E-05/ DATA ((DGS (I,J), I= 1, 100), J=3,3) / & 1.07699502E-05, 1.14397991E-05, 1.21827876E-05, 1.30264644E-05, & 1.40331867E-05, 1.46198219E-05, 1.61087306E-05, 1.77708331E-05, & 1.82727727E-05, 1.87339679E-05, 1.81130217E-05, 1.74475190E-05, & 1.68837618E-05, 1.68502546E-05, 1.69773075E-05, 1.75872342E-05, & 1.82790445E-05, 1.88494455E-05, 1.96565870E-05, 2.02528102E-05, & 2.07156321E-05, 2.12588616E-05, 2.16467611E-05, 2.19104248E-05, & 2.22344022E-05, 2.24874338E-05, 2.26292810E-05, 2.31584342E-05, & 2.37557775E-05, 2.43307902E-05, 2.49729391E-05, 2.56000703E-05, & 2.61999687E-05, 2.67811765E-05, 2.73487946E-05, 2.79387331E-05, & 2.85787622E-05, 2.92673633E-05, 2.98000074E-05, 3.05205469E-05, & 3.12961481E-05, 3.19193601E-05, 3.28082780E-05, 3.37413528E-05, & 3.44195571E-05, 3.52634118E-05, 3.59102299E-05, 3.67821878E-05, & 4.07560548E-05, 4.39781312E-05, 4.75882149E-05, 5.08309588E-05, & 5.18311576E-05, 5.24168376E-05, 5.40564182E-05, 5.65037826E-05, & 6.06360327E-05, 6.49624400E-05, 6.92126030E-05, 7.09241040E-05, & 7.38067205E-05, 7.92215621E-05, 8.42660733E-05, 8.91899870E-05, & 9.09027407E-05, 9.33968181E-05, 9.24630675E-05, 9.03755024E-05, & 9.01543869E-05, 8.91949426E-05, 8.69704889E-05, 8.38516680E-05, & 8.08966277E-05, 7.76723135E-05, 7.33474959E-05, 7.13235986E-05, & 7.00508999E-05, 7.10696333E-05, 7.12302313E-05, 6.85588359E-05, & 6.58534796E-05, 6.49866831E-05, 6.55415167E-05, 7.04056963E-05, & 5.26803487E-05, 6.57540477E-05, 1.04466628E-04, 1.27727932E-04, & 1.37545045E-04, 1.36061814E-04, 1.27672480E-04, 1.15968389E-04, & 1.05535918E-04, 8.53883882E-05, 7.77362017E-05, 6.99692325E-05, & 6.11198841E-05, 5.28353878E-05, 4.50529822E-05, 4.14096032E-05/ DATA ((DGS (I,J), I= 101, 200), J=3,3) / & 4.06556645E-05, 4.14665835E-05, 4.34295571E-05, 4.57268993E-05, & 4.81782448E-05, 5.04774707E-05, 5.27647834E-05, 5.50401830E-05, & 5.66298660E-05, 5.78254059E-05, 5.85998066E-05, 5.83172610E-05, & 5.80121648E-05, 5.76659469E-05, 5.52210390E-05, 4.78251570E-05, & 4.70990563E-05, 4.63872880E-05, 4.68587774E-05, 4.15848140E-05, & 4.15171901E-05, 4.22121691E-05, 4.31300562E-05, 4.43244717E-05, & 4.65632574E-05, 5.35520472E-05, 1.39474045E-04, 4.16662913E-05, & 5.43844978E-05, 6.90536474E-05, 8.04333929E-05, 8.90604799E-05, & 9.54725431E-05, 9.99880363E-05, 1.02095781E-04, 1.04211783E-04, & 1.03643378E-04, 1.05797940E-04, 1.07082735E-04, 1.08729510E-04, & 1.10434782E-04, 1.12256768E-04, 1.15407708E-04, 1.19101100E-04, & 1.20845385E-04, 1.14573307E-04, 1.07744022E-04, 9.90176313E-05, & 9.11624218E-05, 8.28056062E-05, 7.40896726E-05, 6.55769560E-05, & 6.11633674E-05, 6.05540894E-05, 5.86411288E-05, 5.73968785E-05, & 5.46007692E-05, 5.24212829E-05, 5.13748358E-05, 4.62438595E-05, & 4.62653087E-05, 7.88749389E-05, 6.94488976E-05, 5.63264894E-05, & 5.89193240E-05, 6.10897170E-05, 6.29164930E-05, 6.35090762E-05, & 6.34853296E-05, 6.11236706E-05, 5.85671920E-05, 5.73398768E-05, & 5.71944636E-05, 5.85115765E-05, 5.99201046E-05, 6.17126617E-05, & 6.52330093E-05, 6.99341283E-05, 7.49288411E-05, 7.81886364E-05, & 8.42963595E-05, 8.73489675E-05, 9.43086825E-05, 1.00815649E-04, & 1.09813757E-04, 1.19046170E-04, 1.31485945E-04, 1.42569055E-04, & 1.54573594E-04, 1.68807371E-04, 1.75420124E-04, 1.79480281E-04, & 1.89756451E-04, 1.94618450E-04, 1.99254453E-04, 2.03567329E-04, & 2.08643551E-04, 2.14207150E-04, 2.21200100E-04, 2.40064010E-04/ DATA ((DGS (I,J), I= 201, 300), J=3,3) / & 3.47717701E-04, 2.82901553E-04, 2.89928230E-04, 2.96596629E-04, & 3.04346732E-04, 3.12894373E-04, 3.22269518E-04, 3.32387890E-04, & 3.42985433E-04, 3.54213026E-04, 3.65726596E-04, 3.77357536E-04, & 3.88991415E-04, 4.00846722E-04, 4.12694563E-04, 4.24777473E-04, & 4.36173484E-04, 4.46755868E-04, 4.57198261E-04, 4.67703039E-04, & 4.78487555E-04, 4.89822537E-04, 5.02045937E-04, 5.15453258E-04, & 5.30225261E-04, 5.46600905E-04, 5.64752455E-04, 5.84551810E-04, & 6.05104289E-04, 6.22738803E-04, 6.24116327E-04, 6.27368918E-04, & 6.35943932E-04, 6.60039048E-04, 6.81146732E-04, 6.99266188E-04, & 8.37402807E-04, 8.75235720E-04, 9.18616619E-04, 9.67192665E-04, & 1.02176131E-03, 1.08326513E-03, 1.15304709E-03, 1.24157810E-03, & 1.33010912E-03, 1.44491234E-03, 1.56654824E-03, 1.68607138E-03, & 1.79630932E-03, 1.87723233E-03, 1.93068800E-03, 1.97293110E-03, & 2.03511588E-03, 2.14725341E-03, 2.17687766E-03, 2.20358386E-03, & 2.22862226E-03, 2.25574041E-03, 2.27819519E-03, 2.29297590E-03, & 2.29844225E-03, 2.28704440E-03, 2.23902358E-03, 2.14349191E-03, & 2.02395399E-03, 1.86649382E-03, 1.52159097E-03, 1.25025079E-03, & 1.11192384E-03, 8.44638121E-04, 6.05372152E-04, 3.81687347E-04, & 1.89543764E-04, 2.25349833E-04, 4.55984946E-04, 7.02165014E-04, & 9.63070468E-04, 1.24483732E-03, 1.51400067E-03, 1.74050719E-03, & 1.90715865E-03, 2.02004930E-03, 2.10482240E-03, 2.17975689E-03, & 2.24934143E-03, 2.30647281E-03, 2.34583871E-03, 2.37084667E-03, & 2.38289481E-03, 2.38094641E-03, 2.36997183E-03, 2.34890471E-03, & 2.33275353E-03, 2.32624184E-03, 2.31884333E-03, 2.31102776E-03, & 2.29456914E-03, 2.26538407E-03, 2.22565150E-03, 2.17753892E-03/ DATA ((DGS (I,J), I= 301, 400), J=3,3) / & 2.12494830E-03, 2.07611978E-03, 2.03365906E-03, 1.99624157E-03, & 1.88923400E-03, 1.79533497E-03, 1.69235469E-03, 1.59035309E-03, & 1.49205464E-03, 1.39616685E-03, 1.31720907E-03, 1.25348912E-03, & 1.19973746E-03, 1.15192223E-03, 1.10748790E-03, 1.07060530E-03, & 1.03671750E-03, 1.00516802E-03, 9.79513279E-04, 9.53804966E-04, & 8.17740550E-04, 7.88687855E-04, 7.53749602E-04, 7.09706534E-04, & 6.29602337E-04, 4.36348266E-04, 4.67594209E-04, 6.60455453E-04, & 6.87788391E-04, 7.04662433E-04, 7.10799685E-04, 7.14499990E-04, & 7.14708032E-04, 7.13781865E-04, 7.07143233E-04, 7.08936723E-04, & 7.05544856E-04, 7.01733458E-04, 6.98963819E-04, 6.93317829E-04, & 6.88901461E-04, 6.56885233E-04, 6.51634725E-04, 6.46228967E-04, & 6.40708846E-04, 6.35080170E-04, 6.29424196E-04, 6.23732847E-04, & 6.18012606E-04, 6.12316811E-04, 6.06672263E-04, 6.01077598E-04, & 5.95544425E-04, 5.90075972E-04, 5.84673328E-04, 5.79732822E-04, & 5.51530335E-04, 4.92818279E-04, 4.12640000E-04, 3.60673941E-04, & 3.23661744E-04, 2.95870897E-04, 2.74284159E-04, 2.57195155E-04, & 2.43956807E-04, 2.42789273E-04, 2.28765947E-04, 2.20409854E-04, & 2.17911264E-04, 2.13121943E-04, 2.10383537E-04, 2.10217861E-04, & 2.08870163E-04, 2.06965113E-04, 2.06035606E-04, 2.05653440E-04, & 2.05929405E-04, 2.07038667E-04, 2.08851673E-04, 2.10002793E-04, & 2.11457009E-04, 2.12596368E-04, 2.16033990E-04, 2.20329711E-04, & 2.20780563E-04, 2.25390332E-04, 2.32387763E-04, 2.36807726E-04, & 2.41747861E-04, 2.52758768E-04, 2.65834765E-04, 2.84041239E-04, & 2.90329841E-04, 3.07008137E-04, 3.20804726E-04, 3.35704187E-04, & 3.69566526E-04, 4.15322859E-04, 4.21005244E-04, 4.70297096E-04/ DATA ((DGS (I,J), I= 401, 500), J=3,3) / & 5.41104749E-04, 5.56153121E-04, 5.06326119E-04, 4.62946441E-04, & 4.46679061E-04, 4.03593158E-04, 3.91751728E-04, 3.85420680E-04, & 3.77715007E-04, 3.64402594E-04, 3.51296924E-04, 3.39244047E-04, & 3.37968914E-04, 3.26934339E-04, 3.25738463E-04, 3.19867293E-04, & 3.15442583E-04, 3.01799154E-04, 2.99378938E-04, 2.81944888E-04, & 2.80459288E-04, 2.78935586E-04, 2.62108302E-04, 2.46240037E-04, & 2.43557452E-04, 2.29698364E-04, 2.28620351E-04, 2.23488287E-04, & 2.22521748E-04, 2.16953227E-04, 2.13881879E-04, 2.03366623E-04, & 2.02113149E-04, 1.89317549E-04, 1.77987918E-04, 1.71903601E-04, & 1.70731157E-04, 1.56779598E-04, 1.54821563E-04, 1.45866432E-04, & 1.40608811E-04, 1.38746332E-04, 1.37658919E-04, 1.37164690E-04, & 1.34280320E-04, 1.34232206E-04, 1.35373982E-04, 1.38500765E-04, & 1.40844489E-04, 1.52419067E-04, 1.68842038E-04, 1.72788465E-04, & 1.74857575E-04, 1.88455943E-04, 1.95724880E-04, 2.03339118E-04, & 2.39197966E-04, 2.44513047E-04, 2.59516480E-04, 2.68619088E-04, & 2.80196972E-04, 2.81917715E-04, 2.86979150E-04, 2.90123262E-04, & 2.93082331E-04, 2.99821029E-04, 3.06931233E-04, 3.13522406E-04, & 3.23788935E-04, 3.36075118E-04, 3.37591215E-04, 3.61193162E-04, & 3.80974201E-04, 4.03569386E-04, 4.08065675E-04, 4.49576552E-04, & 4.56428633E-04, 4.83425082E-04, 5.63943752E-04, 5.44616250E-04, & 5.32562283E-04, 4.56231094E-04, 4.39238756E-04, 4.33092808E-04, & 4.25218654E-04, 4.26676345E-04, 4.31297129E-04, 4.36743687E-04, & 4.47174439E-04, 4.49984872E-04, 4.57076284E-04, 4.58514762E-04, & 4.64277672E-04, 4.71337754E-04, 4.78459287E-04, 4.81434306E-04, & 5.20609225E-04, 5.54780522E-04, 5.54187441E-04, 4.16235905E-04/ DATA ((DGS (I,J), I= 501, 600), J=3,3) / & 3.47548377E-04, 3.16434386E-04, 2.73023849E-04, 2.69356669E-04, & 2.58337263E-04, 2.47747428E-04, 2.30063728E-04, 2.24583720E-04, & 2.20053057E-04, 2.16595494E-04, 2.14555015E-04, 2.13687530E-04, & 2.13958607E-04, 2.15334142E-04, 2.17804622E-04, 2.21441558E-04, & 2.26361814E-04, 2.27534136E-04, 2.28772408E-04, 2.30078398E-04, & 2.31455851E-04, 2.32908068E-04, 2.34440673E-04, 2.36055699E-04, & 2.36389096E-04, 2.36726054E-04, 2.37066076E-04, 2.37410822E-04, & 2.37758720E-04, 2.38110353E-04, 2.38465766E-04, 2.38825004E-04, & 2.39188112E-04, 2.39555132E-04, 2.41527550E-04, 2.42613237E-04, & 2.43193753E-04, 2.43608457E-04, 2.44042373E-04, 2.44479709E-04, & 2.44923061E-04, 2.45372374E-04, 2.45826108E-04, 2.46054870E-04, & 2.46284917E-04, 2.46516262E-04, 2.46747474E-04, 2.46983280E-04, & 2.47218472E-04, 2.47454779E-04, 2.47692687E-04, 2.47931931E-04, & 2.48172527E-04, 2.48414491E-04, 2.48656022E-04, 2.48900397E-04, & 2.49146520E-04, 2.49394091E-04, 2.49644122E-04, 2.49895142E-04, & 2.50145701E-04, 2.50399280E-04, 2.50654423E-04, 2.50913100E-04, & 2.51170816E-04, 2.51429851E-04, 2.51690208E-04, 2.51951888E-04, & 2.52214281E-04, 2.52479164E-04, 2.52744690E-04, 2.53011462E-04, & 2.53279465E-04, 2.53549275E-04, 2.53820839E-04, 2.54094183E-04, & 2.54369336E-04, 2.54645180E-04, 2.54925176E-04, 2.55205921E-04, & 2.55488588E-04, 2.55773208E-04, 2.56059812E-04, 2.56203924E-04, & 2.56348477E-04, 2.56493478E-04, 2.56638934E-04, 2.56784853E-04, & 2.56931240E-04, 2.57075773E-04, 2.57224083E-04, 2.57373282E-04, & 2.57519145E-04, 2.57668775E-04, 2.57818018E-04, 2.57967062E-04, & 2.58117949E-04, 2.58268878E-04, 2.58420233E-04, 2.58572134E-04/ DATA ((DGS (I,J), I= 601, 700), J=3,3) / & 2.58724524E-04, 2.58877554E-04, 2.59031155E-04, 2.59185407E-04, & 2.59340215E-04, 2.59495509E-04, 2.59651480E-04, 2.59809356E-04, & 2.59966253E-04, 2.60123736E-04, 2.60281803E-04, 2.60440453E-04, & 2.60600882E-04, 2.60760789E-04, 2.60921276E-04, 2.61082342E-04, & 2.61242441E-04, 2.61405868E-04, 2.61568859E-04, 2.61732430E-04, & 2.61896582E-04, 2.62127367E-04, 2.62226623E-04, 2.62392519E-04, & 2.62559011E-04, 2.62726097E-04, 2.62893778E-04, 2.63062051E-04, & 2.63230916E-04, 2.63400372E-04, 2.63570417E-04, 2.63741048E-04, & 2.63912264E-04, 2.64084061E-04, 2.64211564E-04, 2.64562251E-04, & 2.64915257E-04, 2.65270528E-04, 2.65627990E-04, 2.65988096E-04, & 2.66351605E-04, 2.66718627E-04, 2.67089263E-04, 2.67463613E-04, & 2.67841775E-04, 2.67860541E-04, 2.67879317E-04, 2.67898102E-04, & 2.67916896E-04, 2.67935701E-04, 2.67954514E-04, 2.67973338E-04, & 2.67992171E-04, 2.68011013E-04, 2.68029865E-04, 2.68048727E-04, & 2.68067599E-04, 2.68086480E-04, 2.68088369E-04, 2.68118600E-04, & 2.68132212E-04, 2.68140534E-04, 2.68146586E-04, 2.68150748E-04, & 2.68154154E-04, 2.68156803E-04, 2.68159452E-04, 2.68161345E-04, & 2.68163237E-04, 2.68164751E-04, 2.68166265E-04, 2.68167401E-04, & 2.68168915E-04, 2.68169672E-04, 2.68170808E-04, 2.68171944E-04, & 2.68172701E-04, 2.68173837E-04, 2.68174594E-04, 2.68175351E-04, & 2.68176109E-04, 2.68176866E-04, 2.68177623E-04, 2.68178381E-04, & 2.68179138E-04, 2.68179895E-04, 2.68180653E-04, 2.68181410E-04, & 2.68182546E-04, 2.68183303E-04, 2.68184440E-04, 2.68185576E-04, & 2.68188606E-04, 2.68191636E-04, 2.68192773E-04, 2.68193909E-04, & 2.68194667E-04, 2.68195803E-04, 2.68196561E-04, 2.68197319E-04/ DATA ((DGS (I,J), I= 701, 800), J=3,3) / & 2.68198076E-04, 2.68198834E-04, 2.68199592E-04, 2.68200350E-04, & 2.68201107E-04, 2.68201865E-04, 2.68202623E-04, 2.68203381E-04, & 2.68204518E-04, 2.68205275E-04, 2.68206412E-04, 2.68207549E-04, & 2.68208307E-04, 2.68209823E-04, 2.68210960E-04, 2.68212476E-04, & 2.68213992E-04, 2.68215887E-04, 2.68217783E-04, 2.68220436E-04, & 2.68223090E-04, 2.68226502E-04, 2.68230673E-04, 2.68236741E-04, & 2.68245086E-04, 2.68258745E-04, 2.68275826E-04, 2.68294814E-04, & 2.68313812E-04, 2.68332912E-04, 2.68351838E-04, 2.68370949E-04, & 2.68389983E-04, 2.68409026E-04, 2.68428008E-04, 2.68446757E-04, & 2.68465854E-04, 2.68485298E-04, 2.68504390E-04, 2.68523493E-04, & 2.68542559E-04, 2.68561728E-04, 2.68580861E-04, 2.68600003E-04, & 2.68979988E-04, 2.69363976E-04, 2.69752119E-04, 2.70144487E-04, & 2.70541192E-04, 2.70942328E-04, 2.71347992E-04, 2.71758285E-04, & 2.72173310E-04, 2.72593174E-04, 2.72648841E-04, 2.73079951E-04, & 2.73516274E-04, 2.73958770E-04, 2.74408310E-04, 2.74864899E-04, & 2.75328566E-04, 2.75799364E-04, 2.76277358E-04, 2.76762631E-04, & 2.77255278E-04, 2.77755409E-04, 2.78262995E-04, 2.78778543E-04, & 2.79301964E-04, 2.79833409E-04, 2.80372175E-04, 2.80921032E-04, & 2.81477567E-04, 2.82042839E-04, 2.82616656E-04, 2.83199973E-04, & 2.83793844E-04, 2.84395883E-04, 2.85007803E-04, 2.85629870E-04, & 2.86262330E-04, 2.86905808E-04, 2.87560303E-04, 2.88225374E-04, & 2.88902634E-04, 2.89591935E-04, 2.90293652E-04, 2.91008181E-04, & 2.91735937E-04, 2.92479527E-04, 2.93235284E-04, 2.94005647E-04, & 2.94792307E-04, 2.95593254E-04, 2.96409680E-04, 2.97243926E-04, & 2.98095669E-04, 2.98965595E-04, 2.99854431E-04, 3.00762952E-04/ DATA ((DGS (I,J), I= 801, 900), J=3,3) / & 3.01691980E-04, 3.02642393E-04, 3.03614178E-04, 3.04610029E-04, & 3.05632233E-04, 3.06678192E-04, 3.07750923E-04, 3.08851750E-04, & 3.09982099E-04, 3.11143512E-04, 3.12337650E-04, 3.13566317E-04, & 3.14831470E-04, 3.16133973E-04, 3.17479770E-04, 3.18868000E-04, & 3.20302491E-04, 3.21786332E-04, 3.23322793E-04, 3.24915689E-04, & 3.26569167E-04, 3.28288826E-04, 3.30078171E-04, 3.31942180E-04, & 3.33889184E-04, 3.35927855E-04, 3.38065282E-04, 3.40311235E-04, & 3.42677008E-04, 3.45175752E-04, 3.47822904E-04, 3.50634827E-04, & 3.53636162E-04, 3.56853472E-04, 3.60317725E-04, 3.64069799E-04, & 3.68159201E-04, 3.72454182E-04, 3.72801886E-04, 3.73119477E-04, & 3.73406261E-04, 3.73660067E-04, 3.73876987E-04, 3.74049339E-04, & 3.74153328E-04, 3.74169823E-04, 3.74115875E-04, 3.78754054E-04, & 3.79334551E-04, 3.79672085E-04, 3.80021382E-04, 3.80167322E-04, & 3.80337828E-04, 3.80490946E-04, 3.80659539E-04, 3.80782360E-04, & 3.80925858E-04, 3.27526287E-04, 3.09967143E-04, 3.13158027E-04, & 3.25498805E-04, 3.46066768E-04, 3.83956287E-04, 4.03792997E-04, & 4.27748841E-04, 4.31219749E-04, 4.50067477E-04, 4.62229628E-04, & 4.64603922E-04, 5.00703678E-04, 5.67955539E-04, 5.74151188E-04, & 5.72636278E-04, 5.78700661E-04, 5.86494715E-04, 5.69589411E-04, & 5.58010752E-04, 5.49619424E-04, 5.43232300E-04, 5.38248166E-04, & 5.34438834E-04, 5.31711315E-04, 5.29807176E-04, 5.29217936E-04, & 5.28640892E-04, 5.28056990E-04, 5.27441892E-04, 5.26762410E-04, & 5.26052673E-04, 5.25751433E-04, 5.25497758E-04, 5.25295109E-04, & 5.25146889E-04, 5.25056484E-04, 5.25027304E-04, 5.25062813E-04, & 5.25166562E-04, 5.25329566E-04, 5.25545576E-04, 5.25809971E-04/ DATA ((DGS (I,J), I= 901,1000), J=3,3) / & 5.26124649E-04, 5.26570505E-04, 5.26794726E-04, 5.27071663E-04, & 5.27373360E-04, 5.27700871E-04, 5.28055279E-04, 5.28437700E-04, & 5.28849293E-04, 5.29291258E-04, 5.29764849E-04, 5.30276831E-04, & 5.30838078E-04, 5.31456295E-04, 5.32138207E-04, 5.32884222E-04, & 5.33694075E-04, 5.34559303E-04, 5.35477916E-04, 5.36450382E-04, & 5.37216378E-04, 5.37477307E-04, 5.37689291E-04, 5.38038984E-04, & 5.38131778E-04, 5.38201145E-04, 5.38256801E-04, 5.38302626E-04, & 5.38340556E-04, 5.38374550E-04, 5.38404588E-04, 5.38428649E-04, & 5.38452737E-04, 5.38474841E-04, 5.38494954E-04, 5.38513073E-04, & 5.38531206E-04, 5.38545320E-04, 5.38561461E-04, 5.38575595E-04, & 5.38589737E-04, 5.38603889E-04, 5.38616026E-04, 5.38630195E-04, & 5.38642346E-04, 5.38654505E-04, 5.38666670E-04, 5.38680871E-04, & 5.38693050E-04, 5.38707268E-04, 5.38719462E-04, 5.38735731E-04, & 5.38752012E-04, 5.38774418E-04, 5.38792767E-04, 5.38813172E-04, & 5.38823382E-04, 5.38833596E-04, 5.38843815E-04, 5.38872453E-04, & 5.38894980E-04, 5.38911377E-04, 5.38927786E-04, 5.38940101E-04, & 5.38954477E-04, 5.38966806E-04, 5.38981198E-04, 5.38993542E-04, & 5.39005893E-04, 5.39018250E-04, 5.39032675E-04, 5.39045047E-04, & 5.39059490E-04, 5.39073941E-04, 5.39088402E-04, 5.39104939E-04, & 5.39119420E-04, 5.39138051E-04, 5.39156697E-04, 5.39177432E-04, & 5.39200263E-04, 5.39225196E-04, 5.39250155E-04, 5.39281392E-04, & 5.39316845E-04, 5.39356533E-04, 5.39404668E-04, 5.39463400E-04, & 5.39537023E-04, 5.39636252E-04, 5.39697686E-04, 5.39778426E-04, & 5.39889355E-04, 5.40039493E-04, 5.40147304E-04, 5.40429841E-04, & 5.40554742E-04, 5.40893086E-04, 5.42146853E-04, 5.43460372E-04/ DATA ((DGS (I,J), I=1001,1100), J=3,3) / & 5.44835212E-04, 5.46273153E-04, 5.47776206E-04, 5.49337709E-04, & 5.50928862E-04, 5.52547359E-04, 5.54193380E-04, 5.55867158E-04, & 5.57568974E-04, 5.59299168E-04, 5.61058137E-04, 5.62814148E-04, & 5.64684159E-04, 5.66496447E-04, 5.68380671E-04, 5.70294656E-04, & 5.73863069E-04, 5.79548523E-04, 5.83849571E-04, 5.93400610E-04, & 6.03181628E-04, 6.17812922E-04, 6.28982039E-04, 6.10288627E-04, & 5.83509712E-04, 5.62892594E-04, 5.47922464E-04, 5.38242291E-04, & 5.31904749E-04, 5.27396027E-04, 5.24005810E-04, 5.21351785E-04, & 5.19208819E-04, 5.17433011E-04, 5.15936154E-04, 5.14649944E-04, & 5.13529728E-04, 5.12543673E-04, 5.11665080E-04, 5.10874744E-04, & 5.10157269E-04, 5.09483128E-04, 5.08920432E-04, 5.08319408E-04, & 5.07717113E-04, 5.07189445E-04, 5.06626907E-04, 5.06042650E-04, & 5.05469763E-04, 5.04890067E-04, 5.04296965E-04, 5.03684661E-04, & 5.03042260E-04, 5.02358349E-04, 5.01608711E-04, 5.00748042E-04, & 4.99660352E-04, 4.97095536E-04, 4.92965371E-04, 4.91097321E-04, & 4.89561460E-04, 4.88163898E-04, 4.86831303E-04, 4.85523494E-04, & 4.84226535E-04, 4.82866087E-04, 4.81424218E-04, 4.79321002E-04, & 4.78074195E-04, 4.75941362E-04, 4.73104050E-04, 4.68500928E-04, & 4.69014843E-04, 4.69548948E-04, 4.74675315E-04, 4.77993673E-04, & 4.80386385E-04, 4.82332043E-04, 4.83946741E-04, 4.85374726E-04, & 4.86644465E-04, 4.87804383E-04, 4.88884994E-04, 4.89641928E-04, & 4.90505249E-04, 4.90394377E-04, 4.90326759E-04, 4.90342404E-04, & 4.90526393E-04, 4.91096052E-04, 4.92829268E-04, 4.97376242E-04, & 4.99168274E-04, 5.08450639E-04, 5.26525418E-04, 5.26446904E-04, & 5.16416480E-04, 5.10941945E-04, 5.11335449E-04, 5.34409128E-04/ DATA ((DGS (I,J), I=1101,1200), J=3,3) / & 5.58621935E-04, 5.61949598E-04, 5.51551865E-04, 5.43541939E-04, & 5.33380710E-04, 5.28328549E-04, 5.25805268E-04, 5.26024742E-04, & 5.33377428E-04, 5.30392205E-04, 5.20006818E-04, 5.68855884E-04, & 5.76042976E-04, 5.34230885E-04, 4.92418794E-04, 4.50606704E-04, & 4.82146760E-04, 4.92811465E-04, 4.91467002E-04, 5.31181239E-04, & 5.72490005E-04, 6.28943904E-04, 5.79992091E-04, 4.93900380E-04, & 4.87564817E-04, 4.94644511E-04, 4.95908519E-04, 4.81442399E-04, & 4.68362759E-04, 5.24772608E-04, 6.36339785E-04, 8.20570931E-04, & 9.32841904E-04, 7.86109268E-04, 2.02769259E-04, 1.67504161E-04, & 1.82066075E-04, 2.41752277E-04, 2.26684913E-04, 1.90369831E-04, & 1.63670457E-04, 1.93516228E-04, 2.27685517E-04, 2.27164180E-04, & 2.20164952E-04, 2.07004698E-04, 2.02369363E-04, 2.04646192E-04, & 2.08573546E-04, 2.17341974E-04, 2.23574958E-04, 2.32963554E-04, & 2.27577094E-04, 1.86403395E-04, 1.71061693E-04, 1.72792853E-04, & 1.78625566E-04, 2.06595107E-04, 2.71077807E-04, 3.72665178E-04, & 3.91331808E-04, 3.46130290E-04, 3.05842284E-04, 2.62345949E-04, & 1.90165553E-04, 1.61161644E-04, 2.02938735E-04, 2.76359640E-04, & 2.79448347E-04, 1.63743003E-04, 1.59973355E-04, 1.88009728E-04, & 2.68425068E-04, 1.91233015E-04, 1.63211395E-04, 1.59845597E-04, & 1.60088513E-04, 1.61648121E-04, 1.62974427E-04, 1.58984481E-04, & 1.70785473E-04, 1.70767248E-04, 1.73574700E-04, 1.96425541E-04, & 2.53601050E-04, 3.00440676E-04, 3.97568411E-04, 4.48246024E-04, & 2.14869188E-04, 1.77707348E-04, 1.57722343E-04, 2.31580345E-04, & 2.66468023E-04, 4.15824312E-04, 4.19501925E-04, 4.13909139E-04, & 4.05832223E-04, 2.01073993E-04, 1.87441225E-04, 4.69168165E-04/ DATA ((DGS (I,J), I=1201,1300), J=3,3) / & 4.29026849E-04, 2.53532824E-04, 2.21629337E-04, 2.11682309E-04, & 1.94634192E-04, 1.88028715E-04, 1.92231987E-04, 1.94248211E-04, & 1.85193056E-04, 1.79428272E-04, 1.69320814E-04, 1.66608753E-04, & 1.55627781E-04, 1.58144957E-04, 1.62458183E-04, 1.54340260E-04, & 1.68643409E-04, 2.03995682E-04, 2.54405384E-04, 2.07522340E-04, & 1.57380261E-04, 1.53785942E-04, 1.55821521E-04, 1.52174026E-04, & 1.64836910E-04, 1.55544549E-04, 1.52757880E-04, 2.27706328E-04, & 1.97065502E-04, 1.64509625E-04, 6.67513332E-04, 1.11134013E-03, & 1.25928240E-03, 9.99488737E-04, 7.65489944E-04, 6.98275836E-04, & 6.46741609E-04, 5.71932406E-04, 5.19558093E-04, 4.98714531E-04, & 4.80486975E-04, 4.64394770E-04, 4.50072415E-04, 4.37236318E-04, & 4.25662597E-04, 4.15171847E-04, 4.05618408E-04, 3.96882653E-04, & 3.88865327E-04, 3.81483327E-04, 3.74666510E-04, 3.68355239E-04, & 3.62498479E-04, 3.57052301E-04, 3.51978695E-04, 3.47244617E-04, & 3.42821223E-04, 3.38683243E-04, 3.34808470E-04, 3.31177337E-04, & 3.27772567E-04, 3.24578884E-04, 3.21582766E-04, 3.18772242E-04, & 3.16136720E-04, 3.13666843E-04, 3.11354363E-04, 3.09192044E-04, & 3.07173571E-04, 3.05293482E-04, 3.03547106E-04, 3.01930515E-04, & 3.00440489E-04, 2.99337864E-04, 2.97830618E-04, 2.95704977E-04, & 2.94061386E-04, 2.92908281E-04, 2.92265547E-04, 2.92166018E-04, & 2.92657813E-04, 2.93807798E-04, 2.95706657E-04, 2.98476332E-04, & 3.02281145E-04, 3.07344861E-04, 3.13977851E-04, 3.22622411E-04, & 3.33933127E-04, 3.35245679E-04, 3.48931040E-04, 3.69332422E-04, & 3.98362699E-04, 4.32378314E-04, 4.43294266E-04, 4.77332552E-04, & 5.15567359E-04, 5.27587572E-04, 5.41007397E-04, 5.48342698E-04/ DATA ((DGS (I,J), I=1301,1400), J=3,3) / & 5.56163251E-04, 5.62811508E-04, 5.69849526E-04, 5.73528560E-04, & 5.77322644E-04, 5.81238757E-04, 5.85284533E-04, 5.89468334E-04, & 5.93799350E-04, 5.96023189E-04, 5.98287709E-04, 6.00594345E-04, & 6.02944605E-04, 6.05340079E-04, 6.07782445E-04, 6.10273470E-04, & 6.12815022E-04, 6.15409071E-04, 6.16382587E-04, 6.16965021E-04, & 6.17550159E-04, 6.18138023E-04, 6.18728637E-04, 6.19322027E-04, & 6.19918216E-04, 6.20517230E-04, 6.21119092E-04, 6.21723829E-04, & 6.22331466E-04, 6.22942029E-04, 6.23555544E-04, 6.24172038E-04, & 6.24791537E-04, 6.25414068E-04, 6.26039658E-04, 6.26668335E-04, & 6.27300125E-04, 6.27935058E-04, 6.28573161E-04, 6.29214461E-04, & 6.29858988E-04, 6.30506768E-04, 6.31157831E-04, 6.31812203E-04, & 6.32469913E-04, 6.33130989E-04, 6.33795456E-04, 6.34463341E-04, & 6.35134669E-04, 6.35809463E-04, 6.36487746E-04, 6.37169537E-04, & 6.37854852E-04, 6.38543701E-04, 6.39236091E-04, 6.39932017E-04, & 6.40631464E-04, 6.41334399E-04, 6.42040760E-04, 6.42750445E-04, & 6.43463284E-04, 6.44178986E-04, 6.44897036E-04, 6.45616433E-04, & 6.46334935E-04, 6.47045879E-04, 6.47705166E-04, 6.48004997E-04, & 6.48666355E-04, 6.48840082E-04, 6.48867035E-04, 6.48880511E-04, & 6.48907388E-04, 6.48934184E-04, 6.48960972E-04, 6.48987721E-04, & 6.49014431E-04, 6.49041106E-04, 6.49067747E-04, 6.49094321E-04, & 6.49120902E-04, 6.49147454E-04, 6.49173981E-04, 6.49200482E-04, & 6.49226960E-04, 6.49253416E-04, 6.49266619E-04, 6.49279816E-04, & 6.49293044E-04, 6.49306231E-04, 6.49319450E-04, 6.49332628E-04, & 6.49345802E-04, 6.49359007E-04, 6.49372172E-04, 6.49385369E-04, & 6.49398526E-04, 6.49398526E-04, 6.49400446E-04, 6.49402366E-04/ DATA ((DGS (I,J), I=1401,1500), J=3,3) / & 6.49404285E-04, 6.49406205E-04, 6.49408125E-04, 6.49411964E-04, & 6.49415802E-04, 6.49417721E-04, 6.49421559E-04, 6.49425397E-04, & 6.49429270E-04, 6.49433108E-04, 6.49436944E-04, 6.49440781E-04, & 6.49444617E-04, 6.49453106E-04, 6.49466244E-04, 6.49479415E-04, & 6.49492546E-04, 6.49505710E-04, 6.49518836E-04, 6.49531958E-04, & 6.49545113E-04, 6.49558229E-04, 6.49571378E-04, 6.49584489E-04, & 6.49610739E-04, 6.49636978E-04, 6.49663208E-04, 6.49715605E-04, & 6.49768004E-04, 6.49820375E-04, 6.49846550E-04, 6.49872683E-04, & 6.49898846E-04, 6.49925004E-04, 6.49951156E-04, 6.49977303E-04, & 6.50016497E-04, 6.50080472E-04, 6.50855423E-04, 6.51630870E-04, & 6.52408552E-04, 6.53189348E-04, 6.53973772E-04, 6.54762163E-04, & 6.55554762E-04, 6.56351755E-04, 6.57153290E-04, 6.57959494E-04, & 6.58770478E-04, 6.59586343E-04, 6.60407183E-04, 6.61233087E-04, & 6.62064139E-04, 6.62900422E-04, 6.63742017E-04, 6.64589004E-04, & 6.65441463E-04, 6.66299472E-04, 6.67163113E-04, 6.68032464E-04, & 6.68907606E-04, 6.69788620E-04, 6.70675590E-04, 6.71568597E-04, & 6.72467727E-04, 6.73373064E-04, 6.74284697E-04, 6.75202714E-04, & 6.76127205E-04, 6.77058260E-04, 6.77995975E-04, 6.78940443E-04, & 6.79891761E-04, 6.80850028E-04, 6.81815346E-04, 6.82787815E-04, & 6.83767542E-04, 6.84754633E-04, 6.85749198E-04, 6.86751347E-04, & 6.87761195E-04, 6.88778859E-04, 6.89804456E-04, 6.90838110E-04, & 6.91879943E-04, 6.92930084E-04, 6.93988661E-04, 7.04022761E-04, & 7.12803533E-04, 7.24435848E-04, 7.44035522E-04, 7.75585431E-04, & 8.40653506E-04, 8.39789103E-04, 8.37699159E-04, 8.36642397E-04, & 7.75621846E-04, 7.33854721E-04, 7.01485778E-04, 6.75181890E-04/ DATA ((DGS (I,J), I=1501,1600), J=3,3) / & 6.34101484E-04, 6.02759276E-04, 5.13639834E-04, 4.35350778E-04, & 3.90965663E-04, 3.62969660E-04, 3.53325777E-04, 3.48799771E-04, & 3.46153181E-04, 3.44416847E-04, 3.42753966E-04, 3.42592316E-04, & 3.42432471E-04, 3.42391196E-04, 3.42304259E-04, 3.42217822E-04, & 3.42131876E-04, 3.42046408E-04, 3.41961410E-04, 3.41876873E-04, & 3.41792788E-04, 3.41709148E-04, 3.41625946E-04, 3.41543175E-04, & 3.41460828E-04, 3.41378901E-04, 3.41297387E-04, 3.41216280E-04, & 3.41135586E-04, 3.41055290E-04, 3.40975389E-04, 3.40895879E-04, & 3.40846921E-04, 3.40841530E-04, 3.40836141E-04, 3.40830754E-04, & 3.40825369E-04, 3.40819985E-04, 3.40814603E-04, 3.40809223E-04, & 3.40731716E-04, 3.40731024E-04, 3.40730330E-04, 3.40729983E-04, & 3.40729638E-04, 3.40729291E-04, 3.40728944E-04, 3.40728597E-04, & 3.40728252E-04, 3.40727905E-04, 3.40727558E-04, 3.40727211E-04, & 3.40726866E-04, 3.40726519E-04, 3.40726172E-04, 3.40725827E-04, & 3.40725480E-04, 3.40725133E-04, 3.40724786E-04, 3.40724441E-04, & 3.40724094E-04, 3.40723748E-04, 3.40723401E-04, 3.40723056E-04, & 3.40722709E-04, 3.40722362E-04, 3.40722015E-04, 3.40721670E-04, & 3.40721323E-04, 3.40720977E-04, 3.40720632E-04, 3.40720285E-04, & 3.40719938E-04, 3.40719592E-04, 3.40719246E-04, 3.40718900E-04, & 3.40718553E-04, 3.40718507E-04, 3.40718462E-04, 3.40718416E-04, & 3.40718370E-04, 3.40718325E-04, 3.40718279E-04, 3.40718234E-04, & 3.40718188E-04, 3.40718142E-04, 3.40718098E-04, 3.40718052E-04, & 3.40718007E-04, 3.40717961E-04, 3.40717915E-04, 3.40717870E-04, & 3.40717824E-04, 3.40717779E-04, 3.40717733E-04, 3.40717687E-04, & 3.40717642E-04, 3.40717596E-04, 3.40717550E-04, 3.40717505E-04/ DATA ((DGS (I,J), I=1601,1700), J=3,3) / & 3.40717459E-04, 3.40717413E-04, 3.40717067E-04, 3.40716722E-04, & 3.40716375E-04, 3.40716028E-04, 3.40715682E-04, 3.40715337E-04, & 3.40714990E-04, 3.40714644E-04, 3.40714297E-04, 3.40713952E-04, & 3.40713605E-04, 3.40713259E-04, 3.40712914E-04, 3.40712567E-04, & 3.40712221E-04, 3.40711874E-04, 3.40711529E-04, 3.40711183E-04, & 3.40710836E-04, 3.40710490E-04, 3.40710145E-04, 3.40709798E-04, & 3.40709452E-04, 3.40709106E-04, 3.40708761E-04, 3.40708414E-04, & 3.40708068E-04, 3.40707723E-04, 3.40707376E-04, 3.40707030E-04, & 3.40706684E-04, 3.40706339E-04, 3.40705992E-04, 3.40705646E-04, & 3.40705300E-04, 3.40704955E-04, 3.40704608E-04, 3.40703916E-04, & 3.40632674E-04, 3.40581674E-04, 3.40504065E-04, 3.40426828E-04, & 3.40273457E-04, 3.40121540E-04, 3.39971064E-04, 3.39822004E-04, & 3.39674343E-04, 3.39528048E-04, 3.39383105E-04, 3.39239503E-04, & 3.39143647E-04, 3.39015062E-04, 3.38887564E-04, 3.38761147E-04, & 3.38635806E-04, 3.38511536E-04, 3.37906175E-04, 3.37327559E-04, & 3.36776672E-04, 3.36258403E-04, 3.35794186E-04, 3.35510878E-04, & 3.35018203E-04, 3.34553856E-04, 3.31628953E-04, 3.37129261E-04, & 3.39031137E-04, 3.41418123E-04, 3.44448310E-04, 3.48523260E-04, & 3.50955253E-04, 3.53385973E-04, 3.58237764E-04, 3.62238577E-04, & 3.65055151E-04, 3.67045568E-04, 3.67676738E-04, 3.67775508E-04, & 3.67870965E-04, 3.67963138E-04, 3.68052056E-04, 3.68137746E-04, & 3.68220233E-04, 3.68299541E-04, 3.68375695E-04, 3.68448726E-04, & 3.68518644E-04, 3.68585469E-04, 3.68649218E-04, 3.68656971E-04, & 3.68664676E-04, 3.68672334E-04, 3.68679945E-04, 3.68687507E-04, & 3.68695022E-04, 3.68702489E-04, 3.68709908E-04, 3.68717281E-04/ DATA ((DGS (I,J), I=1701,1800), J=3,3) / & 3.68724606E-04, 3.68731882E-04, 3.68739112E-04, 3.68746295E-04, & 3.68753430E-04, 3.68760517E-04, 3.68762442E-04, 3.68767558E-04, & 3.68774551E-04, 3.68781497E-04, 3.68788395E-04, 3.68795247E-04, & 3.68802051E-04, 3.68808808E-04, 3.68809295E-04, 3.68810450E-04, & 3.68810682E-04, 3.68810914E-04, 3.68811146E-04, 3.68811378E-04, & 3.68811610E-04, 3.68811842E-04, 3.68812074E-04, 3.68812305E-04, & 3.68812537E-04, 3.68812769E-04, 3.68813000E-04, 3.68813232E-04, & 3.68813348E-04, 3.68813464E-04, 3.68813579E-04, 3.68813695E-04, & 3.68813811E-04, 3.68813927E-04, 3.68814042E-04, 3.68814158E-04, & 3.68814274E-04, 3.68814389E-04, 3.68814505E-04, 3.68814620E-04, & 3.68814736E-04, 3.68814751E-04, 3.68814766E-04, 3.68814780E-04, & 3.68814796E-04, 3.68814810E-04, 3.68814825E-04, 3.68814840E-04, & 3.68814855E-04, 3.68814869E-04, 3.68814885E-04, 3.68814899E-04, & 3.68814914E-04, 3.68814929E-04, 3.68814944E-04, 3.68814958E-04, & 3.68814974E-04, 3.68814988E-04, 3.68815003E-04, 3.68815018E-04, & 3.68815033E-04, 3.68815047E-04, 3.68815063E-04, 3.68815077E-04, & 3.68815092E-04, 3.68815107E-04, 3.68815223E-04, 3.68815338E-04, & 3.68815454E-04, 3.68815569E-04, 3.68815684E-04, 3.68815800E-04, & 3.68815916E-04, 3.68816031E-04, 3.68816147E-04, 3.68816262E-04, & 3.68816377E-04, 3.68816493E-04, 3.68816608E-04, 3.68816723E-04, & 3.68816954E-04, 3.68817185E-04, 3.68817415E-04, 3.68817646E-04, & 3.68817876E-04, 3.68818106E-04, 3.68818337E-04, 3.68818567E-04, & 3.68818797E-04, 3.68819027E-04, 3.68819258E-04, 3.68835365E-04, & 3.68841886E-04, 3.68848361E-04, 3.68854789E-04, 3.68861169E-04, & 3.68867503E-04, 3.68873790E-04, 3.68880030E-04, 3.68886223E-04/ DATA ((DGS (I,J), I=1801,1900), J=3,3) / & 3.68892369E-04, 3.68898468E-04, 3.68904521E-04, 3.68910527E-04, & 3.68916486E-04, 3.68922398E-04, 3.68968018E-04, 3.69010658E-04, & 3.69050331E-04, 3.69087041E-04, 3.69120797E-04, 3.69151606E-04, & 3.69179471E-04, 3.69226386E-04, 3.69261559E-04, 3.69274741E-04, & 3.69284985E-04, 3.69290807E-04, 3.69175895E-04, 3.68915813E-04, & 3.68498245E-04, 3.67898929E-04, 3.67160792E-04, 3.66356428E-04, & 3.65488789E-04, 3.64560570E-04, 3.63643419E-04, 3.62779055E-04, & 3.61941725E-04, 3.61116960E-04, 3.60295710E-04, 3.59471935E-04, & 3.58641461E-04, 3.57801426E-04, 3.56950314E-04, 3.56090246E-04, & 3.55220876E-04, 3.54316776E-04, 3.53694021E-04, 3.42075482E-04, & 3.39335359E-04, 3.37756233E-04, 3.36730392E-04, 3.35991249E-04, & 3.35422134E-04, 3.34962636E-04, 3.34579934E-04, 3.34255199E-04, & 3.33971650E-04, 3.33719694E-04, 3.33494596E-04, 3.33291538E-04, & 3.33105640E-04, 3.32931970E-04, 3.32770599E-04, 3.32621591E-04, & 3.32479945E-04, 3.32343158E-04, 3.32213791E-04, 3.32091876E-04, & 3.31969808E-04, 3.31855229E-04, 3.31740517E-04, 3.31628223E-04, & 3.31515801E-04, 3.31403251E-04, 3.31290574E-04, 3.31177768E-04, & 3.31057131E-04, 3.30931205E-04, 3.30797397E-04, 3.30642784E-04, & 3.30451769E-04, 3.30009003E-04, 3.29564339E-04, 3.29371326E-04, & 3.29214569E-04, 3.29078527E-04, 3.28950174E-04, 3.28826915E-04, & 3.28711396E-04, 3.28595753E-04, 3.28479987E-04, 3.28364098E-04, & 3.28248086E-04, 3.28129309E-04, 3.28010405E-04, 3.27883432E-04, & 3.27756314E-04, 3.27621092E-04, 3.27477737E-04, 3.27328880E-04, & 3.27171835E-04, 3.27001236E-04, 3.26817022E-04, 3.26619130E-04, & 3.26402130E-04, 3.26159952E-04, 3.25888174E-04, 3.25584105E-04/ DATA ((DGS (I,J), I=1901,2000), J=3,3) / & 3.25227151E-04, 3.24806656E-04, 3.24297431E-04, 3.23660041E-04, & 3.22820953E-04, 3.21634701E-04, 3.19756580E-04, 3.15983509E-04, & 2.98987629E-04, 2.98076647E-04, 2.90753179E-04, 2.85392391E-04, & 2.81251272E-04, 2.77920131E-04, 2.75160329E-04, 2.72818276E-04, & 2.70796831E-04, 2.69020981E-04, 2.67444596E-04, 2.66025011E-04, & 2.64738838E-04, 2.63562934E-04, 2.62477584E-04, 2.61469508E-04, & 2.60528709E-04, 2.59645334E-04, 2.58809698E-04, 2.58018294E-04, & 2.57258717E-04, 2.56533641E-04, 2.55833871E-04, 2.55156268E-04, & 2.54497756E-04, 2.53852439E-04, 2.53217436E-04, 2.52589944E-04, & 2.51964424E-04, 2.51332723E-04, 2.50695304E-04, 2.50036191E-04, & 2.49348265E-04, 2.48608771E-04, 2.47777953E-04, 2.46759614E-04, & 2.44486164E-04, 2.42593970E-04, 2.41811390E-04, 2.41206887E-04, & 2.40691837E-04, 2.40231944E-04, 2.39808020E-04, 2.39412522E-04, & 2.39038375E-04, 2.38678943E-04, 2.38333921E-04, 2.37999135E-04, & 2.37672596E-04, 2.37354308E-04, 2.37040646E-04, 2.36730071E-04, & 2.36426414E-04, 2.36124722E-04, 2.35823857E-04, 2.35527696E-04, & 2.35231984E-04, 2.34939103E-04, 2.34645445E-04, 2.34355103E-04, & 2.34065068E-04, 2.33778249E-04, 2.33492531E-04, 2.33210172E-04, & 2.32931453E-04, 2.32658475E-04, 2.32393038E-04, 2.32138010E-04, & 2.31896812E-04, 2.31675213E-04, 2.31479516E-04, 2.31320459E-04, & 2.31708012E-04, 2.31805422E-04, 2.31907365E-04, 2.32013878E-04, & 2.32124329E-04, 2.32238097E-04, 2.32354572E-04, 2.32474229E-04, & 2.32597768E-04, 2.32723605E-04, 2.32852687E-04, 2.32984751E-04, & 2.33119523E-04, 2.33256736E-04, 2.33397558E-04, 2.33541875E-04, & 2.33688040E-04, 2.33838953E-04, 2.33994648E-04, 2.34153477E-04/ DATA ((DGS (I,J), I=2001,2100), J=3,3) / & 2.34318782E-04, 2.34487190E-04, 2.34662241E-04, 2.34844124E-04, & 2.35033030E-04, 2.35231142E-04, 2.35436783E-04, 2.35656462E-04, & 2.35890918E-04, 2.36143156E-04, 2.36416486E-04, 2.36721662E-04, & 2.37070791E-04, 2.37490373E-04, 2.38045940E-04, 2.39459353E-04, & 2.41028121E-04, 2.41744113E-04, 2.42330179E-04, 2.42851481E-04, & 2.43335029E-04, 2.43792488E-04, 2.44237089E-04, 2.44671504E-04, & 2.45098762E-04, 2.45518083E-04, 2.45941394E-04, 2.46364350E-04, & 2.46791083E-04, 2.47221593E-04, 2.47654569E-04, 2.48098082E-04, & 2.48542989E-04, 2.48993835E-04, 2.49460198E-04, 2.49927899E-04, & 2.50411498E-04, 2.50906396E-04, 2.51412789E-04, 2.51935983E-04, & 2.52476378E-04, 2.53034377E-04, 2.53610394E-04, 2.54210244E-04, & 2.54829099E-04, 2.55472933E-04, 2.56148026E-04, 2.56855281E-04, & 2.57595581E-04, 2.58366783E-04, 2.59173876E-04, 2.63386678E-04, & 2.78067333E-04, 2.95885938E-04, 3.15355768E-04, 3.38311151E-04, & 3.62849546E-04, 3.91355207E-04, 4.21560173E-04, 4.56526329E-04, & 4.95404533E-04, 5.36832447E-04, 5.85424295E-04, 6.38092634E-04, & 7.27780098E-04, 8.17467561E-04, 7.79557446E-04, 7.45519909E-04, & 7.17135765E-04, 6.90940826E-04, 6.68603585E-04, 6.47606376E-04, & 6.29421155E-04, 6.12099242E-04, 5.96263636E-04, 5.82324013E-04, & 5.68855811E-04, 5.56906796E-04, 5.45280646E-04, 5.34900374E-04, & 5.24742527E-04, 5.15625642E-04, 5.06661350E-04, 4.98580208E-04, & 4.90602042E-04, 4.83382748E-04, 4.76533508E-04, 4.69737467E-04, & 4.63558919E-04, 4.57410838E-04, 4.51806367E-04, 4.46215459E-04, & 4.41106752E-04, 4.35998945E-04, 4.31321727E-04, 4.26635891E-04, & 4.22336834E-04, 4.18021998E-04, 4.13879781E-04, 4.10069708E-04/ DATA ((DGS (I,J), I=2101,2180), J=3,3) / & 4.06236281E-04, 4.02704895E-04, 3.99146714E-04, 3.95864329E-04, & 3.92552627E-04, 3.89493701E-04, 3.86403651E-04, 3.83546072E-04, & 3.80656122E-04, 3.77980643E-04, 3.75387927E-04, 3.72761762E-04, & 3.70326834E-04, 3.67858125E-04, 3.65567062E-04, 3.63241991E-04, & 3.61082473E-04, 3.58889172E-04, 3.56850254E-04, 3.54777797E-04, & 3.52849729E-04, 3.50888474E-04, 3.48980663E-04, 3.47203838E-04, & 3.45394520E-04, 3.43708293E-04, 3.41990107E-04, 3.40387792E-04, & 3.38754093E-04, 3.37229645E-04, 3.35674451E-04, 3.34222392E-04, & 3.32740184E-04, 3.31355537E-04, 3.29941382E-04, 3.28619616E-04, & 3.27327063E-04, 3.26005967E-04, 3.24770267E-04, 3.23506675E-04, & 3.22324206E-04, 3.21114490E-04, 3.19981929E-04, 3.18825497E-04, & 3.17739830E-04, 3.16628186E-04, 3.15586558E-04, 3.14519572E-04, & 3.04198210E-04, 2.95778252E-04, 2.94573132E-04, 2.60703300E-04, & 2.52448745E-04, 2.39186319E-04, 2.34665578E-04, 2.34456439E-04, & 2.30219707E-04, 2.30208614E-04, 2.27901129E-04, 2.27824331E-04, & 2.27778831E-04, 2.26848686E-04, 2.26289341E-04, 2.26193750E-04, & 2.26040441E-04, 2.25819675E-04, 2.25668385E-04, 2.25575194E-04, & 2.24733823E-04, 2.24699241E-04, 2.24477661E-04, 2.24437424E-04, & 2.24309877E-04, 2.24189479E-04, 2.24147982E-04, 2.24098429E-04, & 2.23944170E-04, 2.23745371E-04, 2.23663410E-04, 2.23156816E-04/ save RETURN END c ++++ dalhadshigh26 ++++ c update 05/28/26 subroutine dalhad_timelike1h26x IMPLICIT NONE INTEGER NC,I,J PARAMETER(NC=200) REAL EMA(NC),DAM(NC,3),DGM(NC,3) COMMON /DATM26x/EMA,DAM,DGM c****************************************************************************** c* * c* --- intRdatx --- Thu May 28 15:07:13 2026 * c* * c***************************# FJ@HU Berlin #*********************************** c "Delta alpha" Update version (24/02/2026) c ISCAN: 2, Ismooth: 0, IGS: 0, DSET: EPM2, 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.1880, MTOP: 172.40 c NF,IOR,ICHK: 5,4,2,ISU2: 0,NFL: 5,INAG: 1,inotail: 0, sin2W_ref: 0.23153 c CHPTCUT,EC,ECUT: 0.3180, 5.20, 11.50, sin2W_eff: 0.23153, s2W_ref/eff: 1.000 c iintRd,IUNMIX,iomegaphidat,iresonances,IRESON:1, 1, 3, 1, 1 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.5780E-02, 1.6083E-02, 1.6298E-02, 1.6534E-02, 1.6758E-02, & 1.7176E-02, 1.7562E-02, 1.7921E-02, 1.8258E-02, 1.8575E-02, & 1.8875E-02, 1.9268E-02, 1.9430E-02, 1.9689E-02, 1.9937E-02, & 2.0175E-02, 2.0402E-02, 2.0621E-02, 2.0832E-02, 2.1036E-02, & 2.1233E-02, 2.1423E-02, 2.1608E-02, 2.1789E-02, 2.1992E-02, & 2.2128E-02, 2.2291E-02, 2.2451E-02, 2.2606E-02, 2.2757E-02, & 2.2904E-02, 2.3047E-02, 2.3195E-02, 2.3324E-02, 2.3458E-02, & 2.3651E-02, 2.3716E-02, 2.3841E-02, 2.3964E-02, 2.4084E-02, & 2.4201E-02, 2.4317E-02, 2.4430E-02, 2.4564E-02, 2.4650E-02, & 2.4757E-02, 2.4861E-02, 2.5088E-02, 2.5066E-02, 2.5166E-02, & 2.5264E-02, 2.5360E-02, 2.5455E-02, 2.5548E-02, 2.5640E-02, & 2.5730E-02, 2.5819E-02, 2.5907E-02, 2.5994E-02, 2.6079E-02, & 2.6163E-02, 2.6246E-02, 2.6327E-02, 2.6408E-02, 2.6487E-02, & 2.6566E-02, 2.6643E-02, 2.6719E-02, 2.6795E-02, 2.6869E-02, & 2.6943E-02, 2.7015E-02, 2.7087E-02, 2.7158E-02, 2.7228E-02, & 2.7297E-02, 2.7365E-02, 2.7433E-02, 2.7500E-02, 2.7566E-02, & 2.7631E-02, 2.7696E-02, 2.7760E-02, 2.7823E-02, 2.7886E-02, & 2.7947E-02, 2.8009E-02, 2.8069E-02, 2.8129E-02, 2.8189E-02, & 2.8698E-02, 2.9168E-02, 2.9602E-02, 3.0008E-02, 3.0387E-02, & 3.0744E-02, 3.1080E-02, 3.1399E-02, 3.1701E-02, 3.1990E-02/ DATA ((DAM (I,J), I= 101, 200), J=1,1) / & 3.2265E-02, 3.2528E-02, 3.2780E-02, 3.3023E-02, 3.3256E-02, & 3.3480E-02, 3.3697E-02, 3.3907E-02, 3.4110E-02, 3.4306E-02, & 3.4497E-02, 3.4682E-02, 3.4861E-02, 3.5036E-02, 3.5207E-02, & 3.5373E-02, 3.5534E-02, 3.5691E-02, 3.5847E-02, 3.5999E-02, & 3.6148E-02, 3.6293E-02, 3.6435E-02, 3.6575E-02, 3.6712E-02, & 3.6846E-02, 3.6978E-02, 3.7108E-02, 3.7236E-02, 3.7361E-02, & 3.7485E-02, 3.7607E-02, 3.7727E-02, 3.7845E-02, 3.7956E-02, & 3.8059E-02, 3.8161E-02, 3.8261E-02, 3.8359E-02, 3.8456E-02, & 3.8551E-02, 3.8644E-02, 3.8736E-02, 3.8827E-02, 3.8916E-02, & 3.9004E-02, 3.9090E-02, 3.9176E-02, 3.9260E-02, 3.9343E-02, & 3.9424E-02, 3.9505E-02, 3.9584E-02, 3.9663E-02, 3.9740E-02, & 3.9817E-02, 3.9892E-02, 3.9966E-02, 4.0040E-02, 4.0112E-02, & 4.0184E-02, 4.0255E-02, 4.0325E-02, 4.0394E-02, 4.0462E-02, & 4.0530E-02, 4.0596E-02, 4.0662E-02, 4.0728E-02, 4.0792E-02, & 4.0856E-02, 4.0919E-02, 4.0982E-02, 4.1043E-02, 4.1105E-02, & 4.1165E-02, 4.1225E-02, 4.1284E-02, 4.1343E-02, 4.1401E-02, & 4.1459E-02, 4.1516E-02, 4.1572E-02, 4.1628E-02, 4.1683E-02, & 4.1738E-02, 4.1792E-02, 4.1846E-02, 4.1899E-02, 4.1952E-02, & 4.5999E-02, 4.8362E-02, 5.0039E-02, 5.1339E-02, 5.2399E-02, & 5.4074E-02, 5.5372E-02, 5.6430E-02, 5.7327E-02, 5.9399E-02/ DATA ((DAM (I,J), I= 1, 100), J=2,2) / & 1.7128E-05, 1.6339E-05, 1.5840E-05, 1.5491E-05, 1.5230E-05, & 1.4855E-05, 1.4595E-05, 1.4400E-05, 1.4249E-05, 1.4128E-05, & 1.4028E-05, 1.3945E-05, 1.3875E-05, 1.3815E-05, 1.3763E-05, & 1.3718E-05, 1.3678E-05, 1.3643E-05, 1.3612E-05, 1.3584E-05, & 1.3559E-05, 1.3537E-05, 1.3517E-05, 1.3498E-05, 1.3482E-05, & 1.3466E-05, 1.3452E-05, 1.3440E-05, 1.3428E-05, 1.3417E-05, & 1.3407E-05, 1.3397E-05, 1.3389E-05, 1.3381E-05, 1.3373E-05, & 1.3366E-05, 1.3360E-05, 1.3354E-05, 1.3348E-05, 1.3342E-05, & 1.3337E-05, 1.3333E-05, 1.3328E-05, 1.3324E-05, 1.3320E-05, & 1.3316E-05, 1.3312E-05, 1.3309E-05, 1.3306E-05, 1.3303E-05, & 1.3300E-05, 1.3297E-05, 1.3294E-05, 1.3292E-05, 1.3289E-05, & 1.3287E-05, 1.3285E-05, 1.3283E-05, 1.3281E-05, 1.3279E-05, & 1.3277E-05, 1.3275E-05, 1.3274E-05, 1.3272E-05, 1.3271E-05, & 1.3269E-05, 1.3268E-05, 1.3266E-05, 1.3265E-05, 1.3264E-05, & 1.3263E-05, 1.3261E-05, 1.3260E-05, 1.3259E-05, 1.3258E-05, & 1.3257E-05, 1.3256E-05, 1.3255E-05, 1.3254E-05, 1.3253E-05, & 1.3252E-05, 1.3252E-05, 1.3251E-05, 1.3250E-05, 1.3249E-05, & 1.3249E-05, 1.3248E-05, 1.3247E-05, 1.3246E-05, 1.3246E-05, & 1.3241E-05, 1.3237E-05, 1.3234E-05, 1.3231E-05, 1.3229E-05, & 1.3228E-05, 1.3226E-05, 1.3225E-05, 1.3224E-05, 1.3223E-05/ DATA ((DAM (I,J), I= 101, 200), J=2,2) / & 1.3222E-05, 1.3222E-05, 1.3221E-05, 1.3220E-05, 1.3220E-05, & 1.3220E-05, 1.3219E-05, 1.3219E-05, 1.3219E-05, 1.3218E-05, & 1.3218E-05, 1.3218E-05, 1.3218E-05, 1.3217E-05, 1.3217E-05, & 1.3217E-05, 1.3217E-05, 1.3217E-05, 1.3217E-05, 1.3217E-05, & 1.3216E-05, 1.3216E-05, 1.3216E-05, 1.3216E-05, 1.3216E-05, & 1.3216E-05, 1.3216E-05, 1.3216E-05, 1.3216E-05, 1.3216E-05, & 1.3216E-05, 1.3216E-05, 1.3216E-05, 1.3216E-05, 1.3216E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, 1.3215E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, & 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05, 1.3214E-05/ DATA ((DAM (I,J), I= 1, 100), J=3,3) / & 1.6502E-04, 1.5874E-04, 1.5470E-04, 1.5188E-04, 1.4977E-04, & 1.4681E-04, 1.4480E-04, 1.4333E-04, 1.4221E-04, 1.4132E-04, & 1.4059E-04, 1.4000E-04, 1.3949E-04, 1.3907E-04, 1.3870E-04, & 1.3838E-04, 1.3810E-04, 1.3786E-04, 1.3764E-04, 1.3745E-04, & 1.3728E-04, 1.3712E-04, 1.3699E-04, 1.3686E-04, 1.3675E-04, & 1.3664E-04, 1.3654E-04, 1.3646E-04, 1.3638E-04, 1.3630E-04, & 1.3623E-04, 1.3617E-04, 1.3611E-04, 1.3606E-04, 1.3601E-04, & 1.3596E-04, 1.3592E-04, 1.3587E-04, 1.3584E-04, 1.3580E-04, & 1.3577E-04, 1.3573E-04, 1.3570E-04, 1.3568E-04, 1.3565E-04, & 1.3562E-04, 1.3560E-04, 1.3559E-04, 1.3556E-04, 1.3553E-04, & 1.3552E-04, 1.3550E-04, 1.3548E-04, 1.3546E-04, 1.3545E-04, & 1.3543E-04, 1.3542E-04, 1.3540E-04, 1.3539E-04, 1.3538E-04, & 1.3537E-04, 1.3536E-04, 1.3534E-04, 1.3533E-04, 1.3532E-04, & 1.3531E-04, 1.3531E-04, 1.3530E-04, 1.3529E-04, 1.3528E-04, & 1.3527E-04, 1.3526E-04, 1.3526E-04, 1.3525E-04, 1.3524E-04, & 1.3524E-04, 1.3523E-04, 1.3522E-04, 1.3522E-04, 1.3521E-04, & 1.3521E-04, 1.3520E-04, 1.3520E-04, 1.3519E-04, 1.3519E-04, & 1.3518E-04, 1.3518E-04, 1.3518E-04, 1.3517E-04, 1.3517E-04, & 1.3514E-04, 1.3511E-04, 1.3509E-04, 1.3508E-04, 1.3507E-04, & 1.3506E-04, 1.3505E-04, 1.3505E-04, 1.3504E-04, 1.3504E-04/ DATA ((DAM (I,J), I= 101, 200), J=3,3) / & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, & 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3502E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, 1.3503E-04, & 1.3503E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, & 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, & 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, 1.3504E-04, & 1.3506E-04, 1.3507E-04, 1.3508E-04, 1.3509E-04, 1.3509E-04, & 1.3510E-04, 1.3511E-04, 1.3511E-04, 1.3511E-04, 1.3512E-04/ c ++++ deghadshigh26 ++++ c update 05/28/26 c****************************************************************************** c* * c* --- intRdatx --- Thu May 28 15:47:45 2026 * c* * c***************************# FJ@HU Berlin #*********************************** c "Delta alpha" Update version (24/02/2026) c ISCAN: 2, Ismooth: 0, IGS: 0, DSET: EPM2, 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.1880, MTOP: 172.40 c NF,IOR,ICHK: 5,4,2,ISU2: 2,NFL: 5,INAG: 1,inotail: 0, sin2W_ref: 0.23153 c CHPTCUT,EC,ECUT: 0.3180, 5.20, 11.50, sin2W_eff: 0.23153, s2W_ref/eff: 1.000 c iintRd,IUNMIX,iomegaphidat,iresonances,IRESON:1, 1, 3, 1, 1 DATA ((DGM (I,J), I= 1, 100), J=1,1) / & 3.1338E-02, 3.2012E-02, 3.2491E-02, 3.3006E-02, 3.3491E-02, & 3.4388E-02, 3.5209E-02, 3.5969E-02, 3.6678E-02, 3.7345E-02, & 3.7972E-02, 3.8794E-02, 3.9133E-02, 3.9672E-02, 4.0187E-02, & 4.0683E-02, 4.1154E-02, 4.1609E-02, 4.2047E-02, 4.2470E-02, & 4.2878E-02, 4.3273E-02, 4.3654E-02, 4.4031E-02, 4.4450E-02, & 4.4731E-02, 4.5070E-02, 4.5399E-02, 4.5721E-02, 4.6033E-02, & 4.6336E-02, 4.6632E-02, 4.6939E-02, 4.7205E-02, 4.7481E-02, & 4.7882E-02, 4.8015E-02, 4.8273E-02, 4.8526E-02, 4.8774E-02, & 4.9017E-02, 4.9255E-02, 4.9489E-02, 4.9767E-02, 4.9942E-02, & 5.0163E-02, 5.0380E-02, 5.0850E-02, 5.0802E-02, 5.1007E-02, & 5.1209E-02, 5.1408E-02, 5.1604E-02, 5.1797E-02, 5.1986E-02, & 5.2173E-02, 5.2356E-02, 5.2537E-02, 5.2716E-02, 5.2892E-02, & 5.3065E-02, 5.3236E-02, 5.3404E-02, 5.3570E-02, 5.3734E-02, & 5.3896E-02, 5.4055E-02, 5.4213E-02, 5.4368E-02, 5.4522E-02, & 5.4673E-02, 5.4823E-02, 5.4971E-02, 5.5117E-02, 5.5262E-02, & 5.5404E-02, 5.5545E-02, 5.5685E-02, 5.5823E-02, 5.5959E-02, & 5.6094E-02, 5.6227E-02, 5.6359E-02, 5.6489E-02, 5.6618E-02, & 5.6746E-02, 5.6872E-02, 5.6998E-02, 5.7121E-02, 5.7244E-02, & 5.8295E-02, 5.9262E-02, 6.0159E-02, 6.0994E-02, 6.1776E-02, & 6.2512E-02, 6.3205E-02, 6.3862E-02, 6.4486E-02, 6.5081E-02/ DATA ((DGM (I,J), I= 101, 200), J=1,1) / & 6.5648E-02, 6.6190E-02, 6.6711E-02, 6.7210E-02, 6.7691E-02, & 6.8154E-02, 6.8601E-02, 6.9033E-02, 6.9451E-02, 6.9856E-02, & 7.0249E-02, 7.0630E-02, 7.1001E-02, 7.1362E-02, 7.1713E-02, & 7.2055E-02, 7.2388E-02, 7.2712E-02, 7.3033E-02, 7.3346E-02, & 7.3653E-02, 7.3952E-02, 7.4246E-02, 7.4533E-02, 7.4816E-02, & 7.5093E-02, 7.5365E-02, 7.5633E-02, 7.5896E-02, 7.6155E-02, & 7.6410E-02, 7.6661E-02, 7.6908E-02, 7.7153E-02, 7.7380E-02, & 7.7593E-02, 7.7803E-02, 7.8009E-02, 7.8211E-02, 7.8411E-02, & 7.8606E-02, 7.8799E-02, 7.8989E-02, 7.9176E-02, 7.9360E-02, & 7.9541E-02, 7.9719E-02, 7.9895E-02, 8.0068E-02, 8.0239E-02, & 8.0407E-02, 8.0574E-02, 8.0737E-02, 8.0899E-02, 8.1059E-02, & 8.1216E-02, 8.1371E-02, 8.1525E-02, 8.1676E-02, 8.1826E-02, & 8.1974E-02, 8.2120E-02, 8.2264E-02, 8.2406E-02, 8.2547E-02, & 8.2686E-02, 8.2824E-02, 8.2960E-02, 8.3094E-02, 8.3227E-02, & 8.3359E-02, 8.3489E-02, 8.3618E-02, 8.3745E-02, 8.3871E-02, & 8.3996E-02, 8.4119E-02, 8.4242E-02, 8.4363E-02, 8.4482E-02, & 8.4601E-02, 8.4718E-02, 8.4835E-02, 8.4950E-02, 8.5064E-02, & 8.5177E-02, 8.5289E-02, 8.5400E-02, 8.5510E-02, 8.5618E-02, & 9.3961E-02, 9.8833E-02, 1.0229E-01, 1.0497E-01, 1.0715E-01, & 1.1061E-01, 1.1328E-01, 1.1546E-01, 1.1731E-01, 1.2159E-01/ DATA ((DGM (I,J), I= 1, 100), J=2,2) / & 3.7703E-05, 3.4354E-05, 3.2296E-05, 3.0914E-05, 2.9920E-05, & 2.8581E-05, 2.7715E-05, 2.7107E-05, 2.6656E-05, 2.6308E-05, & 2.6032E-05, 2.5807E-05, 2.5621E-05, 2.5464E-05, 2.5331E-05, & 2.5217E-05, 2.5118E-05, 2.5032E-05, 2.4955E-05, 2.4888E-05, & 2.4828E-05, 2.4774E-05, 2.4726E-05, 2.4682E-05, 2.4642E-05, & 2.4607E-05, 2.4574E-05, 2.4544E-05, 2.4516E-05, 2.4491E-05, & 2.4468E-05, 2.4446E-05, 2.4426E-05, 2.4407E-05, 2.4390E-05, & 2.4374E-05, 2.4359E-05, 2.4345E-05, 2.4332E-05, 2.4320E-05, & 2.4308E-05, 2.4297E-05, 2.4287E-05, 2.4277E-05, 2.4268E-05, & 2.4260E-05, 2.4251E-05, 2.4244E-05, 2.4236E-05, 2.4229E-05, & 2.4223E-05, 2.4217E-05, 2.4211E-05, 2.4205E-05, 2.4200E-05, & 2.4194E-05, 2.4189E-05, 2.4185E-05, 2.4180E-05, 2.4176E-05, & 2.4172E-05, 2.4168E-05, 2.4164E-05, 2.4161E-05, 2.4157E-05, & 2.4154E-05, 2.4151E-05, 2.4148E-05, 2.4145E-05, 2.4142E-05, & 2.4139E-05, 2.4136E-05, 2.4134E-05, 2.4131E-05, 2.4129E-05, & 2.4127E-05, 2.4125E-05, 2.4122E-05, 2.4120E-05, 2.4118E-05, & 2.4116E-05, 2.4115E-05, 2.4113E-05, 2.4111E-05, 2.4109E-05, & 2.4108E-05, 2.4106E-05, 2.4105E-05, 2.4103E-05, 2.4102E-05, & 2.4091E-05, 2.4082E-05, 2.4075E-05, 2.4069E-05, 2.4065E-05, & 2.4061E-05, 2.4058E-05, 2.4055E-05, 2.4053E-05, 2.4051E-05/ DATA ((DGM (I,J), I= 101, 200), J=2,2) / & 2.4049E-05, 2.4048E-05, 2.4046E-05, 2.4045E-05, 2.4044E-05, & 2.4043E-05, 2.4042E-05, 2.4042E-05, 2.4041E-05, 2.4040E-05, & 2.4040E-05, 2.4039E-05, 2.4039E-05, 2.4039E-05, 2.4038E-05, & 2.4038E-05, 2.4037E-05, 2.4037E-05, 2.4037E-05, 2.4037E-05, & 2.4036E-05, 2.4036E-05, 2.4036E-05, 2.4036E-05, 2.4036E-05, & 2.4035E-05, 2.4035E-05, 2.4035E-05, 2.4035E-05, 2.4035E-05, & 2.4035E-05, 2.4035E-05, 2.4035E-05, 2.4034E-05, 2.4034E-05, & 2.4034E-05, 2.4034E-05, 2.4034E-05, 2.4034E-05, 2.4034E-05, & 2.4034E-05, 2.4034E-05, 2.4034E-05, 2.4034E-05, 2.4034E-05, & 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, & 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, & 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, & 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, & 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, & 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, 2.4033E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, & 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05, 2.4032E-05/ DATA ((DGM (I,J), I= 1, 100), J=3,3) / & 3.4371E-04, 3.1452E-04, 2.9578E-04, 2.8288E-04, 2.7347E-04, & 2.6070E-04, 2.5245E-04, 2.4668E-04, 2.4244E-04, 2.3919E-04, & 2.3662E-04, 2.3457E-04, 2.3285E-04, 2.3142E-04, 2.3022E-04, & 2.2919E-04, 2.2830E-04, 2.2753E-04, 2.2685E-04, 2.2625E-04, & 2.2572E-04, 2.2524E-04, 2.2482E-04, 2.2444E-04, 2.2410E-04, & 2.2378E-04, 2.2349E-04, 2.2323E-04, 2.2299E-04, 2.2277E-04, & 2.2257E-04, 2.2238E-04, 2.2221E-04, 2.2205E-04, 2.2190E-04, & 2.2179E-04, 2.2163E-04, 2.2151E-04, 2.2140E-04, 2.2130E-04, & 2.2120E-04, 2.2111E-04, 2.2102E-04, 2.2095E-04, 2.2086E-04, & 2.2079E-04, 2.2072E-04, 2.2070E-04, 2.2059E-04, 2.2054E-04, & 2.2048E-04, 2.2043E-04, 2.2038E-04, 2.2033E-04, 2.2029E-04, & 2.2024E-04, 2.2020E-04, 2.2016E-04, 2.2013E-04, 2.2009E-04, & 2.2006E-04, 2.2002E-04, 2.1999E-04, 2.1996E-04, 2.1993E-04, & 2.1991E-04, 2.1988E-04, 2.1986E-04, 2.1983E-04, 2.1981E-04, & 2.1979E-04, 2.1977E-04, 2.1974E-04, 2.1972E-04, 2.1971E-04, & 2.1969E-04, 2.1967E-04, 2.1965E-04, 2.1964E-04, 2.1962E-04, & 2.1961E-04, 2.1959E-04, 2.1958E-04, 2.1956E-04, 2.1955E-04, & 2.1954E-04, 2.1952E-04, 2.1951E-04, 2.1950E-04, 2.1949E-04, & 2.1940E-04, 2.1934E-04, 2.1929E-04, 2.1925E-04, 2.1921E-04, & 2.1919E-04, 2.1917E-04, 2.1915E-04, 2.1913E-04, 2.1912E-04/ DATA ((DGM (I,J), I= 101, 200), J=3,3) / & 2.1911E-04, 2.1911E-04, 2.1910E-04, 2.1909E-04, 2.1909E-04, & 2.1908E-04, 2.1908E-04, 2.1908E-04, 2.1908E-04, 2.1908E-04, & 2.1907E-04, 2.1907E-04, 2.1907E-04, 2.1907E-04, 2.1907E-04, & 2.1907E-04, 2.1907E-04, 2.1907E-04, 2.1907E-04, 2.1907E-04, & 2.1907E-04, 2.1907E-04, 2.1907E-04, 2.1908E-04, 2.1908E-04, & 2.1908E-04, 2.1908E-04, 2.1908E-04, 2.1908E-04, 2.1908E-04, & 2.1908E-04, 2.1908E-04, 2.1908E-04, 2.1909E-04, 2.1909E-04, & 2.1909E-04, 2.1909E-04, 2.1909E-04, 2.1909E-04, 2.1909E-04, & 2.1909E-04, 2.1909E-04, 2.1909E-04, 2.1910E-04, 2.1910E-04, & 2.1910E-04, 2.1910E-04, 2.1910E-04, 2.1910E-04, 2.1910E-04, & 2.1910E-04, 2.1910E-04, 2.1910E-04, 2.1911E-04, 2.1911E-04, & 2.1911E-04, 2.1911E-04, 2.1911E-04, 2.1911E-04, 2.1911E-04, & 2.1911E-04, 2.1911E-04, 2.1911E-04, 2.1911E-04, 2.1912E-04, & 2.1912E-04, 2.1912E-04, 2.1912E-04, 2.1912E-04, 2.1912E-04, & 2.1912E-04, 2.1912E-04, 2.1912E-04, 2.1912E-04, 2.1912E-04, & 2.1912E-04, 2.1913E-04, 2.1913E-04, 2.1913E-04, 2.1913E-04, & 2.1913E-04, 2.1913E-04, 2.1913E-04, 2.1913E-04, 2.1913E-04, & 2.1913E-04, 2.1913E-04, 2.1913E-04, 2.1913E-04, 2.1914E-04, & 2.1919E-04, 2.1922E-04, 2.1925E-04, 2.1927E-04, 2.1928E-04, & 2.1931E-04, 2.1932E-04, 2.1933E-04, 2.1935E-04, 2.1937E-04/ save RETURN END