Changeset 281 for trunk/LMDZ.MARS/util


Ignore:
Timestamp:
Sep 6, 2011, 11:20:29 AM (13 years ago)
Author:
emillour
Message:

Update utilitaire zrecast du GCM Mars.
EM

Location:
trunk/LMDZ.MARS/util
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.MARS/util/README.exec

    r275 r281  
    5252integrating the hydrostatic equation, recasts data along the vertical
    5353direction.
    54 The vertical coordinate can be either "above areoid altitudes" or
    55 "pressure". Some interpolation along the vertical direction is also
    56 done, following instructions given by user.
     54The vertical coordinate can be either 1) pressure, 2) above areoid
     55altitudes, 3) above local surface altitudes or 4) distance to center of
     56the planet. Some interpolation along the vertical direction is also
     57done, following instructions given by user (levels may be specified
     58or given as minimu,maximum and number of levels).
    5759For "above areoid altitudes" output, Atmospheric pressure is added to
    5860output dataset; for "pressure coordinate" outputs, the above areoid
     
    7779output file is :
    7880name_of_input_file_P.nc with pressure coordinate
    79 name_of_input_file_Z.nc with altitude above areoid coordinate
     81name_of_input_file_A.nc with altitude above areoid coordinate
     82name_of_input_file_S.nc with altitude above local surface coordinate
     83name_of_input_file_R.nc with altitude as distance to center of planet
    8084
    8185MODIFICATION :
    828601/2010 : correction to interpolate above surface if density is not available.
     8703/2011 : added possibility to have output as distance to center of planet
    8388
    8489--------------------------------------------------------------------
     
    9810310/2007 Utility lslin.F90 (not used by the gcm)
    99104changed evaluation of 'start_var' from hard-coded values to a computed value
    100 
    101105
    102106
  • trunk/LMDZ.MARS/util/zrecast.F90

    r137 r281  
    77! integrating the hydrostatic equation, recasts data along the vertical
    88! direction.
    9 ! The vertical coordinate can be either "above areoid altitudes" or
    10 ! "pressure". Some interpolation along the vertical direction is also
    11 ! done, following instructions given by user.
     9! The vertical coordinate can be either 1) pressure, 2) above areoid
     10! altitudes, 3) above local surface altitudes  or 4) distance to center of
     11! the planet. Some interpolation along the vertical direction is also
     12! done, following instructions given by user (levels may be specified
     13! or given as minimu,maximum and number of levels).
    1214! For "above areoid altitudes" output, Atmospheric pressure is added to
    1315! output dataset; for "pressure coordinate" outputs, the above areoid
     
    4749!              when interpolating log-wise and the density field is not
    4850!              available.
    49 
     51! EM 03/2011 : Add possibility to have outputs as distance to center
     52!              of planet
    5053implicit none
    5154
     
    101104real,dimension(:,:,:,:),allocatable :: za_gcm ! GCM above areoid levels (m)
    102105real,dimension(:,:,:,:),allocatable :: zs_gcm ! GCM above surface heights (m)
     106real,dimension(:,:,:,:),allocatable :: ra_gcm ! radial distance (m) to
     107                                          ! center of Mars, (of GCM grid points)
    103108real,dimension(:,:,:,:),allocatable :: indata ! to store a GCM 4D dataset
    104109real,dimension(:,:,:,:),allocatable :: outdata ! to store a 4D dataset
     
    108113integer ztype ! Flag for vertical coordinate of output
    109114! ztype=1: pressure  ztype=2: above areoid  ztype=3: above local surface
     115! ztype=4: distance to center of planet
    110116integer nblev ! # of levels (along vertical coordinate) for output data
    111117real pmin,pmax ! min and max values for output pressure coordinate
     
    114120real,dimension(:),allocatable :: zareoid ! Above areoid heights for output data
    115121real,dimension(:),allocatable :: zsurface ! Above surface heights for output
     122real,dimension(:),allocatable :: zradius ! distance to center of planet
    116123logical :: have_rho ! Flag: true if density 'rho' is available
    117124logical :: have_sigma ! Flag: true if sigma levels are known (false if hybrid
     
    140147if (ierr.ne.NF_NOERR) then
    141148   write(*,*) 'ERROR: Pb opening file ',trim(infile)
     149   write(*,*) NF_STRERROR(ierr)
    142150   stop ""
    143151endif
     
    150158if (ierr.ne.NF_NOERR) then
    151159  write(*,*) 'ERROR: Failed geting number of variables from file'
     160  write(*,*) NF_STRERROR(ierr)
    152161  stop
    153162endif
     
    166175enddo
    167176
    168 allocate(var(nbvar4dinfile))
     177allocate(var(nbvar4dinfile),stat=ierr)
     178if (ierr.ne.0) then
     179  write(*,*) "Error! failed memory allocation of var(nbvar4dinfile)"
     180  stop
     181endif
    169182
    170183write(*,*) ""
     
    247260        stop "Error: Failed to get lat length"
    248261      else
    249         allocate(lat(latlength))
     262        allocate(lat(latlength),stat=ierr)
     263        if (ierr.ne.0) then
     264          write(*,*) "Error: Failed to allocate lat(latlength)"
     265          write(*,*) "     latlength=",latlength
     266          stop
     267        endif
    250268        ierr=NF_GET_VAR_REAL(infid,tmpvarid,lat)
    251269        if (ierr.ne.NF_NOERR) then
     
    264282      stop "Error: Failed to get latitude length"
    265283    else
    266       allocate(lat(latlength))
     284      allocate(lat(latlength),stat=ierr)
     285      if (ierr.ne.0) then
     286        write(*,*) "Error: Failed to allocate lat(latlength)"
     287        write(*,*) "     latlength=",latlength
     288        stop
     289      endif
    267290      ierr=NF_GET_VAR_REAL(infid,tmpvarid,lat)
    268291      if (ierr.ne.NF_NOERR) then
     
    290313        stop "Error: Failed to get lon length"
    291314      else
    292         allocate(lon(lonlength))
     315        allocate(lon(lonlength),stat=ierr)
     316        if (ierr.ne.0) then
     317          write(*,*) "Error: Failed to allocate lon(lonlength)"
     318          write(*,*) "     lonlength=",lonlength
     319          stop
     320        endif
    293321        ierr=NF_GET_VAR_REAL(infid,tmpvarid,lon)
    294322        if (ierr.ne.NF_NOERR) then
     
    307335      stop "Error: Failed to get longitude length"
    308336    else
    309       allocate(lon(lonlength))
     337      allocate(lon(lonlength),stat=ierr)
     338      if (ierr.ne.0) then
     339        write(*,*) "Error: Failed to allocate lon(lonlength)"
     340        write(*,*) "     lonlength=",lonlength
     341        stop
     342      endif
    310343      ierr=NF_GET_VAR_REAL(infid,tmpvarid,lon)
    311344      if (ierr.ne.NF_NOERR) then
     
    333366        stop "Error: Failed to get time length"
    334367      else
    335         allocate(time(timelength))
     368        allocate(time(timelength),stat=ierr)
     369        if (ierr.ne.0) then
     370          write(*,*) "Error: Failed to allocate time(timelength)"
     371          write(*,*) "     timelength=",timelength
     372          stop
     373        endif
    336374        ierr=NF_GET_VAR_REAL(infid,tmpvarid,time)
    337375        if (ierr.ne.NF_NOERR) then
     
    350388      stop "Error: Failed to get Time length"
    351389    else
    352       allocate(time(timelength))
     390      allocate(time(timelength),stat=ierr)
     391      if (ierr.ne.0) then
     392        write(*,*) "Error: Failed to allocate time(timelength)"
     393        write(*,*) "     timelength=",timelength
     394        stop
     395      endif
    353396      ierr=NF_GET_VAR_REAL(infid,tmpvarid,time)
    354397      if (ierr.ne.NF_NOERR) then
     
    389432else
    390433  have_sigma=.true.
    391   allocate(sigma(altlength))
     434  allocate(sigma(altlength),stat=ierr)
     435  if (ierr.ne.0) then
     436    write(*,*) "Error: Failed to allocate sigma(altlength)"
     437    write(*,*) "     altlength=",altlength
     438    stop
     439  endif
    392440  ierr=NF_GET_VAR_REAL(infid,tmpvarid,sigma)
    393441  if (ierr.ne.NF_NOERR) then
     
    403451    stop "Error: Failed to get aps ID"
    404452  else
    405     allocate(aps(altlength))
     453    allocate(aps(altlength),stat=ierr)
     454    if (ierr.ne.0) then
     455      write(*,*) "Error: Failed to allocate aps(altlength)"
     456      write(*,*) "     altlength=",altlength
     457      stop
     458    endif
    406459    ierr=NF_GET_VAR_REAL(infid,tmpvarid,aps)
    407460    if (ierr.ne.NF_NOERR) then
     
    415468    stop "Error: Failed to get bps ID"
    416469  else
    417     allocate(bps(altlength))
     470    allocate(bps(altlength),stat=ierr)
     471    if (ierr.ne.0) then
     472      write(*,*) "Error: Failed to allocate bps(altlength)"
     473      write(*,*) "     altlength=",altlength
     474      stop
     475    endif
    418476    ierr=NF_GET_VAR_REAL(infid,tmpvarid,bps)
    419477    if (ierr.ne.NF_NOERR) then
     
    429487  write(*,*) "Failed allocation of phisinit(lonlength,latlength) !!!"
    430488  write(*,*) "lonlength=",lonlength," latlength=",latlength
     489  stop
    431490endif
    432491! look for 'phisinit' in current file
     
    475534write(*,*) "Which vertical coordinate should the output be in?"
    476535ztype=0
    477 do while ((ztype.lt.1).or.(ztype.gt.3))
    478   write(*,*) "(1: pressure, 2: above areoid altitude 3: above local surface)"
     536do while ((ztype.lt.1).or.(ztype.gt.4))
     537  write(*,*) "(1: pressure, 2: altitude above areoid, "
     538  write(*,*) " 3: above local surface, 4: distance to center of Mars)"
    479539  read(*,*)ztype
    480540enddo
     
    498558  ! ask for # of points and end values for pressure or above areoid cases
    499559  write(*,*) ""
    500   if (ztype.le.2) then
     560  if ((ztype.le.2).or.(ztype.le.4)) then
    501561    write(*,*) "Enter min and max of vertical coordinate (Pa or m)"
    502562    write(*,*) " (in that order and on the same line)"
    503563    if (ztype.eq.1) then ! pressure coordinate
    504564      read(*,*) pmin,pmax
    505     else ! above areoid coordinate
     565    else ! altitude coordinate
    506566      read(*,*) zamin,zamax
    507567    endif
    508   endif
     568  endif ! of if ((ztype.le.2).or.(ztype.le.4))
    509569
    510570  ! Build corresponding vertical coordinates
     
    512572    write(*,*) "Number of levels along vertical coordinate?"
    513573    read(*,*) nblev
    514     allocate(plevel(nblev))
     574    allocate(plevel(nblev),stat=ierr)
     575    if (ierr.ne.0) then
     576      write(*,*) "Error: Failed to allocate plevel(nblev)"
     577      write(*,*) "     nblev=",nblev
     578      stop
     579    endif
    515580    if (nblev.eq.1) then ! in case only one level is asked for
    516581      plevel(nblev)=pmin
     
    525590    write(*,*) "Number of levels along vertical coordinate?"
    526591    read(*,*) nblev
    527     allocate(zareoid(nblev))
     592    allocate(zareoid(nblev),stat=ierr)
     593    if (ierr.ne.0) then
     594      write(*,*) "Error: Failed to allocate zareoid(nblev)"
     595      write(*,*) "     nblev=",nblev
     596      stop
     597    endif
    528598    if (nblev.eq.1) then ! in case only one level is asked for
    529599      zareoid(nblev)=zamin
     
    533603      enddo
    534604    endif
    535   else ! above local surface
     605  else if (ztype.eq.3) then ! above local surface
    536606    ! set nblev to # of levels from input data files
    537607    nblev=altlength
    538     allocate(zsurface(nblev))
     608    allocate(zsurface(nblev),stat=ierr)
     609    if (ierr.ne.0) then
     610      write(*,*) "Error: Failed to allocate zsurface(nblev)"
     611      write(*,*) "     nblev=",nblev
     612      stop
     613    endif
    539614    ! build specific above local surface altitudes
    540615    call build_zs(nblev,have_sigma,sigma,aps,bps,zsurface)
     616  else ! distance to center of planet
     617   write(*,*) "Number of levels along vertical coordinate?"
     618    read(*,*) nblev
     619    allocate(zradius(nblev),stat=ierr)
     620    if (ierr.ne.0) then
     621      write(*,*) "Error: Failed to allocate zradius(nblev)"
     622      write(*,*) "     nblev=",nblev
     623      stop
     624    endif
     625    if (nblev.eq.1) then ! in case only one level is asked for
     626      zradius(nblev)=zamin
     627    else
     628      do i=1,nblev
     629        zradius(i)=zamin+(real(i)-1.0)*((zamax-zamin)/(real(nblev)-1.0))
     630      enddo
     631    endif
    541632  endif
    542633else ! auto_vert_levels=.false. ; user provides values
     
    546637  read(*,*) nblev
    547638  if (ztype.eq.1) then ! pressure coordinate
    548     allocate(plevel(nblev))
     639    allocate(plevel(nblev),stat=ierr)
     640    if (ierr.ne.0) then
     641      write(*,*) "Error: Failed to allocate plevel(nblev)"
     642      write(*,*) "     nblev=",nblev
     643      stop
     644    endif
    549645    write(*,*) "Enter Pressure (Pa) of levels, ordered"
    550646    write(*,*) " from max (near-surface) to min (top of atmosphere),"
     
    554650    enddo
    555651  else if (ztype.eq.2) then ! above areoid heights
    556     allocate(zareoid(nblev))
     652    allocate(zareoid(nblev),stat=ierr)
     653    if (ierr.ne.0) then
     654      write(*,*) "Error: Failed to allocate zareoid(nblev)"
     655      write(*,*) "     nblev=",nblev
     656      stop
     657    endif
    557658    write(*,*) "Enter altitude (m) above areoid of levels, ordered"
    558659    write(*,*) " from min to max (one value per line)"
     
    560661      read(*,*) zareoid(i)
    561662    enddo
    562   else ! above local surface
    563     allocate(zsurface(nblev))
     663  else if (ztype.eq.2) then ! above local surface
     664    allocate(zsurface(nblev),stat=ierr)
     665    if (ierr.ne.0) then
     666      write(*,*) "Error: Failed to allocate zsurface(nblev)"
     667      write(*,*) "     nblev=",nblev
     668      stop
     669    endif
    564670    write(*,*) "Enter altitude (m) above surface of levels, ordered"
    565671    write(*,*) " from min to max (one value per line)"
    566672    do i=1,nblev
    567673      read(*,*) zsurface(i)
     674    enddo
     675  else ! distance to center of planet
     676    allocate(zradius(nblev),stat=ierr)
     677    if (ierr.ne.0) then
     678      write(*,*) "Error: Failed to allocate zradius(nblev)"
     679      write(*,*) "     nblev=",nblev
     680      stop
     681    endif
     682    write(*,*) "Enter distance (m) to center of Mars of levels, ordered"
     683    write(*,*) " from min to max (one value per line)"
     684    do i=1,nblev
     685      read(*,*) zradius(i)
    568686    enddo
    569687  endif
     
    580698else if (ztype.eq.2) then ! above areoid coordinate
    581699  outfile=infile(1:len_trim(infile)-3)//"_A.nc"
    582 else ! above local surface
     700else if (ztype.eq.3) then ! above local surface
    583701  outfile=infile(1:len_trim(infile)-3)//"_S.nc"
     702else ! radial distance to center of Mars
     703  outfile=infile(1:len_trim(infile)-3)//"_R.nc"
    584704endif
    585705write(*,*) "Output file name is: "//trim(outfile)
     
    596716  stop "Error: Failed to get ps ID"
    597717else
    598   allocate(ps(lonlength,latlength,timelength))
     718  allocate(ps(lonlength,latlength,timelength),stat=ierr)
     719  if (ierr.ne.0) then
     720    write(*,*) "Error: Failed to allocate ps(lonlength,latlength,timelength)"
     721    write(*,*) "       lonlength=",lonlength," latlength=",latlength
     722    write(*,*) "       timelength=",timelength
     723    stop
     724  endif
    599725  ierr=NF_GET_VAR_REAL(infid,tmpvarid,ps)
    600726  if (ierr.ne.NF_NOERR) then
     
    606732! 2.1.2 Atmospheric pressure
    607733!===============================================================================
    608 allocate(press(lonlength,latlength,altlength,timelength))
     734allocate(press(lonlength,latlength,altlength,timelength),stat=ierr)
     735if (ierr.ne.0) then
     736  write(*,*) "Error: Failed to allocate press(lonlength,latlength,altlength,timelength)"
     737  write(*,*) "       lonlength=",lonlength," latlength=",latlength
     738  write(*,*) "       altlength=",altlength," timelength=",timelength
     739  stop
     740endif
    609741
    610742if (have_sigma) then ! sigma coordinate
     
    633765! 2.1.3 Atmospheric temperature
    634766!===============================================================================
    635 allocate(temp(lonlength,latlength,altlength,timelength))
     767allocate(temp(lonlength,latlength,altlength,timelength),stat=ierr)
     768if (ierr.ne.0) then
     769  write(*,*) "Error: Failed to allocate temp(lonlength,latlength,altlength,timelength)"
     770  write(*,*) "       lonlength=",lonlength," latlength=",latlength
     771  write(*,*) "       altlength=",altlength," timelength=",timelength
     772  stop
     773endif
    636774
    637775ierr=NF_INQ_VARID(infid,"temp",tmpvarid)
     
    665803else
    666804  have_rho=.true.
    667   allocate(rho(lonlength,latlength,altlength,timelength))
     805  allocate(rho(lonlength,latlength,altlength,timelength),stat=ierr)
     806  if (ierr.ne.0) then
     807    write(*,*) "Error: Failed to allocate rho(lonlength,latlength,altlength,timelength)"
     808    write(*,*) "       lonlength=",lonlength," latlength=",latlength
     809    write(*,*) "       altlength=",altlength," timelength=",timelength
     810    stop
     811  endif
    668812  ierr=NF_GET_VAR_REAL(infid,tmpvarid,rho)
    669813  if (ierr.ne.NF_NOERR) then
     
    678822if (have_rho) then
    679823  if (ztype.le.2) then ! above areoid altitudes (also needed for ztype=1)
    680     allocate(za_gcm(lonlength,latlength,altlength,timelength))
     824    allocate(za_gcm(lonlength,latlength,altlength,timelength),stat=ierr)
     825    if (ierr.ne.0) then
     826      write(*,*) "Error: Failed to allocate za_gcm(lonlength,latlength,altlength,timelength)"
     827      write(*,*) "       lonlength=",lonlength," latlength=",latlength
     828      write(*,*) "       altlength=",altlength," timelength=",timelength
     829      stop
     830    endif
    681831    call build_gcm_za(lonlength,latlength,altlength,timelength, &
    682832                      phisinit,ps,press,temp,rho,za_gcm)
    683   else ! above local surface altitudes
    684     allocate(zs_gcm(lonlength,latlength,altlength,timelength))
     833  else if (ztype.eq.3) then! above local surface altitudes
     834    allocate(zs_gcm(lonlength,latlength,altlength,timelength),stat=ierr)
     835    if (ierr.ne.0) then
     836      write(*,*) "Error: Failed to allocate zs_gcm(lonlength,latlength,altlength,timelength)"
     837      write(*,*) "       lonlength=",lonlength," latlength=",latlength
     838      write(*,*) "       altlength=",altlength," timelength=",timelength
     839      stop
     840    endif
    685841    call build_gcm_zs(lonlength,latlength,altlength,timelength, &
    686842                      phisinit,ps,press,temp,rho,zs_gcm)
     843  else ! radial distance to center of planet
     844    allocate(za_gcm(lonlength,latlength,altlength,timelength),stat=ierr)
     845    if (ierr.ne.0) then
     846      write(*,*) "Error: Failed to allocate za_gcm(lonlength,latlength,altlength,timelength)"
     847      write(*,*) "       lonlength=",lonlength," latlength=",latlength
     848      write(*,*) "       altlength=",altlength," timelength=",timelength
     849      stop
     850    endif
     851    allocate(ra_gcm(lonlength,latlength,altlength,timelength),stat=ierr)
     852    if (ierr.ne.0) then
     853      write(*,*) "Error: Failed to allocate ra_gcm(lonlength,latlength,altlength,timelength)"
     854      write(*,*) "       lonlength=",lonlength," latlength=",latlength
     855      write(*,*) "       altlength=",altlength," timelength=",timelength
     856      stop
     857    endif
     858    call build_gcm_za(lonlength,latlength,altlength,timelength, &
     859                      phisinit,ps,press,temp,rho,za_gcm)
     860    ! and now convert the altitudes above areoid to radial distances
     861    call build_gcm_ra(lonlength,latlength,altlength,timelength, &
     862                      lon,lat,za_gcm,ra_gcm)
     863   ! free za_gcm
     864   deallocate(za_gcm)
    687865  endif
    688866else
    689867  write(*,*)"Warning: Using constant R to integrate hydrostatic equation"
    690868  if (ztype.le.2) then ! above areoid altitudes (also needed for ztype=1)
    691     allocate(za_gcm(lonlength,latlength,altlength,timelength))
     869    allocate(za_gcm(lonlength,latlength,altlength,timelength),stat=ierr)
     870    if (ierr.ne.0) then
     871      write(*,*) "Error: Failed to allocate za_gcm(lonlength,latlength,altlength,timelength)"
     872      write(*,*) "       lonlength=",lonlength," latlength=",latlength
     873      write(*,*) "       altlength=",altlength," timelength=",timelength
     874      stop
     875    endif
    692876    call crude_gcm_za(lonlength,latlength,altlength,timelength, &
    693877                      phisinit,ps,press,temp,za_gcm)
    694   else ! above local surface altitudes
    695     allocate(zs_gcm(lonlength,latlength,altlength,timelength))
     878  else if (ztype.eq.3) then ! above local surface altitudes
     879    allocate(zs_gcm(lonlength,latlength,altlength,timelength),stat=ierr)
     880    if (ierr.ne.0) then
     881      write(*,*) "Error: Failed to allocate zs_gcm(lonlength,latlength,altlength,timelength)"
     882      write(*,*) "       lonlength=",lonlength," latlength=",latlength
     883      write(*,*) "       altlength=",altlength," timelength=",timelength
     884      stop
     885    endif
    696886    call crude_gcm_zs(lonlength,latlength,altlength,timelength, &
    697887                      phisinit,ps,press,temp,zs_gcm)
     888  else ! radial distance to center of planet
     889    allocate(za_gcm(lonlength,latlength,altlength,timelength),stat=ierr)
     890    if (ierr.ne.0) then
     891      write(*,*) "Error: Failed to allocate za_gcm(lonlength,latlength,altlength,timelength)"
     892      write(*,*) "       lonlength=",lonlength," latlength=",latlength
     893      write(*,*) "       altlength=",altlength," timelength=",timelength
     894      stop
     895    endif
     896    allocate(ra_gcm(lonlength,latlength,altlength,timelength),stat=ierr)
     897    if (ierr.ne.0) then
     898      write(*,*) "Error: Failed to allocate ra_gcm(lonlength,latlength,altlength,timelength)"
     899      write(*,*) "       lonlength=",lonlength," latlength=",latlength
     900      write(*,*) "       altlength=",altlength," timelength=",timelength
     901      stop
     902    endif
     903    call crude_gcm_za(lonlength,latlength,altlength,timelength, &
     904                      phisinit,ps,press,temp,za_gcm)
     905    ! and now convert the altitudes above areoid to radial distances
     906    call build_gcm_ra(lonlength,latlength,altlength,timelength, &
     907                      lon,lat,za_gcm,ra_gcm)
     908   ! free za_gcm
     909   deallocate(za_gcm)
    698910  endif
    699 endif
     911endif ! of if (have_rho)
    700912
    701913!===============================================================================
     
    711923if (ierr.ne.NF_NOERR) then
    712924  write(*,*)"Error: could not create file ",outfile
     925  write(*,*) NF_STRERROR(ierr)
    713926  stop
    714927endif
     
    720933ierr=NF_DEF_DIM(outfid,"longitude",lonlength,lon_dimid)
    721934if (ierr.ne.NF_NOERR) then
    722   stop "Error: Could not define longitude dimension"
     935  write(*,*) "Error: Could not define longitude dimension"
     936  write(*,*) NF_STRERROR(ierr)
     937  stop
    723938endif
    724939
     
    726941ierr=NF_DEF_DIM(outfid,"latitude",latlength,lat_dimid)
    727942if (ierr.ne.NF_NOERR) then
    728   stop "Error: Could not define latitude dimension"
     943  write(*,*) "Error: Could not define latitude dimension"
     944  write(*,*) NF_STRERROR(ierr)
     945  stop
    729946endif
    730947
     
    732949ierr=NF_DEF_DIM(outfid,"altitude",nblev,alt_dimid)
    733950if (ierr.ne.NF_NOERR) then
    734   stop "Error: Could not define altitude dimension"
     951  write(*,*) "Error: Could not define altitude dimension"
     952  write(*,*) NF_STRERROR(ierr)
     953  stop
    735954endif
    736955
     
    738957ierr=NF_DEF_DIM(outfid,"Time",timelength,time_dimid)
    739958if (ierr.ne.NF_NOERR) then
    740   stop "Error: Could not define latitude dimension"
     959  write(*,*) "Error: Could not define Time dimension"
     960  write(*,*) NF_STRERROR(ierr)
     961  stop
    741962endif
    742963
     
    744965ierr=NF_DEF_DIM(outfid,"GCM_layers",altlength,gcm_layers_dimid)
    745966if (ierr.ne.NF_NOERR) then
    746   stop "Error: Could not define GCM_layers dimension"
     967  write(*,*) "Error: Could not define GCM_layers dimension"
     968  write(*,*) NF_STRERROR(ierr)
     969  stop
    747970endif
    748971
     
    758981ierr=NF_DEF_VAR(outfid,"longitude",NF_REAL,1,datashape(1),lon_varid)
    759982if (ierr.ne.NF_NOERR) then
    760   stop "Error: Could not define longitude variable"
     983  write(*,*) "Error: Could not define longitude variable"
     984  write(*,*) NF_STRERROR(ierr)
     985  stop
    761986endif
    762987
     
    7771002ierr=NF_DEF_VAR(outfid,"latitude",NF_REAL,1,datashape(2),lat_varid)
    7781003if (ierr.ne.NF_NOERR) then
    779   stop "Error: Could not define latitude variable"
     1004  write(*,*) "Error: Could not define latitude variable"
     1005  write(*,*) NF_STRERROR(ierr)
     1006  stop
    7801007endif
    7811008
     
    7961023ierr=NF_DEF_VAR(outfid,"altitude",NF_REAL,1,datashape(3),alt_varid)
    7971024if (ierr.ne.NF_NOERR) then
    798   stop "Error: Could not define altitude variable"
     1025  write(*,*) "Error: Could not define altitude variable"
     1026  write(*,*) NF_STRERROR(ierr)
     1027  stop
    7991028endif
    8001029
     
    8321061    stop "Error: Problem writing positive for altitude"
    8331062  endif
    834 else ! above surface vertical coordinate
     1063else if (ztype.eq.3) then ! above surface vertical coordinate
    8351064  text='Altitude above local surface'
    8361065  ierr=NF_PUT_ATT_TEXT(outfid,alt_varid,'long_name',len_trim(text),text)
     
    8481077    stop "Error: Problem writing positive for altitude"
    8491078  endif
     1079else ! radial distance to center of planet
     1080  text='Distance to center of Mars'
     1081  ierr=NF_PUT_ATT_TEXT(outfid,alt_varid,'long_name',len_trim(text),text)
     1082  if (ierr.ne.NF_NOERR) then
     1083    stop "Error: Problem writing long_name for altitude"
     1084  endif
     1085  text='m'
     1086  ierr=NF_PUT_ATT_TEXT(outfid,alt_varid,'units',len_trim(text),text)
     1087  if (ierr.ne.NF_NOERR) then
     1088    stop "Error: Problem writing units for altitude"
     1089  endif
     1090  text='up'
     1091  ierr=NF_PUT_ATT_TEXT(outfid,alt_varid,'positive',len_trim(text),text)
     1092  if (ierr.ne.NF_NOERR) then
     1093    stop "Error: Problem writing positive for altitude"
     1094  endif
    8501095endif ! of if (have_sigma)
    8511096
     
    8571102  ierr=NF_DEF_VAR(outfid,"sigma",NF_REAL,1,gcm_layers_dimid,sigma_varid)
    8581103  if (ierr.ne.NF_NOERR) then
    859     stop "Error: Could not define sigma variable"
     1104    write(*,*) "Error: Could not define sigma variable"
     1105    write(*,*) NF_STRERROR(ierr)
     1106    stop
    8601107  endif
    8611108else ! hybrid coordinates
    8621109  ierr=NF_DEF_VAR(outfid,"aps",NF_REAL,1,gcm_layers_dimid,aps_varid)
    8631110  if (ierr.ne.NF_NOERR) then
    864     stop "Error: Could not define aps variable"
     1111    write(*,*) "Error: Could not define aps variable"
     1112    write(*,*) NF_STRERROR(ierr)
     1113    stop
    8651114  endif
    8661115  ierr=NF_DEF_VAR(outfid,"bps",NF_REAL,1,gcm_layers_dimid,bps_varid)
    8671116  if (ierr.ne.NF_NOERR) then
    868     stop "Error: Could not define bps variable"
     1117    write(*,*) "Error: Could not define bps variable"
     1118    write(*,*) NF_STRERROR(ierr)
     1119    stop
    8691120  endif
    8701121endif
     
    8941145ierr=NF_DEF_VAR(outfid,"Time",NF_REAL,1,datashape(4),time_varid)
    8951146if (ierr.ne.NF_NOERR) then
    896   stop "Error: Could not define Time variable"
     1147  write(*,*) "Error: Could not define Time variable"
     1148  write(*,*) NF_STRERROR(ierr)
     1149  stop
    8971150endif
    8981151
     
    9171170ierr=NF_DEF_VAR(outfid,"ps",NF_REAL,3,surfdatashape,ps_varid)
    9181171if (ierr.ne.NF_NOERR) then
    919   stop "Error: Could not define ps variable"
     1172  write(*,*) "Error: Could not define ps variable"
     1173  write(*,*) NF_STRERROR(ierr)
     1174  stop
    9201175endif
    9211176
     
    9391194  ierr=NF_DEF_VAR(outfid,"zareoid",NF_REAL,4,datashape,za_varid)
    9401195  if (ierr.ne.NF_NOERR) then
    941     stop "Error: Could not define zareoid variable"
     1196    write(*,*) "Error: Could not define zareoid variable"
     1197    write(*,*) NF_STRERROR(ierr)
     1198    stop
    9421199  endif
    9431200  ! zareoid attributes
     
    9611218  ierr=NF_DEF_VAR(outfid,"pressure",NF_REAL,4,datashape,p_varid)
    9621219  if (ierr.ne.NF_NOERR) then
    963     stop "Error: Could not define pressure variable"
     1220    write(*,*) "Error: Could not define pressure variable"
     1221    write(*,*) NF_STRERROR(ierr)
     1222    stop
    9641223  endif
    9651224  ! pressure attributes
     
    9861245
    9871246! variables requested by user
    988 allocate(var_id(nbvar))
     1247allocate(var_id(nbvar),stat=ierr)
     1248if (ierr.ne.0) then
     1249  write(*,*) "Error: Failed to allocate var_id(nbvar)"
     1250  write(*,*) "       nbvar=",nbvar
     1251  stop
     1252endif
    9891253do i=1,nbvar
    9901254  write(*,*) ""
     
    9941258  if (ierr.ne.NF_NOERR) then
    9951259    write(*,*) 'Error, could not define variable ',trim(var(i))
    996     stop ""
     1260    write(*,*) NF_STRERROR(ierr)
     1261    stop
    9971262  endif
    9981263
     
    10021267  if (ierr.ne.NF_NOERR) then
    10031268    write(*,*) 'Error, failed to get ID for variable ',trim(var(i))
    1004     stop ""
     1269    write(*,*) NF_STRERROR(ierr)
     1270    stop
    10051271  endif
    10061272  ierr=NF_INQ_VARNATTS(infid,tmpvarid,nbattr)
     
    10081274    write(*,*) 'Error, could not get number of attributes for variable ',&
    10091275               trim(var(i))
    1010     stop ""
     1276    write(*,*) NF_STRERROR(ierr)
     1277    stop
    10111278  endif
    10121279  ! inititialize j == number of attributes written to output
     
    10991366ierr=NF_ENDDEF(outfid)
    11001367if (ierr.ne.NF_NOERR) then
    1101   stop "Error: Could not switch out of define mode"
     1368  write(*,*) "Error: Could not switch out of define mode"
     1369  write(*,*) NF_STRERROR(ierr)
     1370  stop
    11021371endif
    11031372
     
    11051374ierr=NF_PUT_VAR_REAL(outfid,lon_varid,lon)
    11061375if (ierr.ne.NF_NOERR) then
    1107   stop "Error: Could not write longitude data to output file"
     1376  write(*,*) "Error: Could not write longitude data to output file"
     1377  write(*,*) NF_STRERROR(ierr)
     1378  stop
    11081379endif
    11091380
     
    11111382ierr=NF_PUT_VAR_REAL(outfid,lat_varid,lat)
    11121383if (ierr.ne.NF_NOERR) then
    1113   stop "Error: Could not write latitude data to output file"
     1384  write(*,*) "Error: Could not write latitude data to output file"
     1385  write(*,*) NF_STRERROR(ierr)
     1386  stop
    11141387endif
    11151388
     
    11181391  ierr=NF_PUT_VAR_REAL(outfid,alt_varid,plevel)
    11191392  if (ierr.ne.NF_NOERR) then
    1120     stop "Error: Could not write altitude data to output file"
     1393    write(*,*) "Error: Could not write altitude data to output file"
     1394    write(*,*) NF_STRERROR(ierr)
     1395    stop
    11211396  endif
    11221397else if (ztype.eq.2) then ! above areoid altitude
    11231398  ierr=NF_PUT_VAR_REAL(outfid,alt_varid,zareoid)
    11241399  if (ierr.ne.NF_NOERR) then
    1125     stop "Error: Could not write altitude data to output file"
     1400    write(*,*) "Error: Could not write altitude data to output file"
     1401    write(*,*) NF_STRERROR(ierr)
     1402    stop
    11261403  endif
    1127 else ! above local surface
     1404else if (ztype.eq.3) then ! above local surface
    11281405  ierr=NF_PUT_VAR_REAL(outfid,alt_varid,zsurface)
    11291406  if (ierr.ne.NF_NOERR) then
    1130     stop "Error: Could not write altitude data to output file"
     1407    write(*,*) "Error: Could not write altitude data to output file"
     1408    write(*,*) NF_STRERROR(ierr)
     1409    stop
     1410  endif
     1411else ! radial distance to center of Mars
     1412  ierr=NF_PUT_VAR_REAL(outfid,alt_varid,zradius)
     1413  if (ierr.ne.NF_NOERR) then
     1414    write(*,*) "Error: Could not write altitude data to output file"
     1415    write(*,*) NF_STRERROR(ierr)
     1416    stop
    11311417  endif
    11321418endif
     
    11361422  ierr=NF_PUT_VAR_REAL(outfid,sigma_varid,sigma)
    11371423  if (ierr.ne.NF_NOERR) then
    1138     stop "Error: Could not write sigma data to output file"
     1424    write(*,*) "Error: Could not write sigma data to output file"
     1425    write(*,*) NF_STRERROR(ierr)
     1426    stop
    11391427  endif
    11401428else ! hybrid coordinates
    11411429  ierr=NF_PUT_VAR_REAL(outfid,aps_varid,aps)
    11421430  if (ierr.ne.NF_NOERR) then
    1143     stop "Error: Could not write aps data to output file"
     1431    write(*,*) "Error: Could not write aps data to output file"
     1432    write(*,*) NF_STRERROR(ierr)
     1433    stop
    11441434  endif
    11451435  ierr=NF_PUT_VAR_REAL(outfid,bps_varid,bps)
    11461436  if (ierr.ne.NF_NOERR) then
    1147     stop "Error: Could not write bps data to output file"
     1437    write(*,*) "Error: Could not write bps data to output file"
     1438    write(*,*) NF_STRERROR(ierr)
     1439    stop
    11481440  endif
    11491441endif
     
    11521444ierr=NF_PUT_VAR_REAL(outfid,time_varid,time)
    11531445if (ierr.ne.NF_NOERR) then
    1154   stop "Error: Could not write Time data to output file"
     1446  write(*,*) "Error: Could not write Time data to output file"
     1447  write(*,*) NF_STRERROR(ierr)
     1448  stop
    11551449endif
    11561450
     
    11631457ierr=NF_PUT_VAR_REAL(outfid,ps_varid,ps)
    11641458if (ierr.ne.NF_NOERR) then
    1165   stop "Error: Could not write ps data to output file"
     1459  write(*,*) "Error: Could not write ps data to output file"
     1460  write(*,*) NF_STRERROR(ierr)
     1461  stop
    11661462endif
    11671463
     
    11721468! 4.0 Allocations
    11731469!indata() to store input (on GCM grid) data
    1174 allocate(indata(lonlength,latlength,altlength,timelength))
     1470allocate(indata(lonlength,latlength,altlength,timelength),stat=ierr)
     1471if (ierr.ne.0) then
     1472  write(*,*) "Error: Failed to allocate indata(lonlength,latlength,altlength,timelength)"
     1473  write(*,*) "       lonlength=",lonlength," latlength=",latlength
     1474  write(*,*) "       altlength=",altlength," timelength=",timelength
     1475  stop
     1476endif
    11751477! outdata() to store output (on new vertical grid) data
    1176 allocate(outdata(lonlength,latlength,nblev,timelength))
     1478allocate(outdata(lonlength,latlength,nblev,timelength),stat=ierr)
     1479if (ierr.ne.0) then
     1480  write(*,*) "Error: Failed to allocate outdata(lonlength,latlength,nblev,timelength)"
     1481  write(*,*) "       lonlength=",lonlength," latlength=",latlength
     1482  write(*,*) "       nblev=",nblev," timelength=",timelength
     1483  stop
     1484endif
    11771485
    11781486! 4.1 If output is in pressure coordinate
     
    11991507  if (ierr.ne.NF_NOERR) then
    12001508    write(*,*)'Error, Failed to write variable ',var(i)
     1509    write(*,*) NF_STRERROR(ierr)
    12011510    stop
    12021511  endif
     
    12101519  ierr=NF_PUT_VAR_REAL(outfid,za_varid,outdata)
    12111520  if (ierr.ne.NF_NOERR) then
    1212     stop "Error, Failed to write zareoid to output file"
     1521    write(*,*) "Error, Failed to write zareoid to output file"
     1522    write(*,*) NF_STRERROR(ierr)
     1523    stop
    12131524  endif
    12141525endif ! of if (ztype.eq.1)
     
    12441555  if (ierr.ne.NF_NOERR) then
    12451556    write(*,*)'Error, Failed to write variable ',var(i)
     1557    write(*,*) NF_STRERROR(ierr)
    12461558    stop
    12471559  endif
     
    12581570  ierr=NF_PUT_VAR_REAL(outfid,p_varid,outdata)
    12591571  if (ierr.ne.NF_NOERR) then
    1260     stop "Error, Failed to write pressure to output file"
     1572    write(*,*) "Error, Failed to write pressure to output file"
     1573    write(*,*) NF_STRERROR(ierr)
     1574    stop
    12611575  endif
    12621576endif ! of if (ztype.eq.2)
     
    12951609    if (ierr.ne.NF_NOERR) then
    12961610      write(*,*)'Error, Failed to write variable ',var(i)
     1611      write(*,*) NF_STRERROR(ierr)
    12971612      stop
    12981613    endif
     
    13091624  ierr=NF_PUT_VAR_REAL(outfid,p_varid,outdata)
    13101625  if (ierr.ne.NF_NOERR) then
    1311     stop "Error, Failed to write pressure to output file"
     1626    write(*,*) "Error, Failed to write pressure to output file"
     1627    write(*,*) NF_STRERROR(ierr)
     1628    stop
    13121629  endif
    13131630
    13141631endif ! of if (ztype.eq.3)
    13151632
    1316 ! 4.4 Close output file
     1633! 4.4 If output is in radial distance to center of planet
     1634if (ztype.eq.4) then
     1635  do i=1,nbvar ! loop on 4D variable to process
     1636  ! identify and read a dataset
     1637  ierr=NF_INQ_VARID(infid,var(i),tmpvarid)
     1638  if (ierr.ne.NF_NOERR) then
     1639    write(*,*) 'Error, failed to get ID for variable ',var(i)
     1640    stop
     1641  endif
     1642  ierr=NF_GET_VAR_REAL(infid,tmpvarid,indata)
     1643  if (ierr.ne.NF_NOERR) then
     1644    write(*,*) 'Error, failed to load variable ',var(i)
     1645    stop
     1646  endif
     1647 
     1648  ! interpolate dataset onto new grid
     1649  ! check if variable is "rho" (to set flag for interpolation below)
     1650  if (var(i).eq.'rho') then
     1651    j=1
     1652  else
     1653    j=0
     1654  endif
     1655 
     1656  call z_coord_interp(lonlength,latlength,altlength,timelength,nblev, &
     1657                      miss_val,ra_gcm,indata,j,zradius,outdata)
     1658
     1659  ! write new dataset to output file
     1660  ierr=NF_PUT_VAR_REAL(outfid,var_id(i),outdata)
     1661  if (ierr.ne.NF_NOERR) then
     1662    write(*,*)'Error, Failed to write variable ',var(i)
     1663    write(*,*) NF_STRERROR(ierr)
     1664    stop
     1665  endif
     1666
     1667  enddo ! of do i=1,nbvar
     1668 
     1669  ! interpolate pressure onto new grid
     1670  write(*,*) ""
     1671  write(*,*) "Processing pressure"
     1672  call z_coord_interp(lonlength,latlength,altlength,timelength,nblev, &
     1673                      miss_val,ra_gcm,press,1,zradius,outdata)
     1674
     1675  ! write result to output file
     1676  ierr=NF_PUT_VAR_REAL(outfid,p_varid,outdata)
     1677  if (ierr.ne.NF_NOERR) then
     1678    write(*,*) "Error, Failed to write pressure to output file"
     1679    write(*,*) NF_STRERROR(ierr)
     1680    stop
     1681  endif
     1682endif ! of if (ztype.eq.4)
     1683
     1684! 4.5 Close output file
    13171685ierr=NF_CLOSE(outfid)
    13181686if (ierr.ne.NF_NOERR) then
    13191687  write(*,*) 'Error, failed to close output file ',outfile
     1688  write(*,*) NF_STRERROR(ierr)
    13201689endif
    13211690
     
    22382607
    22392608end subroutine interpolf
     2609
     2610!===============================================================================
     2611
     2612subroutine build_gcm_ra(lonlength,latlength,altlength,timelength, &
     2613                         lon,lat,za_gcm,ra_gcm)
     2614!==============================================================================
     2615! Purpose:  Build, from the "above areoid altitudes" of GCM levels,
     2616!           the corresponding "radial distance to center of Mars" values
     2617!==============================================================================
     2618implicit none
     2619!==============================================================================
     2620! Arguments:
     2621!==============================================================================
     2622integer,intent(in) :: lonlength ! # of points along longitude
     2623integer,intent(in) :: latlength ! # of points along latitude
     2624integer,intent(in) :: altlength ! # of points along altitude
     2625integer,intent(in) :: timelength ! # of stored time steps
     2626real,intent(in) :: lon(lonlength) ! GCM longitudes
     2627real,intent(in) :: lat(latlength) ! GCM latitudes
     2628!za_gcm: above areoid altitudes of GCM levels
     2629real,intent(in) :: za_gcm(lonlength,latlength,altlength,timelength)
     2630!ra_gcm: radial distance to center of planet of GCM levels
     2631real,intent(out) :: ra_gcm(lonlength,latlength,altlength,timelength)
     2632
     2633!===============================================================================
     2634! Local variables:
     2635!===============================================================================
     2636real :: rareoid(lonlength,latlength) ! radial position (ie: distance to the
     2637! center of Mars) of the reference areoid for GCM longitudes and latitudes
     2638integer :: iloop,jloop,kloop,tloop
     2639double precision :: dlon,dlat,dareoid ! double precision temp variables
     2640
     2641! common data shared with 'areoid_ini' and 'geoid' routines
     2642integer,parameter :: ndeg=90,ndeg2=2*ndeg,nd2p3=ndeg2+3
     2643! data structure of gravity field
     2644        double precision v0,omega,ae,gm
     2645        double precision clm(0:ndeg,0:ndeg),slm(0:ndeg,0:ndeg)
     2646        common /gmm1/v0,omega,ae,gm,clm,slm
     2647        integer lmin,lmax
     2648        double precision root(nd2p3)
     2649        double precision requator
     2650        common /sqr/ lmin,lmax,root,requator
     2651
     2652!===============================================================================
     2653! 1. Various initialisations
     2654!===============================================================================
     2655! initalize coefficients of areoid model
     2656call areoid_ini()
     2657
     2658! compute rareoid for GCM longitude/latitude grid
     2659do iloop=1,lonlength
     2660 dlon=lon(iloop) ! double precision version of lon
     2661 do jloop=1,latlength
     2662   dlat=lat(jloop) ! double precision version of lat
     2663   call geoid(dlon,dlat,dareoid)
     2664   rareoid(iloop,jloop)=dareoid
     2665 enddo
     2666enddo
     2667
     2668!===============================================================================
     2669! 1. Compute ra_gcm
     2670!===============================================================================
     2671!!! test:
     2672!rareoid(:,:)=0
     2673
     2674do tloop=1,timelength
     2675  do kloop=1,altlength
     2676    ra_gcm(:,:,kloop,tloop)=za_gcm(:,:,kloop,tloop)+rareoid(:,:)
     2677  enddo
     2678enddo
     2679
     2680end subroutine build_gcm_ra
     2681
     2682
     2683
     2684!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
     2685! Routines corresponding to Lemoine et al. 2001 implementation.
     2686! Based on "areoid.f" program by G. Neumann, which is available at
     2687! ftp://ltpftp.gsfc.nasa.gov/projects/tharsis/MOLA/SOFTWARE/
     2688! uses the gravity field coefficients file 'mgm1025' available in
     2689! the same ftp directory
     2690!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
     2691
     2692subroutine areoid_ini()
     2693implicit none
     2694!character(len=250) :: mgm="/u/emlmd/MCD_v4.3/data/mgm1025"
     2695
     2696!character(len=64) :: title ! first line of file
     2697!character(len=6) :: gcoef
     2698! data structure of gravity field
     2699         integer ndeg,ndeg2,nd2p3
     2700          parameter (ndeg=90,ndeg2=2*ndeg,nd2p3=ndeg2+3)
     2701          double precision c(0:ndeg,0:ndeg),s(0:ndeg,0:ndeg)
     2702          double precision  v0,omega,ae,gm !,clm,slm
     2703          double precision  plm(ndeg)
     2704          common /gmm1/ v0,omega,ae,gm,c,s
     2705          integer lmin,lmax
     2706          double precision root(nd2p3)
     2707          double precision r
     2708          common /sqr/ lmin,lmax, root,r
     2709!
     2710!        integer lcmax,mmax
     2711        integer k,l,m
     2712!        double precision coef
     2713        double precision x,xi,sum
     2714       
     2715          ae= 3396000.d0
     2716          gm =42828.37d9
     2717          omega=0.70882181d-4
     2718! this value makes the equatorial mean radius equal to 3396 km.
     2719        do k=1,nd2p3
     2720         root(k)=sqrt(dble(k))
     2721        enddo
     2722!  initialize coefficients c and s
     2723c(:,:)=0
     2724s(:,:)=0
     2725
     2726! fill in the values of c() and s() (extracted from mgm1025 file)
     2727c( 2, 0)=   -0.87450441550858D-03
     2728c( 3, 0)=   -0.11889205541698D-04
     2729c( 4, 0)=    0.51231389950069D-05
     2730c( 5, 0)=   -0.17246183479555D-05
     2731c( 6, 0)=    0.13442413561338D-05
     2732c( 7, 0)=    0.10568085417745D-05
     2733c( 8, 0)=    0.14344394468535D-06
     2734c( 9, 0)=   -0.28623030841535D-06
     2735c(10, 0)=    0.72517371380309D-06
     2736c(11, 0)=   -0.26515503657960D-06
     2737c(12, 0)=    0.25791004374137D-06
     2738c(13, 0)=   -0.48987732989967D-06
     2739c(14, 0)=    0.30149567154029D-06
     2740c(15, 0)=    0.49309755579596D-06
     2741c(16, 0)=    0.62303904221200D-06
     2742c(17, 0)=   -0.53940568680542D-07
     2743c(18, 0)=   -0.31286409396935D-06
     2744c(19, 0)=    0.66506982323697D-08
     2745c(20, 0)=    0.29800506646171D-06
     2746c(21, 0)=    0.12382554869535D-06
     2747c(22, 0)=   -0.11079454891980D-06
     2748c(23, 0)=    0.46651763615791D-07
     2749c(24, 0)=    0.26561879988827D-06
     2750c(25, 0)=   -0.14012911779311D-06
     2751c(26, 0)=   -0.17890980799686D-06
     2752c(27, 0)=   -0.22473934735542D-06
     2753c(28, 0)=    0.35017911372558D-07
     2754c(29, 0)=    0.96416933029589D-07
     2755c(30, 0)=    0.13454167912854D-07
     2756c(31, 0)=    0.11415389076391D-06
     2757c(32, 0)=    0.14309722973488D-06
     2758c(33, 0)=   -0.93613803420433D-07
     2759c(34, 0)=   -0.11634597651051D-06
     2760c(35, 0)=    0.17390073509388D-07
     2761c(36, 0)=    0.17980990446829D-06
     2762c(37, 0)=   -0.58813753768476D-07
     2763c(38, 0)=   -0.15639701438663D-06
     2764c(39, 0)=    0.67338858450205D-07
     2765c(40, 0)=    0.10015015531020D-06
     2766c(41, 0)=    0.65659089401047D-07
     2767c(42, 0)=   -0.32828754909310D-07
     2768c(43, 0)=    0.55320735747522D-07
     2769c(44, 0)=    0.10719796171993D-06
     2770c(45, 0)=   -0.24466821475646D-07
     2771c(46, 0)=    0.53066022003621D-07
     2772c(47, 0)=    0.18183459032733D-08
     2773c(48, 0)=   -0.90336249640171D-07
     2774c(49, 0)=    0.10172719809900D-07
     2775c(50, 0)=    0.14157647949966D-06
     2776c(51, 0)=   -0.13459597844273D-07
     2777c(52, 0)=   -0.10770557778749D-06
     2778c(53, 0)=    0.41656444281046D-07
     2779c(54, 0)=    0.23491811928996D-07
     2780c(55, 0)=    0.39514870435300D-07
     2781c(56, 0)=    0.17750185036483D-07
     2782c(57, 0)=   -0.16389790284882D-07
     2783c(58, 0)=    0.15924966924563D-07
     2784c(59, 0)=   -0.52269191539423D-07
     2785c(60, 0)=    0.22651535424788D-07
     2786c(61, 0)=   -0.22088875934791D-07
     2787c(62, 0)=   -0.89365975311230D-07
     2788c(63, 0)=   -0.22314891242664D-06
     2789c(64, 0)=   -0.10126090956466D-06
     2790c(65, 0)=    0.53472579669405D-07
     2791c(66, 0)=   -0.79239790651784D-07
     2792c(67, 0)=   -0.93403592836398D-07
     2793c(68, 0)=   -0.92958885757065D-07
     2794c(69, 0)=   -0.23268566991842D-06
     2795c(70, 0)=   -0.61104272230081D-07
     2796c(71, 0)=   -0.15227130308936D-06
     2797c(72, 0)=    0.44022260088073D-07
     2798c(73, 0)=   -0.18296622662986D-06
     2799c(74, 0)=   -0.21563284613746D-07
     2800c(75, 0)=   -0.14408830353913D-06
     2801c(76, 0)=   -0.31971691137664D-07
     2802c(77, 0)=   -0.96143919013694D-07
     2803c(78, 0)=   -0.14039664820363D-07
     2804c(79, 0)=   -0.56173045626134D-07
     2805c(80, 0)=   -0.42587385931103D-07
     2806c( 2, 1)=    0.94588820913966D-10
     2807c( 3, 1)=    0.38007291643504D-05
     2808c( 4, 1)=    0.42113282449449D-05
     2809c( 5, 1)=    0.48295248273193D-06
     2810c( 6, 1)=    0.17989300452431D-05
     2811c( 7, 1)=    0.13721377780493D-05
     2812c( 8, 1)=   -0.13172502269848D-06
     2813c( 9, 1)=    0.41968715869939D-06
     2814c(10, 1)=    0.92089843305934D-06
     2815c(11, 1)=   -0.81438583356007D-06
     2816c(12, 1)=   -0.11226169861948D-05
     2817c(13, 1)=   -0.56756560374700D-06
     2818c(14, 1)=    0.75140494090486D-06
     2819c(15, 1)=    0.23398249720387D-06
     2820c(16, 1)=   -0.23315134603590D-06
     2821c(17, 1)=   -0.37162884465144D-06
     2822c(18, 1)=   -0.18094168688736D-06
     2823c(19, 1)=    0.46181639714625D-07
     2824c(20, 1)=    0.18344606355547D-06
     2825c(21, 1)=   -0.14791536512739D-06
     2826c(22, 1)=   -0.40126140681542D-06
     2827c(23, 1)=    0.24408804946295D-06
     2828c(24, 1)=    0.18984659529516D-06
     2829c(25, 1)=   -0.77644847446303D-07
     2830c(26, 1)=   -0.18954371508813D-06
     2831c(27, 1)=    0.58215212507928D-07
     2832c(28, 1)=    0.15662107285173D-06
     2833c(29, 1)=    0.69848912908713D-07
     2834c(30, 1)=   -0.14594550925334D-06
     2835c(31, 1)=   -0.60978169516080D-07
     2836c(32, 1)=   -0.69857883539046D-07
     2837c(33, 1)=   -0.40910599890025D-07
     2838c(34, 1)=    0.69727112840257D-07
     2839c(35, 1)=    0.69051821175597D-07
     2840c(36, 1)=   -0.89123393751658D-07
     2841c(37, 1)=   -0.10308616478520D-06
     2842c(38, 1)=   -0.17953527802480D-07
     2843c(39, 1)=    0.13357163900313D-06
     2844c(40, 1)=    0.32997141656491D-07
     2845c(41, 1)=   -0.42770439863940D-07
     2846c(42, 1)=   -0.33815214882692D-07
     2847c(43, 1)=    0.10228125797069D-06
     2848c(44, 1)=    0.83199427365936D-07
     2849c(45, 1)=   -0.26716533044488D-08
     2850c(46, 1)=   -0.21968332747552D-07
     2851c(47, 1)=    0.26051927992496D-07
     2852c(48, 1)=   -0.20011329156204D-07
     2853c(49, 1)=   -0.46000606601472D-07
     2854c(50, 1)=   -0.50465401285307D-08
     2855c(51, 1)=   -0.21435559836597D-07
     2856c(52, 1)=   -0.79586940432080D-07
     2857c(53, 1)=   -0.21721909216360D-08
     2858c(54, 1)=    0.11211857004569D-07
     2859c(55, 1)=   -0.14572008323947D-07
     2860c(56, 1)=   -0.76165251339758D-07
     2861c(57, 1)=   -0.33685497326864D-07
     2862c(58, 1)=    0.29095996986081D-07
     2863c(59, 1)=    0.11183726327720D-07
     2864c(60, 1)=   -0.29984787445527D-07
     2865c(61, 1)=    0.32521236160127D-07
     2866c(62, 1)=    0.81714334232117D-08
     2867c(63, 1)=   -0.44106457563710D-08
     2868c(64, 1)=   -0.11522745649087D-07
     2869c(65, 1)=    0.24452822525910D-07
     2870c(66, 1)=    0.39582110377419D-08
     2871c(67, 1)=   -0.16048574963929D-07
     2872c(68, 1)=   -0.10635293597363D-08
     2873c(69, 1)=   -0.25348757056472D-08
     2874c(70, 1)=   -0.13990070916062D-07
     2875c(71, 1)=   -0.21113532040349D-07
     2876c(72, 1)=    0.21388767403742D-07
     2877c(73, 1)=   -0.45295107975469D-07
     2878c(74, 1)=    0.11061952017768D-08
     2879c(75, 1)=   -0.20070701321975D-07
     2880c(76, 1)=   -0.81623263977223D-08
     2881c(77, 1)=   -0.48608889440242D-08
     2882c(78, 1)=    0.48605157923197D-08
     2883c(79, 1)=   -0.72265799247382D-08
     2884c(80, 1)=    0.12959728064204D-07
     2885c( 2, 2)=   -0.84585751018071D-04
     2886c( 3, 2)=   -0.15933741663502D-04
     2887c( 4, 2)=   -0.95107786023564D-06
     2888c( 5, 2)=   -0.42918839549229D-05
     2889c( 6, 2)=    0.85990806408567D-06
     2890c( 7, 2)=    0.28084893201890D-05
     2891c( 8, 2)=    0.18057628945403D-05
     2892c( 9, 2)=    0.11356212264308D-05
     2893c(10, 2)=    0.73405458338506D-08
     2894c(11, 2)=   -0.31264422685096D-06
     2895c(12, 2)=   -0.97454248928457D-07
     2896c(13, 2)=    0.19140550616679D-06
     2897c(14, 2)=    0.44883687385942D-06
     2898c(15, 2)=   -0.35213615909880D-06
     2899c(16, 2)=   -0.48079087360350D-06
     2900c(17, 2)=   -0.20190086133281D-06
     2901c(18, 2)=   -0.10432508924443D-06
     2902c(19, 2)=   -0.52238899978893D-07
     2903c(20, 2)=    0.69247343387462D-07
     2904c(21, 2)=   -0.93994254289733D-07
     2905c(22, 2)=    0.10295574560935D-06
     2906c(23, 2)=    0.19547803118600D-06
     2907c(24, 2)=    0.19407504646311D-07
     2908c(25, 2)=   -0.17219187149635D-06
     2909c(26, 2)=   -0.20135410709838D-06
     2910c(27, 2)=   -0.28273103642271D-08
     2911c(28, 2)=    0.30690987897186D-06
     2912c(29, 2)=    0.79628272547828D-07
     2913c(30, 2)=   -0.18900571342100D-06
     2914c(31, 2)=    0.83337491764168D-07
     2915c(32, 2)=    0.13315305225107D-06
     2916c(33, 2)=    0.58675965618782D-07
     2917c(34, 2)=   -0.10511750363253D-06
     2918c(35, 2)=   -0.41561363195631D-07
     2919c(36, 2)=    0.10803644254118D-06
     2920c(37, 2)=    0.57900788447265D-07
     2921c(38, 2)=   -0.10674339261125D-07
     2922c(39, 2)=    0.10267822284623D-08
     2923c(40, 2)=   -0.39409739046749D-07
     2924c(41, 2)=    0.48560442200681D-07
     2925c(42, 2)=    0.44295705013232D-08
     2926c(43, 2)=   -0.23863651808965D-07
     2927c(44, 2)=   -0.40529365741889D-07
     2928c(45, 2)=   -0.72544669649420D-07
     2929c(46, 2)=   -0.30840437495884D-07
     2930c(47, 2)=   -0.10134355839673D-07
     2931c(48, 2)=   -0.74066104086251D-07
     2932c(49, 2)=   -0.42575092353871D-07
     2933c(50, 2)=    0.38002915272366D-07
     2934c(51, 2)=    0.30850031943561D-08
     2935c(52, 2)=   -0.38896999892434D-07
     2936c(53, 2)=   -0.20811133913029D-08
     2937c(54, 2)=    0.60282320372300D-07
     2938c(55, 2)=    0.66842630552045D-08
     2939c(56, 2)=   -0.15054903643693D-07
     2940c(57, 2)=   -0.16272429639032D-07
     2941c(58, 2)=   -0.77062433134402D-08
     2942c(59, 2)=    0.22152915027638D-07
     2943c(60, 2)=    0.33331254807163D-07
     2944c(61, 2)=    0.47393585702229D-07
     2945c(62, 2)=    0.24590842039888D-07
     2946c(63, 2)=   -0.25081905036699D-07
     2947c(64, 2)=    0.85705073676948D-08
     2948c(65, 2)=    0.60565718726133D-09
     2949c(66, 2)=    0.13996463097736D-07
     2950c(67, 2)=    0.36801218056836D-07
     2951c(68, 2)=   -0.17804762229462D-07
     2952c(69, 2)=    0.15279165045386D-07
     2953c(70, 2)=    0.11881995727714D-07
     2954c(71, 2)=   -0.23621731481701D-07
     2955c(72, 2)=    0.16890385593438D-07
     2956c(73, 2)=   -0.20283358613253D-07
     2957c(74, 2)=    0.64980567456639D-08
     2958c(75, 2)=   -0.23260084626746D-07
     2959c(76, 2)=    0.99374517344100D-08
     2960c(77, 2)=   -0.32363754554167D-07
     2961c(78, 2)=    0.10856848087610D-07
     2962c(79, 2)=   -0.27919914518472D-07
     2963c(80, 2)=    0.16116790335365D-07
     2964c( 3, 3)=    0.35023491711606D-04
     2965c( 4, 3)=    0.64490745811941D-05
     2966c( 5, 3)=    0.33076885084810D-05
     2967c( 6, 3)=    0.95401012517447D-06
     2968c( 7, 3)=    0.87863220403753D-06
     2969c( 8, 3)=   -0.12040062428688D-05
     2970c( 9, 3)=   -0.99094051068927D-06
     2971c(10, 3)=   -0.29834384339389D-06
     2972c(11, 3)=   -0.12986012000905D-05
     2973c(12, 3)=   -0.14371536216267D-05
     2974c(13, 3)=    0.21515088011757D-06
     2975c(14, 3)=    0.42474467046937D-06
     2976c(15, 3)=   -0.55907478206270D-06
     2977c(16, 3)=   -0.53391027929080D-06
     2978c(17, 3)=   -0.45940051707924D-07
     2979c(18, 3)=   -0.29341890127158D-06
     2980c(19, 3)=   -0.52823002208831D-07
     2981c(20, 3)=    0.42381732878213D-06
     2982c(21, 3)=   -0.15864628605041D-06
     2983c(22, 3)=   -0.37694486993635D-06
     2984c(23, 3)=    0.10153362064588D-06
     2985c(24, 3)=    0.33326669401862D-06
     2986c(25, 3)=    0.10923543811362D-06
     2987c(26, 3)=   -0.15114438271846D-06
     2988c(27, 3)=    0.12204330344988D-06
     2989c(28, 3)=    0.19906682949500D-06
     2990c(29, 3)=    0.10324442774105D-06
     2991c(30, 3)=   -0.35165969895604D-07
     2992c(31, 3)=   -0.37695255894017D-07
     2993c(32, 3)=   -0.15441100504594D-06
     2994c(33, 3)=   -0.12566971141268D-06
     2995c(34, 3)=    0.86388483626716D-07
     2996c(35, 3)=    0.73898333015289D-07
     2997c(36, 3)=   -0.11654986577645D-06
     2998c(37, 3)=   -0.12337255642019D-06
     2999c(38, 3)=   -0.93452853607312D-07
     3000c(39, 3)=    0.15866384390936D-07
     3001c(40, 3)=    0.22621856963862D-07
     3002c(41, 3)=   -0.82261088157716D-07
     3003c(42, 3)=   -0.11509240581167D-06
     3004c(43, 3)=   -0.51209031157573D-07
     3005c(44, 3)=    0.87755823722094D-07
     3006c(45, 3)=   -0.32736783199659D-07
     3007c(46, 3)=   -0.44469896535062D-07
     3008c(47, 3)=    0.53202827198090D-07
     3009c(48, 3)=    0.31840012781999D-07
     3010c(49, 3)=   -0.39439367510789D-07
     3011c(50, 3)=   -0.24919100537213D-07
     3012c(51, 3)=    0.21683500372067D-07
     3013c(52, 3)=   -0.33140152676634D-08
     3014c(53, 3)=   -0.18205948135764D-07
     3015c(54, 3)=    0.43727885184963D-07
     3016c(55, 3)=    0.14256829781278D-07
     3017c(56, 3)=   -0.33010270260415D-07
     3018c(57, 3)=    0.13439525530206D-07
     3019c(58, 3)=    0.19680334210526D-07
     3020c(59, 3)=    0.49353515402636D-07
     3021c(60, 3)=   -0.32647840865208D-08
     3022c(61, 3)=    0.81100619477578D-08
     3023c(62, 3)=    0.43104153603246D-07
     3024c(63, 3)=    0.41737189429633D-08
     3025c(64, 3)=   -0.76395988054220D-08
     3026c(65, 3)=    0.18729578607082D-07
     3027c(66, 3)=    0.17754380139907D-07
     3028c(67, 3)=   -0.84496500704376D-08
     3029c(68, 3)=    0.16529568807175D-07
     3030c(69, 3)=    0.16310377740880D-07
     3031c(70, 3)=    0.35280078353266D-08
     3032c(71, 3)=    0.18307764248237D-07
     3033c(72, 3)=    0.31724949328092D-08
     3034c(73, 3)=    0.11816052480633D-07
     3035c(74, 3)=    0.17494675215840D-07
     3036c(75, 3)=    0.26118248858656D-08
     3037c(76, 3)=    0.30023266822151D-07
     3038c(77, 3)=   -0.65712049623256D-08
     3039c(78, 3)=    0.24493993741607D-07
     3040c(79, 3)=   -0.81982981193597D-09
     3041c(80, 3)=    0.14472986941000D-07
     3042c( 4, 4)=    0.30959206658010D-06
     3043c( 5, 4)=   -0.46336405889077D-05
     3044c( 6, 4)=    0.10065686648503D-05
     3045c( 7, 4)=    0.24640560610782D-05
     3046c( 8, 4)=    0.15844031607287D-05
     3047c( 9, 4)=    0.29405976756683D-06
     3048c(10, 4)=   -0.12101666736715D-05
     3049c(11, 4)=   -0.15688434008850D-05
     3050c(12, 4)=   -0.10108862643404D-06
     3051c(13, 4)=    0.17054914228551D-06
     3052c(14, 4)=    0.22728427855596D-06
     3053c(15, 4)=   -0.71711294666294D-06
     3054c(16, 4)=   -0.77468414495595D-06
     3055c(17, 4)=    0.45639058452256D-06
     3056c(18, 4)=    0.87264101737834D-06
     3057c(19, 4)=    0.13800527907950D-06
     3058c(20, 4)=   -0.35839832070397D-06
     3059c(21, 4)=   -0.39829410795150D-06
     3060c(22, 4)=    0.19549557765958D-06
     3061c(23, 4)=    0.44405614702060D-06
     3062c(24, 4)=    0.57394522076625D-07
     3063c(25, 4)=   -0.61925818643782D-06
     3064c(26, 4)=   -0.37209534817516D-06
     3065c(27, 4)=    0.34334229006640D-06
     3066c(28, 4)=    0.40345026906393D-06
     3067c(29, 4)=   -0.18728923925709D-06
     3068c(30, 4)=   -0.26245016435872D-06
     3069c(31, 4)=   -0.31150685284646D-07
     3070c(32, 4)=    0.20037736081893D-06
     3071c(33, 4)=    0.91242269592696D-07
     3072c(34, 4)=   -0.29153815376169D-07
     3073c(35, 4)=   -0.17807633359855D-06
     3074c(36, 4)=   -0.15303133769982D-06
     3075c(37, 4)=    0.10039017742705D-06
     3076c(38, 4)=    0.17157873926809D-06
     3077c(39, 4)=   -0.14539420941324D-07
     3078c(40, 4)=   -0.89280013487568D-07
     3079c(41, 4)=    0.37666735858964D-07
     3080c(42, 4)=    0.13264285074014D-06
     3081c(43, 4)=    0.51205577350747D-07
     3082c(44, 4)=    0.42197628209560D-07
     3083c(45, 4)=    0.37851610019160D-07
     3084c(46, 4)=   -0.75655211066113D-08
     3085c(47, 4)=    0.90026651213639D-07
     3086c(48, 4)=    0.93009448368906D-07
     3087c(49, 4)=   -0.23184611520205D-07
     3088c(50, 4)=   -0.20719026291426D-07
     3089c(51, 4)=    0.34422439963500D-07
     3090c(52, 4)=    0.21952192711957D-07
     3091c(53, 4)=   -0.21041597028035D-07
     3092c(54, 4)=   -0.24228687045471D-07
     3093c(55, 4)=    0.37895570193813D-08
     3094c(56, 4)=   -0.19352611895629D-07
     3095c(57, 4)=    0.16368584240792D-07
     3096c(58, 4)=    0.69419737541584D-07
     3097c(59, 4)=   -0.69539185815161D-08
     3098c(60, 4)=   -0.18799793363085D-07
     3099c(61, 4)=    0.14374232953337D-07
     3100c(62, 4)=   -0.24130754111132D-07
     3101c(63, 4)=   -0.36015801612887D-08
     3102c(64, 4)=    0.40250447914756D-08
     3103c(65, 4)=    0.10342517649973D-07
     3104c(66, 4)=   -0.37158460287582D-07
     3105c(67, 4)=   -0.35013020730218D-08
     3106c(68, 4)=   -0.26839843046241D-09
     3107c(69, 4)=    0.76971770252262D-09
     3108c(70, 4)=    0.17192596869177D-07
     3109c(71, 4)=    0.26611715724886D-08
     3110c(72, 4)=    0.51616950532301D-08
     3111c(73, 4)=    0.17438582702884D-07
     3112c(74, 4)=    0.11010503509019D-07
     3113c(75, 4)=    0.61518542523363D-08
     3114c(76, 4)=    0.39330429681511D-08
     3115c(77, 4)=    0.70796199616500D-08
     3116c(78, 4)=   -0.78748564738901D-08
     3117c(79, 4)=    0.77449061439055D-08
     3118c(80, 4)=   -0.25351771157557D-08
     3119c( 5, 5)=   -0.44434141649300D-05
     3120c( 6, 5)=    0.16548025737626D-05
     3121c( 7, 5)=   -0.19096934491812D-06
     3122c( 8, 5)=   -0.27850787272597D-05
     3123c( 9, 5)=   -0.22656267960896D-05
     3124c(10, 5)=    0.42032262399202D-06
     3125c(11, 5)=    0.13520771564056D-05
     3126c(12, 5)=    0.71777774077014D-06
     3127c(13, 5)=    0.61450262542325D-08
     3128c(14, 5)=   -0.45276921372495D-06
     3129c(15, 5)=   -0.93462951523554D-06
     3130c(16, 5)=   -0.34377637201001D-06
     3131c(17, 5)=    0.69789569926980D-06
     3132c(18, 5)=    0.20629370256866D-06
     3133c(19, 5)=   -0.28358145151180D-06
     3134c(20, 5)=    0.16848241831807D-06
     3135c(21, 5)=    0.32529795139056D-06
     3136c(22, 5)=    0.72679019916679D-07
     3137c(23, 5)=   -0.31654147385163D-06
     3138c(24, 5)=   -0.34631841874185D-06
     3139c(25, 5)=    0.28611650642088D-06
     3140c(26, 5)=    0.20360981554297D-06
     3141c(27, 5)=    0.96293497515718D-07
     3142c(28, 5)=   -0.47930164566393D-07
     3143c(29, 5)=   -0.12691726734393D-06
     3144c(30, 5)=   -0.93858451381326D-07
     3145c(31, 5)=    0.92431999857506D-07
     3146c(32, 5)=    0.93351803773724D-07
     3147c(33, 5)=   -0.15400246903553D-06
     3148c(34, 5)=   -0.14119500703571D-06
     3149c(35, 5)=    0.78736519330474D-07
     3150c(36, 5)=    0.83329148294896D-07
     3151c(37, 5)=    0.73174483987068D-07
     3152c(38, 5)=   -0.55893430456265D-07
     3153c(39, 5)=   -0.11157629707788D-06
     3154c(40, 5)=    0.54238258568734D-07
     3155c(41, 5)=    0.11263379495700D-06
     3156c(42, 5)=    0.41202421137030D-07
     3157c(43, 5)=   -0.59032315787153D-07
     3158c(44, 5)=    0.26883253020711D-07
     3159c(45, 5)=    0.51890763975186D-07
     3160c(46, 5)=    0.13952729851129D-07
     3161c(47, 5)=    0.83317364677177D-08
     3162c(48, 5)=   -0.13102674596668D-07
     3163c(49, 5)=   -0.21274731423140D-07
     3164c(50, 5)=   -0.54059556337886D-07
     3165c(51, 5)=   -0.18854105667823D-07
     3166c(52, 5)=    0.22621073263953D-07
     3167c(53, 5)=   -0.19805104368574D-07
     3168c(54, 5)=   -0.19550955358517D-07
     3169c(55, 5)=   -0.70267276107722D-08
     3170c(56, 5)=   -0.30278638914856D-07
     3171c(57, 5)=   -0.80729568890359D-08
     3172c(58, 5)=   -0.33069309873432D-08
     3173c(59, 5)=    0.20020433625436D-07
     3174c(60, 5)=   -0.25864119973521D-07
     3175c(61, 5)=   -0.39757987838197D-07
     3176c(62, 5)=    0.64985926165149D-08
     3177c(63, 5)=    0.19392998715642D-07
     3178c(64, 5)=   -0.12325977875120D-07
     3179c(65, 5)=   -0.23164237582529D-07
     3180c(66, 5)=    0.12950766375034D-07
     3181c(67, 5)=    0.28954128332616D-09
     3182c(68, 5)=    0.14496023097164D-07
     3183c(69, 5)=    0.35344064539468D-07
     3184c(70, 5)=    0.11948634893181D-07
     3185c(71, 5)=    0.50615198739125D-08
     3186c(72, 5)=    0.29805375871243D-08
     3187c(73, 5)=   -0.67955847102354D-08
     3188c(74, 5)=   -0.68758792996420D-08
     3189c(75, 5)=    0.10638093088951D-07
     3190c(76, 5)=   -0.14851134350421D-07
     3191c(77, 5)=    0.19291099080097D-07
     3192c(78, 5)=   -0.16916285273421D-07
     3193c(79, 5)=    0.17689701598385D-07
     3194c(80, 5)=   -0.38699679010122D-08
     3195c( 6, 6)=    0.27571599805567D-05
     3196c( 7, 6)=   -0.55805315254086D-06
     3197c( 8, 6)=   -0.91195769387441D-06
     3198c( 9, 6)=    0.80627407047627D-06
     3199c(10, 6)=    0.66759500742877D-06
     3200c(11, 6)=   -0.24393303094978D-06
     3201c(12, 6)=   -0.40190828647835D-06
     3202c(13, 6)=    0.43978424085633D-07
     3203c(14, 6)=   -0.66013890282255D-07
     3204c(15, 6)=   -0.62099703560131D-07
     3205c(16, 6)=    0.14317921213443D-06
     3206c(17, 6)=    0.63476326900737D-06
     3207c(18, 6)=    0.22350772799262D-06
     3208c(19, 6)=   -0.27396734006137D-06
     3209c(20, 6)=    0.20104741582389D-06
     3210c(21, 6)=    0.62410418046131D-07
     3211c(22, 6)=   -0.26852512844608D-06
     3212c(23, 6)=    0.38219653909366D-06
     3213c(24, 6)=    0.31595908792017D-06
     3214c(25, 6)=   -0.15880959481453D-06
     3215c(26, 6)=   -0.32691684424342D-06
     3216c(27, 6)=    0.27157517394775D-06
     3217c(28, 6)=    0.45910522899934D-06
     3218c(29, 6)=   -0.90360646208109D-07
     3219c(30, 6)=   -0.14350225793397D-06
     3220c(31, 6)=    0.58517088199898D-07
     3221c(32, 6)=    0.82448774379966D-08
     3222c(33, 6)=   -0.14039660982872D-06
     3223c(34, 6)=   -0.10319846464728D-07
     3224c(35, 6)=    0.16365404957830D-06
     3225c(36, 6)=   -0.11439331698275D-06
     3226c(37, 6)=   -0.17957148759724D-06
     3227c(38, 6)=    0.99909642061381D-07
     3228c(39, 6)=    0.73601014779209D-07
     3229c(40, 6)=   -0.11129691323560D-06
     3230c(41, 6)=   -0.50363372367066D-07
     3231c(42, 6)=    0.48970749788252D-07
     3232c(43, 6)=   -0.21003915377398D-07
     3233c(44, 6)=   -0.99990391085428D-07
     3234c(45, 6)=    0.33708262897175D-07
     3235c(46, 6)=    0.12638028137008D-07
     3236c(47, 6)=   -0.91631664850957D-08
     3237c(48, 6)=   -0.88122254176770D-08
     3238c(49, 6)=    0.40675867295780D-07
     3239c(50, 6)=    0.52310566613043D-07
     3240c(51, 6)=   -0.13272662627539D-07
     3241c(52, 6)=   -0.73904952552898D-08
     3242c(53, 6)=   -0.14993717253759D-07
     3243c(54, 6)=   -0.44698503381972D-07
     3244c(55, 6)=    0.17039893002879D-07
     3245c(56, 6)=    0.15830410793048D-07
     3246c(57, 6)=   -0.14936960045191D-07
     3247c(58, 6)=    0.60206055639023D-08
     3248c(59, 6)=    0.46368464974162D-07
     3249c(60, 6)=    0.40230875207353D-07
     3250c(61, 6)=   -0.15769084210498D-07
     3251c(62, 6)=   -0.21166941664643D-07
     3252c(63, 6)=    0.18703755701939D-07
     3253c(64, 6)=   -0.27691990214752D-08
     3254c(65, 6)=   -0.33352911189790D-07
     3255c(66, 6)=   -0.35608979285730D-07
     3256c(67, 6)=   -0.70033417115897D-08
     3257c(68, 6)=   -0.19185441063505D-07
     3258c(69, 6)=   -0.32700471757675D-07
     3259c(70, 6)=    0.12564201099496D-07
     3260c(71, 6)=   -0.15126602104398D-07
     3261c(72, 6)=    0.13317694048512D-07
     3262c(73, 6)=    0.13006332176297D-07
     3263c(74, 6)=   -0.71969446649702D-08
     3264c(75, 6)=    0.28709756345817D-07
     3265c(76, 6)=   -0.19623113496586D-07
     3266c(77, 6)=    0.18195733917348D-07
     3267c(78, 6)=   -0.21640275443293D-07
     3268c(79, 6)=    0.11458350447296D-07
     3269c(80, 6)=   -0.12170377130640D-07
     3270c( 7, 7)=    0.43995886876871D-06
     3271c( 8, 7)=   -0.47261950038642D-06
     3272c( 9, 7)=   -0.61651917619159D-06
     3273c(10, 7)=    0.31718853806594D-06
     3274c(11, 7)=    0.65859011010243D-06
     3275c(12, 7)=    0.40292072266072D-06
     3276c(13, 7)=   -0.76808712383584D-06
     3277c(14, 7)=   -0.44557079395778D-06
     3278c(15, 7)=    0.92204367511949D-06
     3279c(16, 7)=    0.38659794764365D-06
     3280c(17, 7)=    0.33821902436418D-06
     3281c(18, 7)=   -0.19710160923205D-06
     3282c(19, 7)=   -0.48845474893250D-06
     3283c(20, 7)=    0.68730006673845D-07
     3284c(21, 7)=    0.24155063400434D-06
     3285c(22, 7)=    0.26175060260014D-06
     3286c(23, 7)=   -0.29231102856546D-06
     3287c(24, 7)=   -0.40727652556414D-06
     3288c(25, 7)=    0.11980582758862D-06
     3289c(26, 7)=    0.12312238978368D-06
     3290c(27, 7)=    0.24812236262542D-08
     3291c(28, 7)=   -0.17273809020356D-06
     3292c(29, 7)=   -0.25850308737583D-06
     3293c(30, 7)=   -0.84399266886281D-07
     3294c(31, 7)=    0.24130381448124D-06
     3295c(32, 7)=    0.16317990329089D-06
     3296c(33, 7)=   -0.89111302464619D-07
     3297c(34, 7)=   -0.17537996827503D-06
     3298c(35, 7)=    0.36799721551061D-07
     3299c(36, 7)=    0.10372056536401D-06
     3300c(37, 7)=    0.19570404665206D-07
     3301c(38, 7)=   -0.55267439226573D-07
     3302c(39, 7)=   -0.79573733294900D-07
     3303c(40, 7)=    0.23027537491822D-07
     3304c(41, 7)=    0.69887735189113D-07
     3305c(42, 7)=    0.72321482138545D-07
     3306c(43, 7)=   -0.10565869255953D-07
     3307c(44, 7)=   -0.10151552325077D-06
     3308c(45, 7)=    0.35931009870257D-07
     3309c(46, 7)=    0.75225923562369D-08
     3310c(47, 7)=   -0.22752655202284D-07
     3311c(48, 7)=    0.89441389869944D-08
     3312c(49, 7)=    0.37220465089298D-07
     3313c(50, 7)=   -0.85192448435310D-08
     3314c(51, 7)=   -0.40081109799497D-07
     3315c(52, 7)=    0.23073769709323D-07
     3316c(53, 7)=    0.45667290438653D-07
     3317c(54, 7)=   -0.17445936216360D-07
     3318c(55, 7)=   -0.15369846125184D-07
     3319c(56, 7)=    0.18826249672075D-07
     3320c(57, 7)=   -0.31417790708496D-07
     3321c(58, 7)=   -0.24984816683585D-07
     3322c(59, 7)=    0.37629174651362D-07
     3323c(60, 7)=    0.56899536588022D-08
     3324c(61, 7)=   -0.10496967073751D-07
     3325c(62, 7)=    0.28100413921520D-07
     3326c(63, 7)=    0.45442449578000D-08
     3327c(64, 7)=   -0.11540662509264D-07
     3328c(65, 7)=   -0.25710679867463D-07
     3329c(66, 7)=   -0.19698525852962D-07
     3330c(67, 7)=   -0.13303329727190D-07
     3331c(68, 7)=    0.10982345162823D-07
     3332c(69, 7)=   -0.21402856717440D-08
     3333c(70, 7)=   -0.64088891211600D-08
     3334c(71, 7)=   -0.13008094605731D-07
     3335c(72, 7)=   -0.86969840430305D-08
     3336c(73, 7)=   -0.22626636302946D-07
     3337c(74, 7)=    0.54862757485682D-08
     3338c(75, 7)=   -0.83509452181555D-08
     3339c(76, 7)=   -0.12666008338105D-07
     3340c(77, 7)=   -0.76562284824962D-08
     3341c(78, 7)=   -0.17724487244370D-07
     3342c(79, 7)=   -0.36520982438646D-08
     3343c(80, 7)=   -0.16859220330869D-07
     3344c( 8, 8)=   -0.30973350203001D-06
     3345c( 9, 8)=    0.12047847138462D-05
     3346c(10, 8)=    0.53865780719934D-06
     3347c(11, 8)=   -0.11785529186851D-05
     3348c(12, 8)=   -0.15982435716482D-05
     3349c(13, 8)=   -0.23194739260953D-06
     3350c(14, 8)=    0.81535531994532D-06
     3351c(15, 8)=    0.11565702748603D-05
     3352c(16, 8)=    0.23447441593593D-06
     3353c(17, 8)=   -0.36982763604740D-06
     3354c(18, 8)=    0.61118874148442D-07
     3355c(19, 8)=    0.42698157940794D-06
     3356c(20, 8)=    0.31067740467773D-06
     3357c(21, 8)=    0.40705531212846D-07
     3358c(22, 8)=   -0.37201577463817D-06
     3359c(23, 8)=   -0.21605680473365D-06
     3360c(24, 8)=    0.18543841568708D-06
     3361c(25, 8)=    0.24648179571309D-06
     3362c(26, 8)=    0.86142134273613D-07
     3363c(27, 8)=   -0.34810645313143D-06
     3364c(28, 8)=   -0.24819931440283D-06
     3365c(29, 8)=   -0.41746703183486D-07
     3366c(30, 8)=    0.53557629619836D-07
     3367c(31, 8)=   -0.31189662495483D-08
     3368c(32, 8)=   -0.23684136584399D-06
     3369c(33, 8)=   -0.11135804639784D-06
     3370c(34, 8)=    0.21017986319691D-07
     3371c(35, 8)=    0.18144509931141D-06
     3372c(36, 8)=    0.68093513349118D-07
     3373c(37, 8)=   -0.24994894975000D-06
     3374c(38, 8)=   -0.78471090833385D-07
     3375c(39, 8)=    0.13239300047411D-06
     3376c(40, 8)=    0.54880323402336D-07
     3377c(41, 8)=    0.13430167979081D-07
     3378c(42, 8)=    0.56339230993143D-07
     3379c(43, 8)=    0.28565133925337D-08
     3380c(44, 8)=   -0.42488219823149D-07
     3381c(45, 8)=   -0.73817974736043D-08
     3382c(46, 8)=    0.69193895041098D-07
     3383c(47, 8)=    0.20359281649319D-07
     3384c(48, 8)=   -0.47559903158974D-07
     3385c(49, 8)=    0.11527250499104D-07
     3386c(50, 8)=    0.31827816790805D-07
     3387c(51, 8)=   -0.62623816165509D-07
     3388c(52, 8)=   -0.35933127317171D-07
     3389c(53, 8)=    0.19711901123882D-07
     3390c(54, 8)=   -0.77427771586048D-08
     3391c(55, 8)=   -0.41303575042150D-07
     3392c(56, 8)=   -0.15072982855835D-07
     3393c(57, 8)=   -0.20451938702364D-08
     3394c(58, 8)=   -0.37398071041519D-07
     3395c(59, 8)=    0.23820342762430D-07
     3396c(60, 8)=    0.25502369443082D-07
     3397c(61, 8)=   -0.15910304881318D-07
     3398c(62, 8)=    0.13795120944057D-07
     3399c(63, 8)=    0.32525287884179D-07
     3400c(64, 8)=    0.13809423551226D-08
     3401c(65, 8)=   -0.10812715236635D-09
     3402c(66, 8)=    0.67634725831510D-09
     3403c(67, 8)=   -0.16676212050011D-07
     3404c(68, 8)=    0.12322542466311D-07
     3405c(69, 8)=   -0.87952271938768D-08
     3406c(70, 8)=    0.70662206807584D-08
     3407c(71, 8)=    0.97306837784429D-08
     3408c(72, 8)=   -0.10409665918863D-07
     3409c(73, 8)=    0.22526300287359D-07
     3410c(74, 8)=   -0.11929360719090D-07
     3411c(75, 8)=    0.56724970381373D-08
     3412c(76, 8)=    0.39296322296042D-08
     3413c(77, 8)=    0.40729954548785D-09
     3414c(78, 8)=   -0.14579810396259D-07
     3415c(79, 8)=    0.33817539135385D-08
     3416c(80, 8)=   -0.12114249017571D-07
     3417c( 9, 9)=   -0.11685977561307D-05
     3418c(10, 9)=   -0.14529152650329D-05
     3419c(11, 9)=   -0.41376264440044D-06
     3420c(12, 9)=    0.70595661731973D-06
     3421c(13, 9)=    0.11036467020707D-05
     3422c(14, 9)=    0.20920331569049D-06
     3423c(15, 9)=   -0.30020191696171D-06
     3424c(16, 9)=   -0.35633738393987D-06
     3425c(17, 9)=   -0.19460945904606D-06
     3426c(18, 9)=    0.69551342431549D-07
     3427c(19, 9)=    0.21017949476738D-06
     3428c(20, 9)=    0.58506560488758D-07
     3429c(21, 9)=   -0.17704293895129D-06
     3430c(22, 9)=   -0.79873680455104D-09
     3431c(23, 9)=    0.23863912649051D-07
     3432c(24, 9)=    0.11269490152068D-06
     3433c(25, 9)=    0.80663857082553D-07
     3434c(26, 9)=   -0.52332864057279D-07
     3435c(27, 9)=   -0.40077218712098D-07
     3436c(28, 9)=    0.92385377802570D-07
     3437c(29, 9)=    0.89560884551153D-07
     3438c(30, 9)=   -0.74814774016663D-07
     3439c(31, 9)=   -0.13348919881375D-06
     3440c(32, 9)=   -0.46162437050820D-08
     3441c(33, 9)=    0.86098107102499D-07
     3442c(34, 9)=    0.35831903511112D-07
     3443c(35, 9)=   -0.38733132408446D-07
     3444c(36, 9)=   -0.43099792134629D-07
     3445c(37, 9)=   -0.10107397896816D-06
     3446c(38, 9)=   -0.34748056946680D-07
     3447c(39, 9)=    0.10009476196909D-06
     3448c(40, 9)=    0.60783352459747D-07
     3449c(41, 9)=   -0.70182088303399D-07
     3450c(42, 9)=   -0.18055961756054D-07
     3451c(43, 9)=    0.57484699400282D-07
     3452c(44, 9)=    0.10553683342488D-07
     3453c(45, 9)=   -0.42685258985362D-07
     3454c(46, 9)=    0.49309943027769D-07
     3455c(47, 9)=    0.22793754906480D-07
     3456c(48, 9)=   -0.23998217097360D-07
     3457c(49, 9)=    0.10914696187724D-07
     3458c(50, 9)=    0.32781688335377D-07
     3459c(51, 9)=   -0.62506643838801D-08
     3460c(52, 9)=   -0.64979961127411D-07
     3461c(53, 9)=    0.51096919194121D-07
     3462c(54, 9)=    0.29356063667930D-07
     3463c(55, 9)=   -0.17802875815950D-07
     3464c(56, 9)=   -0.33534152808031D-07
     3465c(57, 9)=   -0.11201661074046D-07
     3466c(58, 9)=   -0.17348653702844D-07
     3467c(59, 9)=    0.30891923032634D-08
     3468c(60, 9)=    0.31455792355522D-07
     3469c(61, 9)=   -0.15441400708974D-07
     3470c(62, 9)=   -0.48101211929862D-08
     3471c(63, 9)=   -0.67324611707600D-08
     3472c(64, 9)=   -0.23034248154764D-07
     3473c(65, 9)=   -0.87353984493366D-08
     3474c(66, 9)=    0.29023336917157D-07
     3475c(67, 9)=   -0.12812531346711D-07
     3476c(68, 9)=   -0.74928735796058D-08
     3477c(69, 9)=    0.18566108048567D-07
     3478c(70, 9)=   -0.88858650319843D-08
     3479c(71, 9)=   -0.44843642059847D-08
     3480c(72, 9)=    0.14316683400634D-07
     3481c(73, 9)=   -0.50703872752401D-09
     3482c(74, 9)=    0.80343938717078D-08
     3483c(75, 9)=    0.24856787548675D-07
     3484c(76, 9)=    0.10960775781968D-08
     3485c(77, 9)=    0.25742924795831D-07
     3486c(78, 9)=    0.84686476194344D-08
     3487c(79, 9)=    0.76200924005946D-08
     3488c(80, 9)=    0.12750704377667D-07
     3489c(10,10)=   -0.27418592728775D-06
     3490c(11,10)=    0.33152053925569D-06
     3491c(12,10)=    0.48642163810406D-06
     3492c(13,10)=   -0.15737288606159D-06
     3493c(14,10)=    0.25566932292312D-07
     3494c(15,10)=   -0.15979532465480D-06
     3495c(16,10)=   -0.51356597033173D-06
     3496c(17,10)=   -0.56809357230694D-06
     3497c(18,10)=    0.66632156103219D-06
     3498c(19,10)=    0.60140162556967D-06
     3499c(20,10)=   -0.42013699476283D-06
     3500c(21,10)=   -0.28400079019097D-06
     3501c(22,10)=   -0.25361012940757D-06
     3502c(23,10)=   -0.89752221004529D-07
     3503c(24,10)=   -0.12256105013166D-06
     3504c(25,10)=    0.21528872721283D-06
     3505c(26,10)=    0.14690117401347D-06
     3506c(27,10)=   -0.31119309740966D-06
     3507c(28,10)=   -0.82984621401518D-07
     3508c(29,10)=    0.13876448127514D-06
     3509c(30,10)=    0.67547141689097D-07
     3510c(31,10)=   -0.80968956240002D-07
     3511c(32,10)=   -0.25061516036457D-07
     3512c(33,10)=    0.48032933510956D-08
     3513c(34,10)=   -0.20507365083276D-07
     3514c(35,10)=   -0.55221010597376D-07
     3515c(36,10)=    0.75914839445849D-07
     3516c(37,10)=   -0.34872065650435D-08
     3517c(38,10)=   -0.52058651133105D-07
     3518c(39,10)=    0.84942358720890D-07
     3519c(40,10)=    0.11866701531355D-07
     3520c(41,10)=   -0.76495579940316D-07
     3521c(42,10)=   -0.17727920207917D-07
     3522c(43,10)=    0.61463584510654D-07
     3523c(44,10)=    0.33270487334672D-07
     3524c(45,10)=   -0.87602100996217D-07
     3525c(46,10)=    0.26372866601973D-07
     3526c(47,10)=    0.30349490906782D-07
     3527c(48,10)=   -0.27923311429486D-07
     3528c(49,10)=   -0.13302497453275D-07
     3529c(50,10)=   -0.25820559835020D-07
     3530c(51,10)=   -0.23374649723249D-07
     3531c(52,10)=    0.82265363238744D-08
     3532c(53,10)=    0.46393708341138D-07
     3533c(54,10)=   -0.15072675889249D-07
     3534c(55,10)=   -0.34347539063150D-07
     3535c(56,10)=    0.20485320872554D-07
     3536c(57,10)=    0.42233478341289D-07
     3537c(58,10)=    0.50401390086354D-07
     3538c(59,10)=   -0.10171279820395D-07
     3539c(60,10)=   -0.35575784347796D-07
     3540c(61,10)=    0.42127433292415D-07
     3541c(62,10)=   -0.10118118317467D-07
     3542c(63,10)=    0.91817545738375D-08
     3543c(64,10)=    0.35421298579918D-07
     3544c(65,10)=    0.12182613264688D-07
     3545c(66,10)=   -0.64310568888630D-08
     3546c(67,10)=    0.46161869451084D-08
     3547c(68,10)=   -0.29013715978110D-07
     3548c(69,10)=    0.19689845799256D-07
     3549c(70,10)=   -0.10549308957055D-08
     3550c(71,10)=    0.17281557475445D-07
     3551c(72,10)=   -0.11057461689040D-07
     3552c(73,10)=   -0.97301930678866D-08
     3553c(74,10)=   -0.81094277056530D-08
     3554c(75,10)=   -0.37042327999666D-09
     3555c(76,10)=   -0.15641894574580D-07
     3556c(77,10)=    0.11854403909782D-07
     3557c(78,10)=   -0.54294732577521D-08
     3558c(79,10)=    0.78724534170822D-08
     3559c(80,10)=    0.42317866507287D-08
     3560c(11,11)=   -0.44684635932806D-07
     3561c(12,11)=    0.86209182518877D-06
     3562c(13,11)=    0.75993437561620D-06
     3563c(14,11)=   -0.92572155775018D-06
     3564c(15,11)=   -0.77135611592181D-06
     3565c(16,11)=   -0.66555587400325D-07
     3566c(17,11)=    0.35050392061217D-06
     3567c(18,11)=    0.27473842288581D-06
     3568c(19,11)=    0.44343867592765D-07
     3569c(20,11)=   -0.16158145338117D-06
     3570c(21,11)=   -0.27987346427304D-06
     3571c(22,11)=   -0.86898719785704D-07
     3572c(23,11)=    0.33488893134310D-06
     3573c(24,11)=   -0.35108546304128D-08
     3574c(25,11)=   -0.42067068385092D-06
     3575c(26,11)=   -0.46190939130907D-06
     3576c(27,11)=   -0.19330288476283D-06
     3577c(28,11)=    0.21188939514542D-06
     3578c(29,11)=    0.29489368172660D-06
     3579c(30,11)=    0.13455548251108D-06
     3580c(31,11)=   -0.19411432800647D-06
     3581c(32,11)=   -0.59424865170610D-07
     3582c(33,11)=    0.17417689865144D-06
     3583c(34,11)=    0.12434837415707D-06
     3584c(35,11)=   -0.56095234006330D-07
     3585c(36,11)=   -0.78614167217231D-07
     3586c(37,11)=    0.76271352504045D-07
     3587c(38,11)=    0.44466538643800D-07
     3588c(39,11)=    0.49697346366543D-07
     3589c(40,11)=    0.95342048484995D-07
     3590c(41,11)=   -0.22060919870347D-07
     3591c(42,11)=   -0.10627362439600D-06
     3592c(43,11)=    0.64554255720816D-08
     3593c(44,11)=    0.58642333698728D-07
     3594c(45,11)=   -0.26890924444448D-07
     3595c(46,11)=   -0.35211105586852D-07
     3596c(47,11)=   -0.10464139564664D-08
     3597c(48,11)=   -0.18663789655521D-07
     3598c(49,11)=    0.36421059241949D-08
     3599c(50,11)=    0.39530294301080D-08
     3600c(51,11)=   -0.46538292713927D-08
     3601c(52,11)=   -0.73516296354175D-07
     3602c(53,11)=    0.71800656224743D-08
     3603c(54,11)=    0.19838048143693D-07
     3604c(55,11)=   -0.27800604308575D-07
     3605c(56,11)=   -0.23549993100805D-07
     3606c(57,11)=    0.23355590833905D-07
     3607c(58,11)=    0.12048348807616D-07
     3608c(59,11)=   -0.35020125986908D-07
     3609c(60,11)=    0.13173194177869D-07
     3610c(61,11)=    0.50660334043555D-08
     3611c(62,11)=   -0.93139166850523D-08
     3612c(63,11)=    0.10367939361458D-07
     3613c(64,11)=   -0.20853446969930D-07
     3614c(65,11)=    0.15681558651406D-07
     3615c(66,11)=   -0.14422762490918D-07
     3616c(67,11)=    0.19077120844381D-08
     3617c(68,11)=   -0.14617125298418D-07
     3618c(69,11)=   -0.27984412638652D-07
     3619c(70,11)=    0.12427476941900D-08
     3620c(71,11)=    0.14146068560767D-09
     3621c(72,11)=    0.10794013713742D-07
     3622c(73,11)=   -0.33633551806085D-08
     3623c(74,11)=    0.73440033006451D-08
     3624c(75,11)=   -0.19989334493278D-07
     3625c(76,11)=    0.18759121278194D-07
     3626c(77,11)=   -0.19463700567277D-07
     3627c(78,11)=    0.10058388000952D-07
     3628c(79,11)=   -0.82265261612786D-08
     3629c(80,11)=    0.23951018907818D-08
     3630c(12,12)=   -0.64231718972073D-08
     3631c(13,12)=   -0.14518332762979D-05
     3632c(14,12)=   -0.44667389507501D-06
     3633c(15,12)=    0.97595914392990D-06
     3634c(16,12)=    0.40830279631007D-06
     3635c(17,12)=    0.20089686057968D-06
     3636c(18,12)=    0.73988670101664D-07
     3637c(19,12)=   -0.11269182077243D-06
     3638c(20,12)=   -0.47171328165674D-06
     3639c(21,12)=    0.25397802768283D-06
     3640c(22,12)=    0.37922079263538D-06
     3641c(23,12)=    0.74687070585526D-07
     3642c(24,12)=   -0.29603322643162D-06
     3643c(25,12)=   -0.32919144778195D-06
     3644c(26,12)=    0.22776493253620D-06
     3645c(27,12)=    0.59673534864034D-07
     3646c(28,12)=    0.89182305751498D-07
     3647c(29,12)=   -0.14013340779859D-06
     3648c(30,12)=   -0.30325844797736D-06
     3649c(31,12)=   -0.83515417019970D-07
     3650c(32,12)=    0.69433465327683D-07
     3651c(33,12)=    0.17567234786505D-06
     3652c(34,12)=   -0.70733077990148D-07
     3653c(35,12)=   -0.15850573423284D-06
     3654c(36,12)=   -0.37550527011772D-07
     3655c(37,12)=    0.78044879320411D-07
     3656c(38,12)=   -0.10785624108895D-07
     3657c(39,12)=   -0.77044658435730D-07
     3658c(40,12)=   -0.43096549983760D-10
     3659c(41,12)=   -0.79751941321668D-07
     3660c(42,12)=   -0.27619361101061D-07
     3661c(43,12)=    0.86397321275642D-07
     3662c(44,12)=    0.39211827033959D-07
     3663c(45,12)=   -0.10868277448053D-06
     3664c(46,12)=   -0.13572773598541D-06
     3665c(47,12)=    0.67101554496870D-07
     3666c(48,12)=    0.10473935783814D-06
     3667c(49,12)=   -0.44412396872399D-07
     3668c(50,12)=   -0.58344190655476D-07
     3669c(51,12)=    0.34682409657115D-07
     3670c(52,12)=    0.44490481568391D-07
     3671c(53,12)=   -0.60142679556923D-07
     3672c(54,12)=   -0.41393872946390D-07
     3673c(55,12)=    0.24090662325969D-07
     3674c(56,12)=    0.19446206959575D-07
     3675c(57,12)=    0.19876152940267D-07
     3676c(58,12)=   -0.80326007048200D-08
     3677c(59,12)=   -0.11205579119766D-07
     3678c(60,12)=    0.16730592865468D-07
     3679c(61,12)=    0.30935461684387D-07
     3680c(62,12)=    0.63355437631645D-08
     3681c(63,12)=   -0.80774330138626D-08
     3682c(64,12)=   -0.54235063151270D-08
     3683c(65,12)=   -0.90466913004512D-08
     3684c(66,12)=   -0.18000612328190D-07
     3685c(67,12)=    0.36176316060519D-07
     3686c(68,12)=   -0.14836236343949D-07
     3687c(69,12)=   -0.10115866668775D-07
     3688c(70,12)=    0.61568005209749D-09
     3689c(71,12)=   -0.63328475344205D-08
     3690c(72,12)=   -0.13228133600474D-07
     3691c(73,12)=    0.11675415257145D-07
     3692c(74,12)=   -0.88084298812367D-08
     3693c(75,12)=   -0.16421185729936D-08
     3694c(76,12)=   -0.28705724964639D-08
     3695c(77,12)=    0.76454526940509D-08
     3696c(78,12)=   -0.97983270912013D-08
     3697c(79,12)=    0.93094685912931D-08
     3698c(80,12)=   -0.14952267692181D-07
     3699c(13,13)=    0.42601241621664D-06
     3700c(14,13)=    0.75129408112081D-06
     3701c(15,13)=    0.17845595134875D-06
     3702c(16,13)=   -0.64644274826991D-07
     3703c(17,13)=   -0.44363357576703D-06
     3704c(18,13)=   -0.29893151037383D-06
     3705c(19,13)=   -0.20081378465993D-06
     3706c(20,13)=   -0.38974995460658D-09
     3707c(21,13)=    0.26038531389766D-08
     3708c(22,13)=   -0.16993532987053D-06
     3709c(23,13)=   -0.22669233943721D-06
     3710c(24,13)=    0.77346455693605D-07
     3711c(25,13)=   -0.18200920903674D-07
     3712c(26,13)=    0.51923621297858D-07
     3713c(27,13)=   -0.69534755150605D-07
     3714c(28,13)=   -0.13011181784465D-06
     3715c(29,13)=    0.17478512424802D-06
     3716c(30,13)=    0.97172404864323D-07
     3717c(31,13)=    0.29060801404821D-07
     3718c(32,13)=    0.49415299254759D-07
     3719c(33,13)=   -0.63664146670117D-09
     3720c(34,13)=   -0.42098806139770D-07
     3721c(35,13)=   -0.63199371645429D-07
     3722c(36,13)=    0.14925139462609D-06
     3723c(37,13)=    0.77616737374773D-07
     3724c(38,13)=   -0.49196687691755D-07
     3725c(39,13)=   -0.21612344963652D-07
     3726c(40,13)=    0.80541885220445D-08
     3727c(41,13)=    0.43986031382998D-07
     3728c(42,13)=    0.53831179685585D-09
     3729c(43,13)=   -0.48153297585660D-07
     3730c(44,13)=   -0.37336817198338D-07
     3731c(45,13)=   -0.72522229447116D-07
     3732c(46,13)=    0.52595884906078D-07
     3733c(47,13)=    0.11224855683888D-07
     3734c(48,13)=   -0.84039896860964D-08
     3735c(49,13)=   -0.10002921042261D-07
     3736c(50,13)=    0.20111357105294D-07
     3737c(51,13)=   -0.37326778289764D-07
     3738c(52,13)=   -0.49297223414475D-07
     3739c(53,13)=    0.24567721109946D-07
     3740c(54,13)=    0.36389985182291D-07
     3741c(55,13)=   -0.33801457283125D-07
     3742c(56,13)=   -0.45368225288631D-07
     3743c(57,13)=    0.97773492056029D-08
     3744c(58,13)=    0.32131377937284D-07
     3745c(59,13)=    0.26674049173607D-07
     3746c(60,13)=    0.88098981589739D-08
     3747c(61,13)=    0.22112055523099D-07
     3748c(62,13)=    0.26945186382454D-08
     3749c(63,13)=   -0.37446774164464D-07
     3750c(64,13)=    0.24823107737634D-07
     3751c(65,13)=    0.16925015623816D-07
     3752c(66,13)=   -0.16280148223969D-07
     3753c(67,13)=    0.13036214805850D-08
     3754c(68,13)=   -0.57340326176229D-08
     3755c(69,13)=    0.29455152151528D-07
     3756c(70,13)=   -0.14619484493505D-07
     3757c(71,13)=    0.90805605878318D-08
     3758c(72,13)=    0.70049802313740D-08
     3759c(73,13)=   -0.17737979012555D-07
     3760c(74,13)=    0.10487531174343D-07
     3761c(75,13)=   -0.24750045534933D-07
     3762c(76,13)=    0.15308268186489D-07
     3763c(77,13)=   -0.13983560080127D-07
     3764c(78,13)=    0.15885401503704D-07
     3765c(79,13)=   -0.27785701635593D-08
     3766c(80,13)=    0.11282900601153D-07
     3767c(14,14)=    0.47021295278236D-07
     3768c(15,14)=    0.22219457857795D-06
     3769c(16,14)=   -0.16944993310769D-06
     3770c(17,14)=   -0.35316177030083D-06
     3771c(18,14)=   -0.36574949577333D-06
     3772c(19,14)=    0.15370674221947D-06
     3773c(20,14)=    0.28054717681758D-06
     3774c(21,14)=    0.13450955702606D-06
     3775c(22,14)=   -0.14565214032387D-06
     3776c(23,14)=   -0.83807732025708D-07
     3777c(24,14)=    0.33039361477979D-08
     3778c(25,14)=   -0.76090567719229D-07
     3779c(26,14)=    0.12905418648105D-06
     3780c(27,14)=    0.17337430654230D-06
     3781c(28,14)=    0.80857002198244D-07
     3782c(29,14)=    0.70110690240570D-07
     3783c(30,14)=   -0.13733277347911D-06
     3784c(31,14)=   -0.21562170698916D-07
     3785c(32,14)=    0.21759747165202D-07
     3786c(33,14)=    0.61333748496406D-07
     3787c(34,14)=    0.38829485595747D-07
     3788c(35,14)=   -0.64086563137960D-07
     3789c(36,14)=   -0.10153809047224D-06
     3790c(37,14)=    0.32039980307240D-08
     3791c(38,14)=    0.36304249021626D-07
     3792c(39,14)=   -0.27257848252935D-07
     3793c(40,14)=    0.53269190848855D-08
     3794c(41,14)=   -0.51651425829049D-07
     3795c(42,14)=   -0.57946053082766D-07
     3796c(43,14)=    0.45498065486750D-08
     3797c(44,14)=    0.47767471675605D-07
     3798c(45,14)=   -0.55594018064780D-08
     3799c(46,14)=   -0.10999591526210D-06
     3800c(47,14)=    0.18923122289816D-07
     3801c(48,14)=    0.61960720902588D-07
     3802c(49,14)=   -0.60598476698241D-07
     3803c(50,14)=   -0.67740190638225D-07
     3804c(51,14)=    0.25780522864084D-07
     3805c(52,14)=    0.63555181447774D-07
     3806c(53,14)=   -0.12055036245110D-07
     3807c(54,14)=   -0.53230826865350D-07
     3808c(55,14)=    0.85375653220950D-08
     3809c(56,14)=   -0.18483807864022D-07
     3810c(57,14)=   -0.25455211194517D-09
     3811c(58,14)=    0.12082251417562D-07
     3812c(59,14)=    0.93215676397531D-08
     3813c(60,14)=   -0.22104077649682D-07
     3814c(61,14)=    0.23226932687473D-07
     3815c(62,14)=    0.36234693962067D-07
     3816c(63,14)=    0.11914217891800D-07
     3817c(64,14)=   -0.17905878561972D-07
     3818c(65,14)=    0.11619420494160D-07
     3819c(66,14)=    0.57319890444538D-08
     3820c(67,14)=    0.19784210676846D-07
     3821c(68,14)=   -0.17912811632289D-07
     3822c(69,14)=   -0.80003248139404D-08
     3823c(70,14)=    0.23602690947874D-07
     3824c(71,14)=   -0.94580549890193D-08
     3825c(72,14)=    0.14153322210681D-07
     3826c(73,14)=   -0.94356315047272D-08
     3827c(74,14)=    0.28953059753020D-08
     3828c(75,14)=   -0.25026524449757D-07
     3829c(76,14)=    0.91427701028891D-08
     3830c(77,14)=   -0.23200692086839D-07
     3831c(78,14)=    0.72605453361048D-08
     3832c(79,14)=   -0.12468131635802D-07
     3833c(80,14)=    0.48904006092653D-08
     3834c(15,15)=   -0.33826575599910D-06
     3835c(16,15)=   -0.85495972949958D-06
     3836c(17,15)=   -0.36408938792661D-06
     3837c(18,15)=    0.35819799150966D-06
     3838c(19,15)=    0.82529172013831D-06
     3839c(20,15)=    0.78475364933386D-07
     3840c(21,15)=   -0.32932122376644D-06
     3841c(22,15)=   -0.41965832774604D-06
     3842c(23,15)=   -0.27719475994770D-06
     3843c(24,15)=    0.21532172296135D-06
     3844c(25,15)=    0.44144073998089D-06
     3845c(26,15)=    0.94034486508637D-07
     3846c(27,15)=   -0.50527553014782D-07
     3847c(28,15)=   -0.87669846139116D-07
     3848c(29,15)=    0.41888714845582D-07
     3849c(30,15)=    0.12166056752935D-06
     3850c(31,15)=    0.88299403590952D-07
     3851c(32,15)=    0.46689356080411D-07
     3852c(33,15)=   -0.12797747227092D-06
     3853c(34,15)=   -0.11305342583159D-06
     3854c(35,15)=    0.79647332221832D-07
     3855c(36,15)=    0.25153748542570D-06
     3856c(37,15)=    0.43048298307130D-07
     3857c(38,15)=   -0.69563590983603D-07
     3858c(39,15)=   -0.46081191209894D-07
     3859c(40,15)=   -0.98718472252429D-07
     3860c(41,15)=    0.94967876174956D-07
     3861c(42,15)=    0.97997180838959D-07
     3862c(43,15)=   -0.53778195033675D-08
     3863c(44,15)=   -0.42357934669160D-07
     3864c(45,15)=   -0.12123269508550D-07
     3865c(46,15)=    0.11349722928787D-06
     3866c(47,15)=    0.11067875281430D-07
     3867c(48,15)=   -0.13053510212507D-07
     3868c(49,15)=   -0.14638954657636D-07
     3869c(50,15)=    0.49823097696749D-07
     3870c(51,15)=    0.56629472909396D-07
     3871c(52,15)=   -0.27650738137218D-07
     3872c(53,15)=   -0.10838656591511D-07
     3873c(54,15)=    0.15888344512037D-07
     3874c(55,15)=    0.86772124063542D-08
     3875c(56,15)=   -0.80460750479536D-09
     3876c(57,15)=    0.20227305510350D-08
     3877c(58,15)=    0.31307506718066D-07
     3878c(59,15)=   -0.21600268000035D-07
     3879c(60,15)=    0.20834762794785D-07
     3880c(61,15)=    0.19649645104048D-07
     3881c(62,15)=   -0.10319384192510D-07
     3882c(63,15)=   -0.28311597849162D-07
     3883c(64,15)=   -0.72646727376410D-07
     3884c(65,15)=    0.23316763995366D-07
     3885c(66,15)=   -0.26509433663467D-08
     3886c(67,15)=   -0.26642380677339D-07
     3887c(68,15)=    0.30153600914930D-07
     3888c(69,15)=   -0.34775082982131D-07
     3889c(70,15)=   -0.15669476712055D-07
     3890c(71,15)=    0.58140866847644D-08
     3891c(72,15)=   -0.15813244179083D-07
     3892c(73,15)=   -0.21739180642430D-07
     3893c(74,15)=    0.51335559578317D-08
     3894c(75,15)=   -0.14775847459000D-07
     3895c(76,15)=    0.45298066015886D-08
     3896c(77,15)=    0.12785646702054D-08
     3897c(78,15)=   -0.16274874220888D-07
     3898c(79,15)=    0.72392959718484D-08
     3899c(80,15)=   -0.23845399951142D-07
     3900c(16,16)=    0.20940180005886D-06
     3901c(17,16)=    0.10696458697612D-05
     3902c(18,16)=    0.41157939324289D-06
     3903c(19,16)=   -0.61844626633270D-08
     3904c(20,16)=    0.46528363403318D-07
     3905c(21,16)=   -0.28509034304189D-06
     3906c(22,16)=   -0.20032041830870D-06
     3907c(23,16)=    0.43647221573199D-06
     3908c(24,16)=    0.60074270247024D-06
     3909c(25,16)=   -0.88444347559313D-07
     3910c(26,16)=   -0.50086802979082D-06
     3911c(27,16)=   -0.10370177302162D-06
     3912c(28,16)=    0.17209430787186D-06
     3913c(29,16)=    0.14527833834916D-06
     3914c(30,16)=    0.67423619085705D-07
     3915c(31,16)=   -0.13012023367532D-06
     3916c(32,16)=   -0.18209698545153D-06
     3917c(33,16)=    0.29330141545847D-07
     3918c(34,16)=    0.23040995993151D-06
     3919c(35,16)=    0.11137405742133D-06
     3920c(36,16)=   -0.14322365665332D-06
     3921c(37,16)=   -0.13393323975087D-06
     3922c(38,16)=   -0.58158427107805D-07
     3923c(39,16)=    0.66403824552258D-07
     3924c(40,16)=    0.13326888331571D-06
     3925c(41,16)=   -0.36830244580688D-07
     3926c(42,16)=   -0.14702764073939D-06
     3927c(43,16)=   -0.76430545168527D-07
     3928c(44,16)=    0.11263069331412D-06
     3929c(45,16)=    0.63796262698772D-07
     3930c(46,16)=   -0.87686464926144D-07
     3931c(47,16)=   -0.97964463362824D-08
     3932c(48,16)=    0.79365091027521D-07
     3933c(49,16)=    0.47651494645736D-07
     3934c(50,16)=   -0.24066271282983D-07
     3935c(51,16)=    0.56223103817103D-07
     3936c(52,16)=    0.47985593815186D-07
     3937c(53,16)=   -0.27226622049035D-07
     3938c(54,16)=   -0.31213765163699D-07
     3939c(55,16)=    0.27525580536844D-07
     3940c(56,16)=    0.40704550615353D-07
     3941c(57,16)=    0.14539391121680D-07
     3942c(58,16)=   -0.13130877228086D-07
     3943c(59,16)=    0.14699653481615D-07
     3944c(60,16)=   -0.91637998362305D-08
     3945c(61,16)=    0.81179669745568D-08
     3946c(62,16)=    0.17151092609237D-07
     3947c(63,16)=   -0.74429374406359D-08
     3948c(64,16)=    0.67003182535719D-09
     3949c(65,16)=   -0.35789700257476D-07
     3950c(66,16)=   -0.22138650131817D-07
     3951c(67,16)=   -0.30092279766274D-07
     3952c(68,16)=   -0.18685560165448D-07
     3953c(69,16)=   -0.26432788454162D-07
     3954c(70,16)=    0.50424290960415D-08
     3955c(71,16)=   -0.28808648811523D-07
     3956c(72,16)=   -0.11382697449659D-07
     3957c(73,16)=   -0.14815829721152D-08
     3958c(74,16)=   -0.35217346892953D-07
     3959c(75,16)=   -0.11363933421473D-07
     3960c(76,16)=   -0.29903695425997D-07
     3961c(77,16)=   -0.10568165816869D-07
     3962c(78,16)=   -0.19737582568469D-07
     3963c(79,16)=   -0.19551425947931D-07
     3964c(80,16)=   -0.16322989519910D-08
     3965c(17,17)=    0.54701387168645D-07
     3966c(18,17)=    0.71135256682422D-07
     3967c(19,17)=   -0.11665317418912D-06
     3968c(20,17)=   -0.48568162906700D-06
     3969c(21,17)=   -0.26328670190302D-06
     3970c(22,17)=    0.33024327781270D-06
     3971c(23,17)=    0.31284561172707D-06
     3972c(24,17)=   -0.10503059994605D-06
     3973c(25,17)=   -0.35143134866898D-06
     3974c(26,17)=   -0.24326830441430D-06
     3975c(27,17)=    0.22100890791401D-06
     3976c(28,17)=    0.16019813922073D-06
     3977c(29,17)=   -0.28819396574269D-07
     3978c(30,17)=   -0.13171119227208D-06
     3979c(31,17)=   -0.47817763167130D-07
     3980c(32,17)=    0.12225078912847D-07
     3981c(33,17)=    0.42623845131959D-07
     3982c(34,17)=   -0.83790307497045D-07
     3983c(35,17)=   -0.14399968540526D-06
     3984c(36,17)=   -0.63350654236970D-08
     3985c(37,17)=    0.61044104459295D-07
     3986c(38,17)=    0.61949450540370D-07
     3987c(39,17)=    0.44177767550151D-07
     3988c(40,17)=   -0.71427176328117D-07
     3989c(41,17)=    0.16646511539951D-07
     3990c(42,17)=    0.30889394313482D-07
     3991c(43,17)=   -0.59842571662947D-09
     3992c(44,17)=    0.13614720720525D-07
     3993c(45,17)=    0.11726912716675D-07
     3994c(46,17)=    0.15012106749067D-07
     3995c(47,17)=    0.25102121647612D-09
     3996c(48,17)=   -0.13071448281777D-07
     3997c(49,17)=   -0.34637835249062D-07
     3998c(50,17)=   -0.32933308128326D-09
     3999c(51,17)=    0.38939007315884D-07
     4000c(52,17)=    0.13581147762298D-08
     4001c(53,17)=   -0.93264032646212D-08
     4002c(54,17)=    0.96767939090607D-08
     4003c(55,17)=    0.36659358735424D-07
     4004c(56,17)=    0.37491483020846D-08
     4005c(57,17)=   -0.33698632494570D-08
     4006c(58,17)=   -0.23932301146387D-08
     4007c(59,17)=    0.42250810294220D-08
     4008c(60,17)=    0.50024857363612D-08
     4009c(61,17)=   -0.15884841625309D-07
     4010c(62,17)=    0.16657425735481D-07
     4011c(63,17)=    0.24035489426911D-07
     4012c(64,17)=   -0.14758055967310D-07
     4013c(65,17)=    0.22469107130498D-07
     4014c(66,17)=   -0.46668229709955D-07
     4015c(67,17)=   -0.30884264246269D-07
     4016c(68,17)=   -0.28919828125255D-08
     4017c(69,17)=    0.28658969794463D-08
     4018c(70,17)=    0.29255472177867D-07
     4019c(71,17)=    0.37611588847544D-08
     4020c(72,17)=    0.84076306333866D-08
     4021c(73,17)=    0.86650572592168D-08
     4022c(74,17)=    0.15425043157405D-07
     4023c(75,17)=   -0.13780132543492D-07
     4024c(76,17)=    0.21776929781402D-07
     4025c(77,17)=   -0.18096281174059D-07
     4026c(78,17)=    0.80052085590603D-08
     4027c(79,17)=   -0.16578597468070D-07
     4028c(80,17)=   -0.13357084307772D-08
     4029c(18,18)=    0.46656982881352D-06
     4030c(19,18)=   -0.72203974438337D-06
     4031c(20,18)=    0.35213761763877D-07
     4032c(21,18)=    0.24334025394976D-06
     4033c(22,18)=   -0.11671446266874D-06
     4034c(23,18)=   -0.13241514416301D-06
     4035c(24,18)=    0.36035680514514D-06
     4036c(25,18)=    0.12798344905849D-06
     4037c(26,18)=   -0.27199670154689D-06
     4038c(27,18)=   -0.32523985662353D-07
     4039c(28,18)=    0.27683282308885D-06
     4040c(29,18)=    0.28581207181270D-07
     4041c(30,18)=   -0.71344708930735D-07
     4042c(31,18)=    0.30547665378528D-07
     4043c(32,18)=    0.76591740848835D-07
     4044c(33,18)=   -0.12586254793145D-06
     4045c(34,18)=   -0.27422892767733D-07
     4046c(35,18)=    0.11475323877322D-06
     4047c(36,18)=   -0.33482636659461D-07
     4048c(37,18)=   -0.11596384891875D-06
     4049c(38,18)=   -0.25844182306635D-07
     4050c(39,18)=    0.65617178872133D-07
     4051c(40,18)=    0.58005502905905D-07
     4052c(41,18)=   -0.11349233087356D-06
     4053c(42,18)=   -0.72573977433579D-07
     4054c(43,18)=    0.16836709714452D-07
     4055c(44,18)=    0.58205565043271D-07
     4056c(45,18)=    0.67135385454244D-07
     4057c(46,18)=   -0.42278595866491D-07
     4058c(47,18)=   -0.69071860661362D-07
     4059c(48,18)=    0.27022559026842D-07
     4060c(49,18)=    0.54608578248484D-07
     4061c(50,18)=   -0.51026025277597D-07
     4062c(51,18)=   -0.36922133821202D-07
     4063c(52,18)=   -0.21243464334118D-08
     4064c(53,18)=   -0.63537119606441D-08
     4065c(54,18)=    0.35311423634546D-07
     4066c(55,18)=   -0.64441967139307D-09
     4067c(56,18)=   -0.63934099899106D-08
     4068c(57,18)=   -0.17517136269818D-07
     4069c(58,18)=   -0.12479573707963D-07
     4070c(59,18)=    0.79659850821093D-08
     4071c(60,18)=   -0.18721276925731D-07
     4072c(61,18)=    0.17670204724543D-07
     4073c(62,18)=    0.43540870673701D-08
     4074c(63,18)=    0.16298063385003D-07
     4075c(64,18)=    0.65394780694313D-08
     4076c(65,18)=   -0.14960967688679D-07
     4077c(66,18)=   -0.11950207010582D-07
     4078c(67,18)=    0.16994741177372D-08
     4079c(68,18)=    0.61450979011810D-08
     4080c(69,18)=   -0.24717849546371D-07
     4081c(70,18)=    0.21767138894177D-07
     4082c(71,18)=   -0.29289376420573D-07
     4083c(72,18)=   -0.14163742552877D-07
     4084c(73,18)=    0.45636403434965D-08
     4085c(74,18)=   -0.48803178398436D-07
     4086c(75,18)=    0.48548247736960D-08
     4087c(76,18)=   -0.19930049143878D-07
     4088c(77,18)=   -0.55322134805482D-08
     4089c(78,18)=   -0.21643701140752D-07
     4090c(79,18)=    0.41623489747571D-08
     4091c(80,18)=   -0.20210577532281D-07
     4092c(19,19)=   -0.36488623031146D-06
     4093c(20,19)=    0.17498191632079D-06
     4094c(21,19)=    0.18234844161543D-06
     4095c(22,19)=    0.41049548405926D-06
     4096c(23,19)=    0.41382769125263D-06
     4097c(24,19)=   -0.28283847306805D-06
     4098c(25,19)=   -0.67171858587578D-06
     4099c(26,19)=   -0.13281287624361D-07
     4100c(27,19)=    0.73831317520578D-06
     4101c(28,19)=    0.31697019030015D-06
     4102c(29,19)=   -0.19570027691728D-06
     4103c(30,19)=   -0.25865913112589D-06
     4104c(31,19)=    0.66189798286727D-07
     4105c(32,19)=    0.21940030137740D-06
     4106c(33,19)=    0.21730441828881D-06
     4107c(34,19)=    0.11070102602743D-07
     4108c(35,19)=   -0.10875568103679D-06
     4109c(36,19)=   -0.98549961802302D-07
     4110c(37,19)=    0.11773175276404D-06
     4111c(38,19)=    0.12373075793390D-06
     4112c(39,19)=   -0.80672746880080D-07
     4113c(40,19)=   -0.10499627369546D-06
     4114c(41,19)=    0.97463003969700D-08
     4115c(42,19)=    0.77667013884904D-07
     4116c(43,19)=   -0.25448050543306D-08
     4117c(44,19)=   -0.84328415252217D-08
     4118c(45,19)=    0.19663700560579D-07
     4119c(46,19)=   -0.57579508769271D-07
     4120c(47,19)=    0.62220402666774D-07
     4121c(48,19)=    0.80456306652161D-07
     4122c(49,19)=   -0.10942297172432D-07
     4123c(50,19)=   -0.59666734494807D-07
     4124c(51,19)=   -0.29821353916073D-07
     4125c(52,19)=    0.52731420460540D-07
     4126c(53,19)=    0.16921809036510D-07
     4127c(54,19)=   -0.66440525931939D-07
     4128c(55,19)=   -0.77889674318441D-08
     4129c(56,19)=    0.25265777071564D-07
     4130c(57,19)=   -0.19961563366707D-08
     4131c(58,19)=    0.34843747062013D-08
     4132c(59,19)=    0.26913236517537D-08
     4133c(60,19)=   -0.21092730784263D-07
     4134c(61,19)=   -0.27368683972922D-07
     4135c(62,19)=    0.10436698163346D-07
     4136c(63,19)=    0.34728429204960D-08
     4137c(64,19)=   -0.21415899983517D-07
     4138c(65,19)=   -0.29172479955474D-07
     4139c(66,19)=    0.20484328937738D-07
     4140c(67,19)=   -0.77003006269710D-08
     4141c(68,19)=    0.68077110643878D-08
     4142c(69,19)=    0.27576319284877D-07
     4143c(70,19)=   -0.17063671948984D-07
     4144c(71,19)=    0.35652582279772D-08
     4145c(72,19)=    0.51331374560066D-08
     4146c(73,19)=   -0.16726262326640D-07
     4147c(74,19)=    0.17879784259480D-07
     4148c(75,19)=    0.68971937496097D-08
     4149c(76,19)=   -0.61963011248938D-08
     4150c(77,19)=    0.90614875079607D-08
     4151c(78,19)=   -0.43906604006747D-08
     4152c(79,19)=   -0.38438442046203D-08
     4153c(80,19)=   -0.65132030997370D-08
     4154c(20,20)=   -0.47388247284749D-06
     4155c(21,20)=   -0.12339000794407D-06
     4156c(22,20)=   -0.43652709220027D-06
     4157c(23,20)=   -0.49050613929173D-06
     4158c(24,20)=   -0.81235739566793D-07
     4159c(25,20)=    0.56499626215347D-06
     4160c(26,20)=    0.12278930428748D-06
     4161c(27,20)=   -0.24818904834720D-06
     4162c(28,20)=   -0.26539606385896D-06
     4163c(29,20)=   -0.12786594632194D-06
     4164c(30,20)=    0.12291704860035D-06
     4165c(31,20)=    0.40161300329303D-06
     4166c(32,20)=    0.15962202179924D-06
     4167c(33,20)=   -0.16312204203802D-06
     4168c(34,20)=   -0.17246098146981D-06
     4169c(35,20)=    0.14159663364171D-06
     4170c(36,20)=    0.18338783821004D-06
     4171c(37,20)=    0.65842534620178D-07
     4172c(38,20)=    0.17607805933065D-07
     4173c(39,20)=    0.16630905489238D-08
     4174c(40,20)=    0.47066879402688D-07
     4175c(41,20)=    0.31993670191674D-07
     4176c(42,20)=    0.24112045504797D-07
     4177c(43,20)=    0.29386948733193D-08
     4178c(44,20)=   -0.63550823151513D-07
     4179c(45,20)=    0.50430699402188D-08
     4180c(46,20)=    0.41103919023346D-07
     4181c(47,20)=   -0.24645662834438D-07
     4182c(48,20)=    0.53048318352021D-08
     4183c(49,20)=   -0.16932289464472D-07
     4184c(50,20)=   -0.41841399284243D-07
     4185c(51,20)=   -0.11495118139598D-07
     4186c(52,20)=    0.36232278648845D-07
     4187c(53,20)=    0.15835361411647D-07
     4188c(54,20)=   -0.17140178972305D-07
     4189c(55,20)=   -0.60642737543764D-08
     4190c(56,20)=    0.13380551924738D-08
     4191c(57,20)=   -0.30162880909350D-08
     4192c(58,20)=    0.19626397354767D-08
     4193c(59,20)=    0.41233270172503D-07
     4194c(60,20)=    0.21408192120022D-07
     4195c(61,20)=   -0.78802683142367D-08
     4196c(62,20)=   -0.17958417108302D-07
     4197c(63,20)=   -0.56071100273366D-07
     4198c(64,20)=    0.21343376042478D-08
     4199c(65,20)=    0.54170022859117D-09
     4200c(66,20)=   -0.31859741637542D-07
     4201c(67,20)=    0.53342732542924D-07
     4202c(68,20)=   -0.21166186689024D-07
     4203c(69,20)=   -0.28514542148274D-08
     4204c(70,20)=    0.27951518506446D-07
     4205c(71,20)=   -0.10307834534860D-07
     4206c(72,20)=    0.15107322121888D-07
     4207c(73,20)=    0.33817694479123D-09
     4208c(74,20)=    0.26777201832760D-07
     4209c(75,20)=    0.12375624289778D-07
     4210c(76,20)=    0.30069089333642D-07
     4211c(77,20)=    0.34309026025203D-08
     4212c(78,20)=    0.15330082776951D-07
     4213c(79,20)=    0.14757179279055D-07
     4214c(80,20)=   -0.38003438288289D-08
     4215c(21,21)=    0.66801656361563D-06
     4216c(22,21)=    0.22695041961075D-06
     4217c(23,21)=    0.44090545303246D-06
     4218c(24,21)=   -0.37895350129349D-07
     4219c(25,21)=   -0.68730646069251D-06
     4220c(26,21)=   -0.26279832988690D-06
     4221c(27,21)=    0.28469163064165D-06
     4222c(28,21)=    0.21734973853847D-06
     4223c(29,21)=   -0.17343242283494D-06
     4224c(30,21)=   -0.32809610520172D-07
     4225c(31,21)=   -0.12733505527466D-07
     4226c(32,21)=   -0.67932447668075D-07
     4227c(33,21)=   -0.47019512161784D-07
     4228c(34,21)=    0.31471635002656D-07
     4229c(35,21)=    0.49048388496592D-07
     4230c(36,21)=    0.83329503886604D-07
     4231c(37,21)=   -0.49282623952816D-08
     4232c(38,21)=   -0.12925156961751D-07
     4233c(39,21)=   -0.31963257671986D-07
     4234c(40,21)=    0.66590167520988D-08
     4235c(41,21)=    0.98817058942399D-07
     4236c(42,21)=    0.37605383750701D-07
     4237c(43,21)=   -0.27830621504435D-07
     4238c(44,21)=   -0.40418029820324D-07
     4239c(45,21)=    0.91859461635090D-09
     4240c(46,21)=   -0.19730249807615D-07
     4241c(47,21)=    0.11851628452068D-07
     4242c(48,21)=    0.14639167924279D-07
     4243c(49,21)=   -0.21754507960563D-07
     4244c(50,21)=   -0.24067375212203D-07
     4245c(51,21)=    0.28599563504452D-08
     4246c(52,21)=    0.35681365916782D-07
     4247c(53,21)=    0.97529859432951D-08
     4248c(54,21)=   -0.75983263026241D-07
     4249c(55,21)=    0.29918164273647D-07
     4250c(56,21)=    0.31950356789542D-07
     4251c(57,21)=   -0.18132609646459D-07
     4252c(58,21)=   -0.29257205779927D-07
     4253c(59,21)=   -0.37200365621068D-08
     4254c(60,21)=    0.38205597192254D-07
     4255c(61,21)=    0.11272521808560D-07
     4256c(62,21)=   -0.11664113135659D-07
     4257c(63,21)=   -0.73057985316199D-08
     4258c(64,21)=   -0.27677612090994D-08
     4259c(65,21)=    0.36040573095370D-08
     4260c(66,21)=    0.25787279693229D-07
     4261c(67,21)=   -0.86957805251398D-08
     4262c(68,21)=   -0.55649103460140D-08
     4263c(69,21)=    0.15265548801377D-07
     4264c(70,21)=    0.35448812479815D-07
     4265c(71,21)=   -0.68589306764546D-08
     4266c(72,21)=    0.31834576620702D-07
     4267c(73,21)=   -0.49374229123815D-08
     4268c(74,21)=    0.16439779910660D-09
     4269c(75,21)=    0.31044128392424D-07
     4270c(76,21)=   -0.30113345576158D-08
     4271c(77,21)=    0.39170181976378D-07
     4272c(78,21)=   -0.59917985487534D-08
     4273c(79,21)=    0.23178362595262D-07
     4274c(80,21)=   -0.12786737597268D-07
     4275c(22,22)=   -0.11411133475898D-06
     4276c(23,22)=    0.17110677302269D-06
     4277c(24,22)=   -0.10587573763555D-06
     4278c(25,22)=    0.33521479699086D-06
     4279c(26,22)=    0.40227056541479D-06
     4280c(27,22)=   -0.23272077782554D-06
     4281c(28,22)=   -0.37341707266588D-06
     4282c(29,22)=    0.78100415541802D-07
     4283c(30,22)=    0.20280238119689D-06
     4284c(31,22)=    0.13784175106419D-06
     4285c(32,22)=   -0.12420910000420D-06
     4286c(33,22)=   -0.63631476345334D-07
     4287c(34,22)=   -0.65546742937671D-07
     4288c(35,22)=    0.72321494313189D-07
     4289c(36,22)=    0.51436658429770D-07
     4290c(37,22)=    0.39640401394404D-07
     4291c(38,22)=   -0.10409129234201D-06
     4292c(39,22)=   -0.65354707774874D-07
     4293c(40,22)=    0.42634055748588D-07
     4294c(41,22)=    0.65460387769598D-07
     4295c(42,22)=   -0.18109241916822D-07
     4296c(43,22)=   -0.65632458727538D-07
     4297c(44,22)=    0.68983050838698D-08
     4298c(45,22)=    0.55442014524560D-07
     4299c(46,22)=    0.39443958851056D-07
     4300c(47,22)=   -0.57185005444180D-07
     4301c(48,22)=   -0.34467977713549D-07
     4302c(49,22)=   -0.34596063089222D-07
     4303c(50,22)=    0.13892672880796D-07
     4304c(51,22)=    0.44209988486808D-07
     4305c(52,22)=    0.10896735238304D-07
     4306c(53,22)=   -0.17661974329943D-07
     4307c(54,22)=   -0.53634574743683D-07
     4308c(55,22)=   -0.17248553870907D-07
     4309c(56,22)=    0.30432449984706D-07
     4310c(57,22)=   -0.15796666457769D-07
     4311c(58,22)=   -0.87713858685771D-08
     4312c(59,22)=   -0.20939165130728D-07
     4313c(60,22)=    0.19574575636057D-07
     4314c(61,22)=   -0.30975426084544D-07
     4315c(62,22)=   -0.10973232656097D-07
     4316c(63,22)=    0.40264187905897D-07
     4317c(64,22)=   -0.17368952968311D-07
     4318c(65,22)=    0.43794519119160D-08
     4319c(66,22)=    0.13406416109298D-07
     4320c(67,22)=    0.37085940789819D-07
     4321c(68,22)=    0.10617163289153D-07
     4322c(69,22)=    0.46762767510145D-08
     4323c(70,22)=    0.30719518942792D-07
     4324c(71,22)=   -0.11985554100366D-07
     4325c(72,22)=    0.32837674655834D-07
     4326c(73,22)=    0.18015628046874D-07
     4327c(74,22)=    0.28297092215668D-07
     4328c(75,22)=    0.25034784697646D-07
     4329c(76,22)=    0.34219864341146D-07
     4330c(77,22)=    0.22944444993649D-07
     4331c(78,22)=    0.35818440943536D-07
     4332c(79,22)=    0.21635353557979D-07
     4333c(80,22)=    0.33894259709796D-07
     4334c(23,23)=   -0.55132911635500D-06
     4335c(24,23)=   -0.58926412579959D-06
     4336c(25,23)=   -0.51315458270389D-06
     4337c(26,23)=   -0.26261888686332D-06
     4338c(27,23)=    0.14576740229800D-06
     4339c(28,23)=    0.38585456798044D-06
     4340c(29,23)=    0.66995964161193D-07
     4341c(30,23)=   -0.16251214080634D-06
     4342c(31,23)=   -0.12238386862490D-06
     4343c(32,23)=   -0.42458438711385D-07
     4344c(33,23)=   -0.18067172599805D-07
     4345c(34,23)=    0.13009099109376D-06
     4346c(35,23)=    0.31651928110492D-07
     4347c(36,23)=    0.11978687288709D-09
     4348c(37,23)=   -0.12629933344705D-06
     4349c(38,23)=   -0.37130646665923D-07
     4350c(39,23)=    0.86734371358331D-07
     4351c(40,23)=    0.80611044030297D-07
     4352c(41,23)=   -0.44577951142381D-07
     4353c(42,23)=   -0.54936752461265D-07
     4354c(43,23)=   -0.11297736606126D-06
     4355c(44,23)=   -0.83269881447660D-08
     4356c(45,23)=    0.49991835706267D-07
     4357c(46,23)=   -0.28159240767130D-07
     4358c(47,23)=   -0.68223851181465D-07
     4359c(48,23)=   -0.39901537310458D-07
     4360c(49,23)=    0.48584499142797D-07
     4361c(50,23)=    0.14446762547444D-08
     4362c(51,23)=   -0.50994668094026D-07
     4363c(52,23)=   -0.17651577544801D-07
     4364c(53,23)=    0.15463684721894D-07
     4365c(54,23)=    0.17832090824119D-07
     4366c(55,23)=   -0.42173396292640D-08
     4367c(56,23)=    0.95349773671057D-08
     4368c(57,23)=   -0.52830499167672D-07
     4369c(58,23)=   -0.38825709417983D-07
     4370c(59,23)=    0.17027700586923D-07
     4371c(60,23)=    0.33326808633737D-07
     4372c(61,23)=    0.86978868777464D-08
     4373c(62,23)=   -0.23749175485776D-07
     4374c(63,23)=   -0.30714494159292D-07
     4375c(64,23)=    0.13103887643843D-07
     4376c(65,23)=    0.16155192522717D-07
     4377c(66,23)=    0.32984699484048D-07
     4378c(67,23)=    0.56546884026074D-08
     4379c(68,23)=    0.82254206219378D-09
     4380c(69,23)=   -0.13077802587556D-07
     4381c(70,23)=   -0.41592406679985D-07
     4382c(71,23)=    0.13722687204235D-07
     4383c(72,23)=   -0.39592855730196D-07
     4384c(73,23)=    0.37758246583069D-08
     4385c(74,23)=   -0.24256660738867D-07
     4386c(75,23)=   -0.26000421236925D-07
     4387c(76,23)=    0.83798077844146D-08
     4388c(77,23)=   -0.48513087131603D-07
     4389c(78,23)=    0.15559617982592D-07
     4390c(79,23)=   -0.55293533765553D-07
     4391c(80,23)=    0.20134258862280D-07
     4392c(24,24)=    0.27360023822351D-06
     4393c(25,24)=    0.32738384010408D-06
     4394c(26,24)=    0.72863473401760D-06
     4395c(27,24)=    0.16093057770313D-06
     4396c(28,24)=   -0.29589926512110D-06
     4397c(29,24)=   -0.10991726774138D-06
     4398c(30,24)=    0.11254291701804D-06
     4399c(31,24)=    0.17859073686593D-07
     4400c(32,24)=   -0.30011726079240D-07
     4401c(33,24)=    0.13915220352998D-06
     4402c(34,24)=    0.11409795602060D-06
     4403c(35,24)=   -0.13798663590998D-06
     4404c(36,24)=   -0.13157126113546D-06
     4405c(37,24)=    0.43616254907620D-07
     4406c(38,24)=    0.53242550915175D-07
     4407c(39,24)=   -0.15872770405754D-07
     4408c(40,24)=    0.49378347054287D-07
     4409c(41,24)=   -0.23370839834228D-07
     4410c(42,24)=   -0.61613101099447D-07
     4411c(43,24)=   -0.19440049821244D-07
     4412c(44,24)=    0.10079463392137D-06
     4413c(45,24)=   -0.14693885308818D-07
     4414c(46,24)=   -0.57817890838879D-07
     4415c(47,24)=   -0.57254998897843D-07
     4416c(48,24)=    0.15034522215740D-07
     4417c(49,24)=    0.19077209840090D-07
     4418c(50,24)=   -0.95208092046963D-08
     4419c(51,24)=    0.10282440206743D-07
     4420c(52,24)=   -0.46351326670846D-07
     4421c(53,24)=   -0.10863182835033D-07
     4422c(54,24)=   -0.74793148216455D-09
     4423c(55,24)=    0.93620343855328D-08
     4424c(56,24)=    0.29068723779422D-08
     4425c(57,24)=   -0.15419884256602D-07
     4426c(58,24)=   -0.60395360286350D-08
     4427c(59,24)=    0.39581769608064D-07
     4428c(60,24)=   -0.26508552555905D-08
     4429c(61,24)=   -0.18491414748868D-07
     4430c(62,24)=   -0.17172922202434D-07
     4431c(63,24)=   -0.29424835187963D-08
     4432c(64,24)=    0.19662057722625D-07
     4433c(65,24)=    0.24066937436565D-08
     4434c(66,24)=    0.17953685293943D-07
     4435c(67,24)=    0.95222343380676D-08
     4436c(68,24)=    0.21946265479023D-08
     4437c(69,24)=    0.23364113366357D-08
     4438c(70,24)=   -0.20275669559082D-07
     4439c(71,24)=   -0.29967567672062D-08
     4440c(72,24)=   -0.53160274878373D-08
     4441c(73,24)=    0.31489670100519D-07
     4442c(74,24)=   -0.14624284525145D-08
     4443c(75,24)=    0.28207731919307D-07
     4444c(76,24)=   -0.13192466585347D-07
     4445c(77,24)=    0.35850722943136D-07
     4446c(78,24)=   -0.13251015428247D-07
     4447c(79,24)=    0.29557122352244D-07
     4448c(80,24)=   -0.19331113253332D-07
     4449c(25,25)=    0.13827677523287D-06
     4450c(26,25)=    0.27625280762581D-06
     4451c(27,25)=   -0.96240679400536D-07
     4452c(28,25)=   -0.50080049447013D-07
     4453c(29,25)=    0.10837288324825D-06
     4454c(30,25)=   -0.18429883698663D-06
     4455c(31,25)=    0.32165873057388D-08
     4456c(32,25)=    0.10573172690568D-06
     4457c(33,25)=    0.50146203682854D-07
     4458c(34,25)=   -0.11281578875297D-06
     4459c(35,25)=   -0.54004629034111D-07
     4460c(36,25)=    0.28592437724991D-07
     4461c(37,25)=    0.73009647804798D-07
     4462c(38,25)=   -0.24905250419934D-07
     4463c(39,25)=   -0.42476689752654D-07
     4464c(40,25)=   -0.72060583598888D-07
     4465c(41,25)=    0.20897240094878D-07
     4466c(42,25)=    0.16619890321859D-07
     4467c(43,25)=    0.34629351316775D-07
     4468c(44,25)=   -0.29466152701850D-07
     4469c(45,25)=    0.55075897055936D-07
     4470c(46,25)=   -0.15017910423017D-08
     4471c(47,25)=   -0.34302255994406D-07
     4472c(48,25)=    0.61340681274207D-08
     4473c(49,25)=    0.29036834928664D-07
     4474c(50,25)=   -0.81096146062157D-09
     4475c(51,25)=   -0.42957902037937D-07
     4476c(52,25)=   -0.94697605834800D-08
     4477c(53,25)=   -0.17030074324832D-07
     4478c(54,25)=    0.77264677944891D-08
     4479c(55,25)=   -0.11146747060136D-07
     4480c(56,25)=   -0.94023525814262D-08
     4481c(57,25)=    0.49020310280130D-07
     4482c(58,25)=    0.20124054899184D-07
     4483c(59,25)=   -0.17995425121176D-07
     4484c(60,25)=   -0.56268220366364D-08
     4485c(61,25)=    0.33779675058183D-07
     4486c(62,25)=    0.18273518403616D-07
     4487c(63,25)=   -0.27665906223905D-07
     4488c(64,25)=    0.13771301241879D-07
     4489c(65,25)=   -0.14506820228763D-07
     4490c(66,25)=    0.15878668828642D-08
     4491c(67,25)=    0.17622768093748D-07
     4492c(68,25)=    0.29476695214199D-07
     4493c(69,25)=    0.26577367028634D-07
     4494c(70,25)=    0.11677120879497D-07
     4495c(71,25)=   -0.37909563759775D-07
     4496c(72,25)=    0.25008418617247D-07
     4497c(73,25)=   -0.28380435542435D-08
     4498c(74,25)=    0.10649666747561D-07
     4499c(75,25)=    0.24119782709760D-07
     4500c(76,25)=   -0.54017796573998D-08
     4501c(77,25)=    0.19111003800308D-07
     4502c(78,25)=   -0.31631113712616D-07
     4503c(79,25)=    0.22478056142447D-07
     4504c(80,25)=   -0.39976017400591D-07
     4505c(26,26)=   -0.15768781906645D-06
     4506c(27,26)=   -0.28716714447585D-06
     4507c(28,26)=   -0.37837486086759D-06
     4508c(29,26)=   -0.12189316103849D-07
     4509c(30,26)=    0.11694968385426D-06
     4510c(31,26)=    0.17530693411769D-06
     4511c(32,26)=    0.32497432436030D-07
     4512c(33,26)=   -0.23119735238602D-07
     4513c(34,26)=    0.74636012461474D-07
     4514c(35,26)=    0.15395549829320D-08
     4515c(36,26)=    0.20013793882874D-08
     4516c(37,26)=   -0.42502753577933D-07
     4517c(38,26)=    0.43313630950955D-07
     4518c(39,26)=   -0.17243272467394D-07
     4519c(40,26)=    0.16182982494337D-07
     4520c(41,26)=   -0.24319674509892D-07
     4521c(42,26)=    0.11703675729424D-07
     4522c(43,26)=    0.40833570563849D-07
     4523c(44,26)=   -0.33754590797787D-09
     4524c(45,26)=   -0.15309772857120D-07
     4525c(46,26)=   -0.11040468272219D-07
     4526c(47,26)=    0.39941386102419D-08
     4527c(48,26)=    0.37957000702940D-07
     4528c(49,26)=    0.37206048721622D-07
     4529c(50,26)=    0.33144313356696D-07
     4530c(51,26)=   -0.19472123432831D-08
     4531c(52,26)=   -0.36716371681056D-07
     4532c(53,26)=    0.12402559308799D-07
     4533c(54,26)=    0.40800283942106D-07
     4534c(55,26)=    0.18524878935786D-07
     4535c(56,26)=   -0.27461362896829D-07
     4536c(57,26)=   -0.53435381799615D-07
     4537c(58,26)=    0.74740768845563D-08
     4538c(59,26)=    0.21871523310841D-07
     4539c(60,26)=   -0.19021180048423D-07
     4540c(61,26)=   -0.26836181875340D-08
     4541c(62,26)=   -0.18952070737695D-07
     4542c(63,26)=    0.19662374227625D-07
     4543c(64,26)=    0.53486771190449D-08
     4544c(65,26)=   -0.27400639652929D-08
     4545c(66,26)=   -0.16533488030242D-07
     4546c(67,26)=    0.13897698716283D-07
     4547c(68,26)=   -0.52270927859002D-08
     4548c(69,26)=   -0.15466373293019D-07
     4549c(70,26)=    0.22100777349175D-07
     4550c(71,26)=   -0.18112639846698D-07
     4551c(72,26)=    0.34923579670438D-07
     4552c(73,26)=    0.95812667845168D-08
     4553c(74,26)=    0.14320091388089D-07
     4554c(75,26)=    0.35129192097712D-08
     4555c(76,26)=    0.21728683861324D-07
     4556c(77,26)=   -0.12469401072512D-07
     4557c(78,26)=    0.25525630309300D-07
     4558c(79,26)=   -0.27617997939105D-08
     4559c(80,26)=    0.16711466880933D-07
     4560c(27,27)=    0.49922745314867D-06
     4561c(28,27)=    0.51307032689722D-07
     4562c(29,27)=    0.47342079945331D-06
     4563c(30,27)=    0.31273964601630D-06
     4564c(31,27)=   -0.93208680613626D-07
     4565c(32,27)=   -0.49604553155496D-07
     4566c(33,27)=   -0.52592873912420D-07
     4567c(34,27)=   -0.10971440832705D-06
     4568c(35,27)=   -0.94295297611662D-07
     4569c(36,27)=    0.66563298481375D-07
     4570c(37,27)=    0.14317673509148D-06
     4571c(38,27)=   -0.17144489535359D-07
     4572c(39,27)=   -0.94722990492321D-07
     4573c(40,27)=    0.43786436520367D-08
     4574c(41,27)=    0.12572169813857D-06
     4575c(42,27)=    0.46379869838391D-07
     4576c(43,27)=   -0.46811398187818D-07
     4577c(44,27)=   -0.67977000624105D-07
     4578c(45,27)=   -0.39846423793425D-07
     4579c(46,27)=    0.18625166975218D-07
     4580c(47,27)=    0.20793584765986D-07
     4581c(48,27)=   -0.16229061557653D-07
     4582c(49,27)=   -0.41254092172753D-07
     4583c(50,27)=   -0.11133624841479D-08
     4584c(51,27)=   -0.95346373542353D-08
     4585c(52,27)=    0.38083286492211D-09
     4586c(53,27)=   -0.32630560970930D-09
     4587c(54,27)=   -0.17581841044420D-08
     4588c(55,27)=   -0.40120425280532D-07
     4589c(56,27)=   -0.53321988305913D-08
     4590c(57,27)=    0.62440969854788D-07
     4591c(58,27)=    0.27465497133955D-07
     4592c(59,27)=   -0.29902266610927D-07
     4593c(60,27)=   -0.22972128426252D-07
     4594c(61,27)=    0.33610641602112D-07
     4595c(62,27)=    0.24584322369889D-07
     4596c(63,27)=   -0.24389544807378D-07
     4597c(64,27)=   -0.62052229565562D-07
     4598c(65,27)=    0.20781774132365D-07
     4599c(66,27)=    0.24924741317856D-07
     4600c(67,27)=   -0.40707642790285D-07
     4601c(68,27)=    0.21050431435801D-09
     4602c(69,27)=   -0.16447647711241D-07
     4603c(70,27)=   -0.36497401984733D-08
     4604c(71,27)=    0.11138804780997D-07
     4605c(72,27)=    0.20916302338556D-07
     4606c(73,27)=    0.36258873465065D-07
     4607c(74,27)=    0.14782292380843D-07
     4608c(75,27)=    0.36989493200005D-07
     4609c(76,27)=    0.43421887974999D-08
     4610c(77,27)=    0.41521520832111D-07
     4611c(78,27)=   -0.24515004678780D-08
     4612c(79,27)=    0.52012055408943D-07
     4613c(80,27)=   -0.22821743159857D-07
     4614c(28,28)=   -0.13689973617542D-06
     4615c(29,28)=   -0.36388931964975D-07
     4616c(30,28)=   -0.22231722481905D-06
     4617c(31,28)=   -0.38150827821589D-06
     4618c(32,28)=   -0.58287455217108D-07
     4619c(33,28)=   -0.74350715266180D-07
     4620c(34,28)=    0.81814502729351D-07
     4621c(35,28)=    0.15080464160424D-06
     4622c(36,28)=   -0.75436706016174D-08
     4623c(37,28)=   -0.17476378746928D-06
     4624c(38,28)=   -0.11431195964044D-06
     4625c(39,28)=    0.19545174111152D-06
     4626c(40,28)=    0.16305356191226D-06
     4627c(41,28)=   -0.93078528856659D-07
     4628c(42,28)=   -0.12897344777906D-06
     4629c(43,28)=   -0.77923049190565D-07
     4630c(44,28)=   -0.97268960102326D-08
     4631c(45,28)=    0.74039577562575D-07
     4632c(46,28)=   -0.45808062259145D-08
     4633c(47,28)=   -0.69851857908157D-07
     4634c(48,28)=   -0.38470248635592D-07
     4635c(49,28)=    0.49105275517028D-07
     4636c(50,28)=    0.30297015546051D-07
     4637c(51,28)=   -0.34991597752385D-07
     4638c(52,28)=   -0.51839954778737D-07
     4639c(53,28)=   -0.13214778203740D-07
     4640c(54,28)=    0.22477820102354D-07
     4641c(55,28)=   -0.13908576065961D-07
     4642c(56,28)=   -0.12162546127106D-07
     4643c(57,28)=   -0.15722553589095D-07
     4644c(58,28)=   -0.33487420235316D-07
     4645c(59,28)=    0.47044156737570D-08
     4646c(60,28)=    0.28198960167965D-07
     4647c(61,28)=    0.73303752073192D-08
     4648c(62,28)=   -0.18370041251986D-07
     4649c(63,28)=    0.12349279004626D-08
     4650c(64,28)=    0.35007731749392D-08
     4651c(65,28)=   -0.23224498552509D-07
     4652c(66,28)=    0.13970133302314D-07
     4653c(67,28)=   -0.89120626545945D-09
     4654c(68,28)=   -0.79376188101558D-08
     4655c(69,28)=    0.35387467400759D-08
     4656c(70,28)=   -0.13220441921215D-07
     4657c(71,28)=   -0.32123127538395D-08
     4658c(72,28)=    0.44176267253961D-08
     4659c(73,28)=    0.67659583418974D-08
     4660c(74,28)=    0.14056659707927D-07
     4661c(75,28)=    0.20844639281022D-07
     4662c(76,28)=    0.17272049921388D-07
     4663c(77,28)=    0.22371913041315D-07
     4664c(78,28)=    0.87387875836527D-08
     4665c(79,28)=    0.19380306095852D-07
     4666c(80,28)=    0.24314259472560D-08
     4667c(29,29)=   -0.15397394928722D-06
     4668c(30,29)=    0.17163119431251D-07
     4669c(31,29)=   -0.75620640053598D-07
     4670c(32,29)=    0.42868420782768D-07
     4671c(33,29)=    0.15799589034123D-06
     4672c(34,29)=    0.10232700385077D-06
     4673c(35,29)=   -0.12829305964441D-06
     4674c(36,29)=   -0.14293188494881D-06
     4675c(37,29)=    0.82381952665583D-07
     4676c(38,29)=    0.12901950578175D-06
     4677c(39,29)=   -0.72815490635225D-07
     4678c(40,29)=   -0.72543507067565D-07
     4679c(41,29)=   -0.30558594101122D-07
     4680c(42,29)=    0.48650112950610D-08
     4681c(43,29)=    0.28832565940202D-09
     4682c(44,29)=   -0.20017089623151D-07
     4683c(45,29)=   -0.12708975149658D-07
     4684c(46,29)=   -0.32574403218797D-07
     4685c(47,29)=    0.34663095824221D-08
     4686c(48,29)=    0.31860141170627D-08
     4687c(49,29)=   -0.31449739233846D-08
     4688c(50,29)=   -0.28462300498113D-07
     4689c(51,29)=   -0.35729047384193D-07
     4690c(52,29)=    0.23769432318297D-08
     4691c(53,29)=    0.46161104813680D-07
     4692c(54,29)=   -0.94831705493119D-08
     4693c(55,29)=   -0.56340321229327D-07
     4694c(56,29)=   -0.45657689848635D-07
     4695c(57,29)=    0.29094738968036D-07
     4696c(58,29)=    0.36711216012873D-07
     4697c(59,29)=    0.15306448205221D-08
     4698c(60,29)=   -0.14249087220871D-07
     4699c(61,29)=    0.28649671796700D-07
     4700c(62,29)=   -0.11416285183053D-07
     4701c(63,29)=   -0.35195295471856D-07
     4702c(64,29)=    0.19563969323385D-07
     4703c(65,29)=    0.21661845663115D-07
     4704c(66,29)=    0.10551643257578D-08
     4705c(67,29)=    0.14730370872549D-07
     4706c(68,29)=   -0.13561004099641D-07
     4707c(69,29)=   -0.20476363454595D-07
     4708c(70,29)=   -0.67750299933167D-09
     4709c(71,29)=   -0.35005990687414D-07
     4710c(72,29)=   -0.65643894247056D-08
     4711c(73,29)=    0.21692423049340D-08
     4712c(74,29)=   -0.22267588946526D-07
     4713c(75,29)=   -0.17568510128030D-07
     4714c(76,29)=   -0.25388068203378D-08
     4715c(77,29)=   -0.22367038245313D-07
     4716c(78,29)=    0.27866557535431D-08
     4717c(79,29)=   -0.24300705562891D-07
     4718c(80,29)=    0.11905917970883D-07
     4719c(30,30)=    0.83186343568163D-07
     4720c(31,30)=    0.23812610706667D-07
     4721c(32,30)=    0.16269246219649D-06
     4722c(33,30)=    0.12954915838060D-06
     4723c(34,30)=    0.36293181471303D-07
     4724c(35,30)=    0.10376351794984D-06
     4725c(36,30)=   -0.99078257625299D-07
     4726c(37,30)=   -0.93028550280416D-07
     4727c(38,30)=   -0.12621296536070D-06
     4728c(39,30)=    0.12295135568984D-06
     4729c(40,30)=    0.16096277489877D-06
     4730c(41,30)=   -0.27673871698105D-07
     4731c(42,30)=   -0.10023188068847D-06
     4732c(43,30)=    0.34525964033799D-07
     4733c(44,30)=    0.10836442675597D-06
     4734c(45,30)=    0.42389965745143D-07
     4735c(46,30)=   -0.23482682177555D-07
     4736c(47,30)=   -0.58934570584881D-07
     4737c(48,30)=   -0.36157018585747D-07
     4738c(49,30)=    0.47357700819730D-07
     4739c(50,30)=    0.63047674075323D-07
     4740c(51,30)=   -0.28469935204260D-08
     4741c(52,30)=   -0.27982829983927D-07
     4742c(53,30)=   -0.32706828381456D-07
     4743c(54,30)=    0.21802672309297D-07
     4744c(55,30)=   -0.25004109572926D-07
     4745c(56,30)=    0.10570594075491D-07
     4746c(57,30)=    0.20347369544623D-07
     4747c(58,30)=   -0.13128767510778D-07
     4748c(59,30)=   -0.20356843497471D-07
     4749c(60,30)=   -0.96912610461841D-09
     4750c(61,30)=    0.11291487103604D-07
     4751c(62,30)=    0.67482106273810D-08
     4752c(63,30)=   -0.89895652575622D-08
     4753c(64,30)=    0.39542250836942D-07
     4754c(65,30)=    0.90599837235250D-08
     4755c(66,30)=   -0.22073492422253D-07
     4756c(67,30)=   -0.41919069815473D-07
     4757c(68,30)=    0.28348949353530D-07
     4758c(69,30)=    0.36447692780697D-07
     4759c(70,30)=   -0.70187849639355D-08
     4760c(71,30)=    0.16788401195784D-07
     4761c(72,30)=   -0.23089232450709D-07
     4762c(73,30)=    0.14948522539138D-07
     4763c(74,30)=   -0.93865279422310D-09
     4764c(75,30)=   -0.18807804688485D-07
     4765c(76,30)=    0.36938784201911D-08
     4766c(77,30)=   -0.15504731737758D-07
     4767c(78,30)=   -0.86966446791838D-08
     4768c(79,30)=   -0.37600224133010D-08
     4769c(80,30)=   -0.10561182421300D-07
     4770c(31,31)=   -0.19971160085949D-06
     4771c(32,31)=    0.10908816421837D-06
     4772c(33,31)=   -0.16423185813899D-06
     4773c(34,31)=   -0.27831701396602D-06
     4774c(35,31)=   -0.60764412378810D-07
     4775c(36,31)=   -0.11192741536182D-06
     4776c(37,31)=    0.15141181019967D-06
     4777c(38,31)=    0.30323807895755D-06
     4778c(39,31)=    0.43022525943111D-07
     4779c(40,31)=   -0.21100144591716D-06
     4780c(41,31)=   -0.59251904915924D-07
     4781c(42,31)=    0.94353917088774D-07
     4782c(43,31)=    0.13777426702155D-06
     4783c(44,31)=    0.23134424874716D-08
     4784c(45,31)=   -0.90228954967828D-07
     4785c(46,31)=   -0.12517418053937D-07
     4786c(47,31)=    0.35862897194960D-07
     4787c(48,31)=    0.94098714309386D-07
     4788c(49,31)=    0.42723201776514D-07
     4789c(50,31)=   -0.12902144742638D-07
     4790c(51,31)=   -0.17588938173710D-07
     4791c(52,31)=    0.13165185712010D-07
     4792c(53,31)=    0.61512672049867D-07
     4793c(54,31)=    0.21734143962000D-07
     4794c(55,31)=   -0.32452109194103D-07
     4795c(56,31)=    0.48910497644945D-08
     4796c(57,31)=    0.33392689067592D-07
     4797c(58,31)=   -0.38347685177227D-08
     4798c(59,31)=   -0.44165074507785D-09
     4799c(60,31)=   -0.17841906031136D-07
     4800c(61,31)=   -0.27569789564735D-07
     4801c(62,31)=    0.13380484859283D-07
     4802c(63,31)=   -0.75272826765232D-08
     4803c(64,31)=   -0.45360521108785D-08
     4804c(65,31)=    0.18960524919855D-09
     4805c(66,31)=    0.56356045681231D-08
     4806c(67,31)=    0.30023740484481D-07
     4807c(68,31)=    0.84992532727179D-08
     4808c(69,31)=   -0.59599812310000D-08
     4809c(70,31)=    0.30639656550984D-09
     4810c(71,31)=    0.13947996581212D-07
     4811c(72,31)=    0.16382973370411D-07
     4812c(73,31)=   -0.11097442635374D-08
     4813c(74,31)=    0.28179014724023D-07
     4814c(75,31)=    0.42297861194098D-08
     4815c(76,31)=    0.94844315150209D-08
     4816c(77,31)=    0.24016512447752D-07
     4817c(78,31)=   -0.59973313546418D-08
     4818c(79,31)=    0.26764883203518D-07
     4819c(80,31)=   -0.48425109191681D-08
     4820c(32,32)=    0.87589187448183D-07
     4821c(33,32)=    0.42337514614445D-07
     4822c(34,32)=    0.11983455625456D-06
     4823c(35,32)=    0.22254793177251D-06
     4824c(36,32)=    0.20223389264696D-06
     4825c(37,32)=   -0.17352387443074D-07
     4826c(38,32)=   -0.12309263008740D-06
     4827c(39,32)=   -0.77038893054049D-07
     4828c(40,32)=    0.10648215450483D-06
     4829c(41,32)=    0.89715620444346D-07
     4830c(42,32)=   -0.11317612632298D-07
     4831c(43,32)=   -0.29920121867975D-07
     4832c(44,32)=   -0.26650675104411D-07
     4833c(45,32)=   -0.33637956681839D-07
     4834c(46,32)=    0.22088137286031D-07
     4835c(47,32)=    0.60744666629907D-07
     4836c(48,32)=   -0.16552897447257D-07
     4837c(49,32)=   -0.55388812557025D-07
     4838c(50,32)=    0.30675953304965D-07
     4839c(51,32)=    0.27637435278865D-07
     4840c(52,32)=   -0.78186216052303D-08
     4841c(53,32)=    0.15699836962564D-07
     4842c(54,32)=    0.36391188947904D-07
     4843c(55,32)=   -0.16401826604118D-07
     4844c(56,32)=   -0.70290099949870D-08
     4845c(57,32)=    0.50425652873629D-07
     4846c(58,32)=    0.46358498149771D-08
     4847c(59,32)=   -0.23250058492860D-07
     4848c(60,32)=   -0.33095184207838D-07
     4849c(61,32)=    0.31577510302841D-07
     4850c(62,32)=   -0.17001480715715D-07
     4851c(63,32)=   -0.22013692833670D-07
     4852c(64,32)=   -0.24269775264514D-07
     4853c(65,32)=   -0.39725406675138D-08
     4854c(66,32)=    0.17237680450052D-07
     4855c(67,32)=    0.96163156520467D-09
     4856c(68,32)=   -0.29832574133303D-07
     4857c(69,32)=    0.44200002774657D-07
     4858c(70,32)=   -0.79566261925044D-08
     4859c(71,32)=   -0.13613272106422D-07
     4860c(72,32)=    0.27937227740734D-08
     4861c(73,32)=   -0.93001102663037D-08
     4862c(74,32)=   -0.22116499900137D-07
     4863c(75,32)=   -0.68369804873006D-08
     4864c(76,32)=   -0.22934832888321D-07
     4865c(77,32)=   -0.24642366270291D-07
     4866c(78,32)=   -0.14311989857057D-07
     4867c(79,32)=   -0.29557459108403D-07
     4868c(80,32)=   -0.61874821463050D-08
     4869c(33,33)=    0.58475398205840D-07
     4870c(34,33)=   -0.38256469157865D-06
     4871c(35,33)=   -0.82770977697643D-07
     4872c(36,33)=    0.93631906354654D-07
     4873c(37,33)=   -0.23063691191785D-06
     4874c(38,33)=    0.79175188405789D-07
     4875c(39,33)=    0.15217645575778D-06
     4876c(40,33)=   -0.90179486378835D-07
     4877c(41,33)=   -0.14315529062634D-06
     4878c(42,33)=    0.12455438073450D-06
     4879c(43,33)=    0.13091780059606D-06
     4880c(44,33)=   -0.10659899187999D-06
     4881c(45,33)=   -0.10237156989509D-06
     4882c(46,33)=    0.22138057630585D-07
     4883c(47,33)=    0.46071502629398D-07
     4884c(48,33)=    0.57083405416726D-08
     4885c(49,33)=    0.21112663812878D-07
     4886c(50,33)=   -0.40987304628857D-07
     4887c(51,33)=    0.88179277427948D-08
     4888c(52,33)=    0.20761917487268D-07
     4889c(53,33)=   -0.21153986027314D-07
     4890c(54,33)=   -0.16223554683602D-07
     4891c(55,33)=   -0.13943481594437D-07
     4892c(56,33)=    0.14425864738890D-07
     4893c(57,33)=    0.12394851169921D-07
     4894c(58,33)=   -0.35004298789192D-07
     4895c(59,33)=    0.20642131984743D-07
     4896c(60,33)=    0.14431777555028D-07
     4897c(61,33)=    0.58679802259372D-09
     4898c(62,33)=   -0.63721540402709D-08
     4899c(63,33)=   -0.23478906602072D-07
     4900c(64,33)=   -0.33635494239517D-07
     4901c(65,33)=   -0.50026523423955D-08
     4902c(66,33)=    0.34255035230904D-07
     4903c(67,33)=    0.14400063700947D-07
     4904c(68,33)=    0.26176792756362D-08
     4905c(69,33)=   -0.40449361853318D-08
     4906c(70,33)=   -0.52362825164384D-08
     4907c(71,33)=    0.10143959437298D-07
     4908c(72,33)=   -0.22030297152042D-07
     4909c(73,33)=    0.67502982264843D-08
     4910c(74,33)=    0.98139417034179D-09
     4911c(75,33)=    0.22460790031195D-08
     4912c(76,33)=    0.38068505390521D-08
     4913c(77,33)=   -0.15652074355205D-08
     4914c(78,33)=   -0.21939585571664D-08
     4915c(79,33)=    0.22810602352599D-08
     4916c(80,33)=   -0.45829111183152D-08
     4917c(34,34)=    0.51278731778469D-08
     4918c(35,34)=    0.14088901232734D-06
     4919c(36,34)=   -0.90304181898181D-07
     4920c(37,34)=   -0.13093622779341D-06
     4921c(38,34)=   -0.66317165476431D-07
     4922c(39,34)=   -0.37316803541154D-07
     4923c(40,34)=    0.36525759389135D-07
     4924c(41,34)=    0.14011876832441D-06
     4925c(42,34)=   -0.72015594055707D-08
     4926c(43,34)=   -0.18591326784172D-06
     4927c(44,34)=   -0.48810626144485D-07
     4928c(45,34)=    0.44297320015628D-07
     4929c(46,34)=    0.72841636235943D-07
     4930c(47,34)=    0.96218257796547D-08
     4931c(48,34)=   -0.29381533458598D-07
     4932c(49,34)=   -0.34294171926132D-07
     4933c(50,34)=   -0.22011655861774D-07
     4934c(51,34)=   -0.71549393377881D-08
     4935c(52,34)=    0.33432039816191D-07
     4936c(53,34)=   -0.30479096304569D-07
     4937c(54,34)=   -0.13037337002687D-07
     4938c(55,34)=    0.11644996746542D-07
     4939c(56,34)=   -0.24663480766096D-08
     4940c(57,34)=   -0.15438293532936D-07
     4941c(58,34)=   -0.97851886351454D-08
     4942c(59,34)=    0.14521584137480D-07
     4943c(60,34)=    0.53921040095297D-08
     4944c(61,34)=   -0.11477146333923D-08
     4945c(62,34)=    0.52975867054377D-08
     4946c(63,34)=    0.56175520709770D-08
     4947c(64,34)=    0.10829415430945D-07
     4948c(65,34)=   -0.30524661947070D-07
     4949c(66,34)=    0.77871891153686D-08
     4950c(67,34)=   -0.50818167995811D-09
     4951c(68,34)=    0.30032772156280D-08
     4952c(69,34)=   -0.99777924570013D-09
     4953c(70,34)=    0.98682117429245D-09
     4954c(71,34)=   -0.76516873233813D-08
     4955c(72,34)=   -0.96833533366251D-08
     4956c(73,34)=   -0.10819444526080D-07
     4957c(74,34)=    0.10514207644296D-08
     4958c(75,34)=    0.30582673848055D-08
     4959c(76,34)=    0.39220734316602D-08
     4960c(77,34)=   -0.16301991141856D-07
     4961c(78,34)=    0.23167286395576D-07
     4962c(79,34)=   -0.39324638318927D-07
     4963c(80,34)=    0.36060892185870D-07
     4964c(35,35)=    0.10875503401032D-06
     4965c(36,35)=    0.19141905282068D-06
     4966c(37,35)=    0.21205540234216D-06
     4967c(38,35)=    0.12835760211068D-06
     4968c(39,35)=    0.12759888990090D-06
     4969c(40,35)=   -0.86444568960824D-07
     4970c(41,35)=   -0.19167486373494D-06
     4971c(42,35)=   -0.11961658002801D-06
     4972c(43,35)=    0.11232157498663D-06
     4973c(44,35)=    0.81707928150757D-07
     4974c(45,35)=   -0.34076762837328D-07
     4975c(46,35)=   -0.27400516712106D-07
     4976c(47,35)=    0.34995215911193D-07
     4977c(48,35)=   -0.12038435759851D-07
     4978c(49,35)=   -0.40104793213950D-08
     4979c(50,35)=   -0.16886724287599D-07
     4980c(51,35)=    0.65342450503192D-07
     4981c(52,35)=    0.21523009086677D-07
     4982c(53,35)=   -0.62022321859295D-07
     4983c(54,35)=   -0.28373306059328D-07
     4984c(55,35)=    0.63117998229223D-08
     4985c(56,35)=    0.16876051399852D-07
     4986c(57,35)=    0.25868272424565D-07
     4987c(58,35)=    0.70500786720980D-08
     4988c(59,35)=   -0.12251863005692D-07
     4989c(60,35)=   -0.93566015604113D-08
     4990c(61,35)=   -0.84019414365513D-08
     4991c(62,35)=    0.26742010109669D-07
     4992c(63,35)=    0.76057211425958D-08
     4993c(64,35)=   -0.22491965600775D-07
     4994c(65,35)=   -0.25038314711882D-07
     4995c(66,35)=   -0.34041829506929D-07
     4996c(67,35)=    0.16062129005521D-07
     4997c(68,35)=   -0.10548112606566D-07
     4998c(69,35)=   -0.88880184970768D-08
     4999c(70,35)=    0.31750901623981D-08
     5000c(71,35)=    0.42044182945617D-08
     5001c(72,35)=   -0.11988809888886D-07
     5002c(73,35)=   -0.69820172758214D-10
     5003c(74,35)=    0.91115164241102D-08
     5004c(75,35)=   -0.11609547895818D-07
     5005c(76,35)=    0.11516958940068D-07
     5006c(77,35)=   -0.21074821878740D-07
     5007c(78,35)=    0.34835485227049D-07
     5008c(79,35)=   -0.21629803665303D-07
     5009c(80,35)=    0.34293942445702D-07
     5010c(36,36)=   -0.70916055549077D-07
     5011c(37,36)=   -0.29552977164803D-06
     5012c(38,36)=   -0.10590143858948D-06
     5013c(39,36)=   -0.35195335816752D-07
     5014c(40,36)=   -0.76751593371798D-08
     5015c(41,36)=    0.30079574120527D-07
     5016c(42,36)=    0.70733237972441D-07
     5017c(43,36)=    0.51232856265250D-08
     5018c(44,36)=    0.12026768299596D-07
     5019c(45,36)=    0.42192228750503D-07
     5020c(46,36)=   -0.15831748222013D-07
     5021c(47,36)=   -0.33434991659727D-07
     5022c(48,36)=   -0.42199573302386D-07
     5023c(49,36)=   -0.56358286053357D-08
     5024c(50,36)=    0.23883933279818D-07
     5025c(51,36)=    0.26370392520937D-08
     5026c(52,36)=   -0.15649192586338D-07
     5027c(53,36)=    0.95648409726559D-08
     5028c(54,36)=   -0.15123091187138D-07
     5029c(55,36)=    0.20918159294584D-07
     5030c(56,36)=   -0.70802809683391D-08
     5031c(57,36)=   -0.36492181914188D-07
     5032c(58,36)=   -0.27325960701348D-07
     5033c(59,36)=    0.37477801504421D-07
     5034c(60,36)=   -0.14643991148462D-07
     5035c(61,36)=   -0.95999339767453D-08
     5036c(62,36)=   -0.14701469821659D-07
     5037c(63,36)=    0.18978276808263D-07
     5038c(64,36)=   -0.15637269426543D-07
     5039c(65,36)=    0.54689016064712D-08
     5040c(66,36)=    0.64229928471165D-08
     5041c(67,36)=    0.23849761413833D-07
     5042c(68,36)=   -0.22910566563468D-07
     5043c(69,36)=    0.32871975932697D-07
     5044c(70,36)=    0.12911775666932D-07
     5045c(71,36)=   -0.34242915583168D-08
     5046c(72,36)=    0.11392274884802D-07
     5047c(73,36)=   -0.75910173414701D-08
     5048c(74,36)=   -0.91071088434135D-08
     5049c(75,36)=   -0.20378647678455D-07
     5050c(76,36)=    0.27905963048534D-08
     5051c(77,36)=   -0.16130379168336D-07
     5052c(78,36)=    0.13527489004341D-07
     5053c(79,36)=   -0.25215869054319D-07
     5054c(80,36)=    0.35975273158689D-07
     5055c(37,37)=   -0.85045436427460D-07
     5056c(38,37)=    0.24140798605316D-07
     5057c(39,37)=   -0.62842977823986D-07
     5058c(40,37)=   -0.36861072623085D-07
     5059c(41,37)=    0.72215177795741D-07
     5060c(42,37)=    0.12829880604610D-07
     5061c(43,37)=    0.47597533262804D-07
     5062c(44,37)=    0.73830430107757D-07
     5063c(45,37)=   -0.11811188081236D-06
     5064c(46,37)=   -0.12248817840432D-06
     5065c(47,37)=    0.60659863233175D-07
     5066c(48,37)=    0.84979491220722D-07
     5067c(49,37)=    0.70853251954797D-08
     5068c(50,37)=   -0.16687012678264D-07
     5069c(51,37)=    0.14630482125012D-07
     5070c(52,37)=    0.19236863718465D-07
     5071c(53,37)=   -0.22491318978291D-07
     5072c(54,37)=   -0.95007356401955D-08
     5073c(55,37)=   -0.40253426495364D-08
     5074c(56,37)=   -0.16646635097155D-07
     5075c(57,37)=    0.82754017205748D-08
     5076c(58,37)=    0.13998509257893D-07
     5077c(59,37)=   -0.32988321707420D-07
     5078c(60,37)=   -0.41060253450443D-08
     5079c(61,37)=   -0.29000352325951D-07
     5080c(62,37)=   -0.17074531725920D-07
     5081c(63,37)=    0.11390580203762D-08
     5082c(64,37)=    0.70220783291552D-08
     5083c(65,37)=    0.46659847901810D-08
     5084c(66,37)=   -0.17328699515012D-07
     5085c(67,37)=    0.55327166917024D-09
     5086c(68,37)=    0.53167674136827D-07
     5087c(69,37)=   -0.66684357806224D-08
     5088c(70,37)=    0.40490753477360D-07
     5089c(71,37)=    0.76012426198717D-09
     5090c(72,37)=    0.15572657080339D-07
     5091c(73,37)=   -0.82052508194241D-08
     5092c(74,37)=   -0.71427980308794D-08
     5093c(75,37)=    0.15040299820799D-07
     5094c(76,37)=   -0.69944438257929D-08
     5095c(77,37)=    0.16974340870149D-07
     5096c(78,37)=   -0.24435107865475D-07
     5097c(79,37)=    0.29149038795301D-07
     5098c(80,37)=   -0.35587716469847D-07
     5099c(38,38)=    0.13347014331245D-06
     5100c(39,38)=    0.24047024641936D-06
     5101c(40,38)=    0.10798059966788D-06
     5102c(41,38)=    0.39114089924291D-07
     5103c(42,38)=    0.28125967035620D-07
     5104c(43,38)=   -0.66988229940973D-07
     5105c(44,38)=   -0.11179251119048D-06
     5106c(45,38)=   -0.23819711611369D-07
     5107c(46,38)=    0.42118175811780D-07
     5108c(47,38)=    0.44074049448197D-08
     5109c(48,38)=    0.10270838687362D-07
     5110c(49,38)=   -0.12385049538435D-07
     5111c(50,38)=   -0.89625479508237D-08
     5112c(51,38)=   -0.42945144119609D-07
     5113c(52,38)=   -0.44067169866758D-07
     5114c(53,38)=    0.26040844656555D-07
     5115c(54,38)=   -0.36358336030660D-09
     5116c(55,38)=    0.40094057796099D-07
     5117c(56,38)=    0.19688765599997D-07
     5118c(57,38)=   -0.47801829982398D-07
     5119c(58,38)=   -0.51146761471813D-07
     5120c(59,38)=    0.47886017097438D-07
     5121c(60,38)=    0.27525666149222D-07
     5122c(61,38)=    0.42213139440541D-08
     5123c(62,38)=   -0.17814299187379D-07
     5124c(63,38)=    0.29031052627425D-07
     5125c(64,38)=    0.35779061759296D-07
     5126c(65,38)=   -0.27282827507959D-07
     5127c(66,38)=    0.14753903190742D-07
     5128c(67,38)=   -0.16579971933734D-08
     5129c(68,38)=   -0.57436727657306D-08
     5130c(69,38)=    0.36564824924530D-07
     5131c(70,38)=   -0.32991506827445D-07
     5132c(71,38)=    0.16195339671985D-07
     5133c(72,38)=   -0.35675973184680D-07
     5134c(73,38)=   -0.26513674991594D-07
     5135c(74,38)=   -0.31202448371751D-07
     5136c(75,38)=   -0.48994367964207D-07
     5137c(76,38)=   -0.34750817055747D-07
     5138c(77,38)=   -0.67185675417512D-07
     5139c(78,38)=   -0.11320947600947D-07
     5140c(79,38)=   -0.90812483442622D-07
     5141c(80,38)=    0.36964635550072D-07
     5142c(39,39)=   -0.12498518201365D-07
     5143c(40,39)=   -0.13249419606610D-06
     5144c(41,39)=   -0.51104602604330D-07
     5145c(42,39)=   -0.14888223222037D-07
     5146c(43,39)=   -0.81923363205969D-07
     5147c(44,39)=    0.47012056247530D-07
     5148c(45,39)=    0.94195726890302D-07
     5149c(46,39)=   -0.28033365586129D-07
     5150c(47,39)=    0.72678982196798D-07
     5151c(48,39)=    0.32175051925217D-07
     5152c(49,39)=   -0.54587681320482D-07
     5153c(50,39)=   -0.35906860360574D-07
     5154c(51,39)=    0.35743456986384D-07
     5155c(52,39)=    0.45527074760768D-07
     5156c(53,39)=    0.33476912203896D-07
     5157c(54,39)=    0.21777990528633D-07
     5158c(55,39)=    0.23226980951241D-07
     5159c(56,39)=   -0.43380426291089D-07
     5160c(57,39)=   -0.45781622243592D-08
     5161c(58,39)=    0.54269052639050D-07
     5162c(59,39)=    0.13474235123675D-07
     5163c(60,39)=   -0.31128483256094D-07
     5164c(61,39)=   -0.15497264978552D-07
     5165c(62,39)=   -0.10038525100273D-08
     5166c(63,39)=    0.48634086698810D-08
     5167c(64,39)=    0.95461834588078D-08
     5168c(65,39)=    0.15479454147057D-07
     5169c(66,39)=   -0.14549195991840D-08
     5170c(67,39)=    0.25879413188807D-08
     5171c(68,39)=   -0.41548366603569D-08
     5172c(69,39)=   -0.38736734081212D-07
     5173c(70,39)=    0.82514376192889D-08
     5174c(71,39)=    0.14486363767362D-07
     5175c(72,39)=    0.15291206955104D-07
     5176c(73,39)=    0.13652057707307D-07
     5177c(74,39)=    0.88101634633753D-08
     5178c(75,39)=    0.74584143811033D-10
     5179c(76,39)=    0.54102488893796D-08
     5180c(77,39)=    0.11294842282177D-08
     5181c(78,39)=   -0.16518184430928D-07
     5182c(79,39)=    0.86319238945332D-08
     5183c(80,39)=   -0.21355768760937D-07
     5184c(40,40)=   -0.28282625688147D-06
     5185c(41,40)=    0.71688952427537D-07
     5186c(42,40)=   -0.41047158588585D-07
     5187c(43,40)=   -0.13949634065030D-08
     5188c(44,40)=    0.97186473366003D-07
     5189c(45,40)=    0.12331926439725D-07
     5190c(46,40)=   -0.67038586580410D-07
     5191c(47,40)=   -0.23701097252138D-07
     5192c(48,40)=   -0.27951691934561D-07
     5193c(49,40)=   -0.10094153922806D-08
     5194c(50,40)=    0.63522211342458D-07
     5195c(51,40)=    0.81590490393668D-07
     5196c(52,40)=   -0.52115468198460D-07
     5197c(53,40)=   -0.86155361382134D-07
     5198c(54,40)=    0.84227815420622D-08
     5199c(55,40)=    0.18715156588866D-07
     5200c(56,40)=   -0.67972245257240D-08
     5201c(57,40)=   -0.24573951818749D-07
     5202c(58,40)=   -0.22061955816573D-08
     5203c(59,40)=    0.12130463609119D-07
     5204c(60,40)=    0.21499168174430D-07
     5205c(61,40)=   -0.12609775667312D-07
     5206c(62,40)=    0.11832773538245D-07
     5207c(63,40)=   -0.77427790428475D-08
     5208c(64,40)=    0.19520948878565D-07
     5209c(65,40)=    0.30749231518606D-07
     5210c(66,40)=   -0.10000105914878D-07
     5211c(67,40)=   -0.88965453695869D-08
     5212c(68,40)=   -0.20541193801204D-07
     5213c(69,40)=    0.75723105050778D-08
     5214c(70,40)=   -0.12781738343996D-07
     5215c(71,40)=   -0.24448621383419D-07
     5216c(72,40)=    0.11948259811746D-07
     5217c(73,40)=   -0.21398505614222D-07
     5218c(74,40)=    0.82732733199092D-08
     5219c(75,40)=    0.13044211664951D-07
     5220c(76,40)=   -0.15609725733120D-07
     5221c(77,40)=    0.16822678035570D-07
     5222c(78,40)=   -0.23368023000363D-07
     5223c(79,40)=    0.19885107540687D-07
     5224c(80,40)=   -0.26675411298633D-07
     5225c(41,41)=    0.66269264403178D-07
     5226c(42,41)=    0.99485360418763D-07
     5227c(43,41)=    0.93705529606588D-07
     5228c(44,41)=   -0.19515115240073D-07
     5229c(45,41)=   -0.68356932414673D-07
     5230c(46,41)=   -0.13908385672117D-08
     5231c(47,41)=   -0.28006145007972D-07
     5232c(48,41)=   -0.47709422194968D-08
     5233c(49,41)=   -0.14037285758001D-07
     5234c(50,41)=   -0.15162775455965D-07
     5235c(51,41)=   -0.49284491497797D-07
     5236c(52,41)=   -0.27703139523507D-07
     5237c(53,41)=    0.62703453874591D-07
     5238c(54,41)=    0.16410550192500D-07
     5239c(55,41)=   -0.66846435652823D-07
     5240c(56,41)=   -0.82250945164372D-08
     5241c(57,41)=    0.19896704641883D-08
     5242c(58,41)=    0.22316449818608D-07
     5243c(59,41)=   -0.27565696280757D-07
     5244c(60,41)=   -0.17661700212443D-07
     5245c(61,41)=    0.12602239023716D-07
     5246c(62,41)=   -0.36581893103834D-08
     5247c(63,41)=    0.38730066928903D-09
     5248c(64,41)=   -0.27027514350908D-07
     5249c(65,41)=    0.28227954080531D-07
     5250c(66,41)=    0.25878266572920D-07
     5251c(67,41)=    0.29373762962172D-07
     5252c(68,41)=   -0.82278483119246D-08
     5253c(69,41)=    0.90009074627914D-08
     5254c(70,41)=   -0.10582409007455D-08
     5255c(71,41)=   -0.93034890642953D-08
     5256c(72,41)=    0.10047844986013D-07
     5257c(73,41)=    0.23913638286220D-07
     5258c(74,41)=   -0.90193920166047D-08
     5259c(75,41)=    0.57658148193283D-08
     5260c(76,41)=   -0.67469936719169D-08
     5261c(77,41)=   -0.32940382954878D-08
     5262c(78,41)=   -0.27510094448350D-07
     5263c(79,41)=    0.14175735259075D-07
     5264c(80,41)=   -0.44034849277347D-07
     5265c(42,42)=    0.92084705347499D-07
     5266c(43,42)=   -0.13577783088227D-06
     5267c(44,42)=    0.66054997633427D-07
     5268c(45,42)=   -0.55789097880559D-07
     5269c(46,42)=   -0.90848449752462D-07
     5270c(47,42)=   -0.25582225100060D-08
     5271c(48,42)=    0.11413175256446D-06
     5272c(49,42)=    0.22357274453811D-07
     5273c(50,42)=   -0.62716570436004D-08
     5274c(51,42)=   -0.74847824791414D-09
     5275c(52,42)=   -0.69677744138901D-07
     5276c(53,42)=   -0.49174179537698D-07
     5277c(54,42)=    0.22202981900828D-07
     5278c(55,42)=    0.66096468373953D-07
     5279c(56,42)=   -0.27445455755823D-07
     5280c(57,42)=    0.19616284961736D-08
     5281c(58,42)=    0.28918259082415D-07
     5282c(59,42)=   -0.22802650617594D-07
     5283c(60,42)=   -0.88137084110375D-08
     5284c(61,42)=    0.31929626108723D-07
     5285c(62,42)=   -0.14807107399537D-08
     5286c(63,42)=   -0.26965637758467D-07
     5287c(64,42)=   -0.15718904895240D-07
     5288c(65,42)=    0.30913064719717D-08
     5289c(66,42)=    0.14991231218581D-07
     5290c(67,42)=   -0.42132291844845D-08
     5291c(68,42)=   -0.46684718650143D-08
     5292c(69,42)=   -0.22935192150385D-07
     5293c(70,42)=    0.16358324993681D-08
     5294c(71,42)=   -0.13419448164149D-07
     5295c(72,42)=   -0.25778244251830D-08
     5296c(73,42)=   -0.25467697514425D-08
     5297c(74,42)=    0.18493268392668D-09
     5298c(75,42)=   -0.13303291742363D-07
     5299c(76,42)=   -0.17476449335409D-07
     5300c(77,42)=   -0.29458611799455D-07
     5301c(78,42)=   -0.11589069751728D-07
     5302c(79,42)=   -0.35071126898184D-07
     5303c(80,42)=    0.22849369637846D-08
     5304c(43,43)=   -0.11442187755961D-06
     5305c(44,43)=   -0.18708421375589D-07
     5306c(45,43)=    0.61895517531317D-08
     5307c(46,43)=    0.57517781137047D-07
     5308c(47,43)=    0.13652878643041D-06
     5309c(48,43)=    0.19555034319472D-07
     5310c(49,43)=   -0.17818932260147D-07
     5311c(50,43)=   -0.75669723906277D-07
     5312c(51,43)=   -0.40222254874503D-07
     5313c(52,43)=    0.60811877672993D-07
     5314c(53,43)=    0.11049247406639D-06
     5315c(54,43)=    0.48427088590006D-07
     5316c(55,43)=   -0.78582760780145D-07
     5317c(56,43)=   -0.68780516844109D-07
     5318c(57,43)=   -0.21773151329278D-07
     5319c(58,43)=    0.17147740562778D-07
     5320c(59,43)=   -0.29014997969292D-08
     5321c(60,43)=    0.76737763879791D-08
     5322c(61,43)=    0.16512977570143D-07
     5323c(62,43)=    0.25950586898876D-07
     5324c(63,43)=    0.21419877306605D-07
     5325c(64,43)=   -0.11142692166081D-07
     5326c(65,43)=   -0.15667713090307D-07
     5327c(66,43)=   -0.22924332340415D-07
     5328c(67,43)=    0.26159412835283D-08
     5329c(68,43)=    0.64597941450654D-08
     5330c(69,43)=   -0.74105375701351D-08
     5331c(70,43)=   -0.57090236353885D-08
     5332c(71,43)=   -0.89446579989596D-08
     5333c(72,43)=    0.14337002102460D-07
     5334c(73,43)=   -0.82877772512053D-08
     5335c(74,43)=   -0.81212139359209D-08
     5336c(75,43)=    0.14519859525652D-07
     5337c(76,43)=    0.24246669613919D-08
     5338c(77,43)=    0.18897270806945D-07
     5339c(78,43)=    0.24274786938760D-07
     5340c(79,43)=    0.89619348006897D-08
     5341c(80,43)=    0.19895050638066D-07
     5342c(44,44)=    0.15034955386023D-07
     5343c(45,44)=    0.29116782959401D-07
     5344c(46,44)=   -0.17559317091249D-07
     5345c(47,44)=   -0.18860928689845D-07
     5346c(48,44)=   -0.10326269581702D-07
     5347c(49,44)=   -0.37636204272158D-07
     5348c(50,44)=    0.12467321887837D-07
     5349c(51,44)=    0.93317756497594D-07
     5350c(52,44)=    0.32832347845314D-07
     5351c(53,44)=   -0.42941186913527D-07
     5352c(54,44)=   -0.31413798106672D-07
     5353c(55,44)=   -0.14791229842655D-07
     5354c(56,44)=    0.88408079487054D-08
     5355c(57,44)=   -0.19625091623408D-07
     5356c(58,44)=    0.51543244270834D-07
     5357c(59,44)=   -0.12919504987766D-07
     5358c(60,44)=   -0.13264958891254D-07
     5359c(61,44)=    0.20677079745552D-07
     5360c(62,44)=   -0.65029971790238D-07
     5361c(63,44)=    0.98131242873875D-08
     5362c(64,44)=    0.25244962626010D-07
     5363c(65,44)=   -0.13905280467247D-07
     5364c(66,44)=    0.61066655051075D-07
     5365c(67,44)=   -0.43741884460756D-07
     5366c(68,44)=   -0.19657163308199D-07
     5367c(69,44)=    0.44381263132876D-07
     5368c(70,44)=   -0.10264324063237D-06
     5369c(71,44)=    0.14578568501114D-07
     5370c(72,44)=    0.45166455610180D-07
     5371c(73,44)=   -0.58415182390034D-07
     5372c(74,44)=    0.33722342847193D-07
     5373c(75,44)=    0.23189641608263D-07
     5374c(76,44)=   -0.24921693853061D-07
     5375c(77,44)=   -0.38291464174011D-07
     5376c(78,44)=    0.34358181778215D-07
     5377c(79,44)=   -0.77493084150848D-07
     5378c(80,44)=    0.34141243790682D-07
     5379c(45,45)=    0.14265682580741D-06
     5380c(46,45)=    0.15292837930747D-07
     5381c(47,45)=   -0.21445895294116D-07
     5382c(48,45)=    0.20341197365456D-07
     5383c(49,45)=   -0.89532491837208D-07
     5384c(50,45)=   -0.57507075673080D-07
     5385c(51,45)=   -0.33405316514918D-07
     5386c(52,45)=   -0.41281866726819D-07
     5387c(53,45)=    0.49242933525228D-07
     5388c(54,45)=    0.53303213636083D-07
     5389c(55,45)=   -0.34108191093865D-07
     5390c(56,45)=   -0.62113473636493D-07
     5391c(57,45)=    0.76198176751553D-07
     5392c(58,45)=    0.57042231324263D-07
     5393c(59,45)=   -0.20561091210655D-07
     5394c(60,45)=   -0.32671481821249D-07
     5395c(61,45)=    0.20167512122980D-07
     5396c(62,45)=    0.30195507431502D-07
     5397c(63,45)=    0.95719760972733D-08
     5398c(64,45)=    0.36321603100966D-07
     5399c(65,45)=    0.56831220959255D-08
     5400c(66,45)=   -0.83012494997678D-08
     5401c(67,45)=    0.18359905888740D-07
     5402c(68,45)=    0.28494515715017D-08
     5403c(69,45)=   -0.10647112912967D-07
     5404c(70,45)=   -0.88631691215427D-08
     5405c(71,45)=   -0.21502271205195D-09
     5406c(72,45)=    0.47858427168376D-08
     5407c(73,45)=    0.38933163129512D-07
     5408c(74,45)=    0.25025007992658D-07
     5409c(75,45)=    0.14841842949944D-07
     5410c(76,45)=    0.12748094097083D-07
     5411c(77,45)=    0.17726062828373D-07
     5412c(78,45)=    0.93737960399375D-08
     5413c(79,45)=    0.37839699704908D-07
     5414c(80,45)=    0.47862829358012D-08
     5415c(46,46)=   -0.14124569438264D-06
     5416c(47,46)=    0.12506343805339D-08
     5417c(48,46)=   -0.39402913988663D-07
     5418c(49,46)=    0.64742134407597D-07
     5419c(50,46)=    0.77238528885076D-07
     5420c(51,46)=    0.48117475078108D-07
     5421c(52,46)=    0.65934142496894D-08
     5422c(53,46)=   -0.27167517524648D-07
     5423c(54,46)=   -0.52970215357704D-07
     5424c(55,46)=   -0.89538854076998D-08
     5425c(56,46)=    0.72924442906164D-07
     5426c(57,46)=    0.35820881327144D-07
     5427c(58,46)=   -0.79457083115507D-07
     5428c(59,46)=   -0.88463103236001D-08
     5429c(60,46)=    0.48770163670525D-07
     5430c(61,46)=    0.68898336547070D-08
     5431c(62,46)=    0.56198496682383D-08
     5432c(63,46)=    0.76879764196924D-08
     5433c(64,46)=    0.28406084271576D-07
     5434c(65,46)=    0.51038041852556D-08
     5435c(66,46)=   -0.18592227300313D-07
     5436c(67,46)=    0.31702157827593D-07
     5437c(68,46)=   -0.30109462601346D-08
     5438c(69,46)=   -0.21910454839202D-07
     5439c(70,46)=    0.28039934921293D-07
     5440c(71,46)=   -0.37140052867618D-07
     5441c(72,46)=    0.11943303499421D-08
     5442c(73,46)=   -0.18540140679958D-07
     5443c(74,46)=   -0.30158913772799D-08
     5444c(75,46)=    0.85438958070824D-08
     5445c(76,46)=    0.40976066867798D-08
     5446c(77,46)=    0.32634408061461D-07
     5447c(78,46)=   -0.90090093293770D-08
     5448c(79,46)=    0.68672076020273D-07
     5449c(80,46)=   -0.19362365837174D-07
     5450c(47,47)=    0.14104959906971D-07
     5451c(48,47)=   -0.56545643851864D-07
     5452c(49,47)=   -0.38175920466332D-07
     5453c(50,47)=   -0.76892238928920D-07
     5454c(51,47)=   -0.78104320931309D-08
     5455c(52,47)=    0.19157556304477D-07
     5456c(53,47)=    0.20290009300674D-07
     5457c(54,47)=    0.29724165786259D-07
     5458c(55,47)=   -0.31083742120195D-08
     5459c(56,47)=   -0.43551560493261D-07
     5460c(57,47)=    0.77487657315157D-08
     5461c(58,47)=    0.34053742630077D-07
     5462c(59,47)=   -0.34855336573877D-09
     5463c(60,47)=   -0.30695640747836D-07
     5464c(61,47)=    0.31835869509673D-08
     5465c(62,47)=    0.36686279312462D-08
     5466c(63,47)=   -0.22215743048625D-07
     5467c(64,47)=   -0.50574708035914D-07
     5468c(65,47)=   -0.20035066392557D-07
     5469c(66,47)=    0.81522797029569D-08
     5470c(67,47)=    0.20022103306298D-07
     5471c(68,47)=    0.15718793088804D-08
     5472c(69,47)=   -0.28678333511384D-08
     5473c(70,47)=   -0.26607709402548D-07
     5474c(71,47)=    0.41520598257674D-08
     5475c(72,47)=   -0.11803899095500D-07
     5476c(73,47)=    0.36826455634889D-08
     5477c(74,47)=    0.58832581399847D-08
     5478c(75,47)=    0.20245747297436D-07
     5479c(76,47)=    0.96155820778275D-08
     5480c(77,47)=    0.17867757804120D-07
     5481c(78,47)=    0.34855665927062D-07
     5482c(79,47)=    0.28893007548978D-07
     5483c(80,47)=    0.38683398105126D-07
     5484c(48,48)=    0.13183786875222D-06
     5485c(49,48)=    0.10087023421292D-07
     5486c(50,48)=    0.81723772372626D-07
     5487c(51,48)=    0.26523736965109D-07
     5488c(52,48)=   -0.75389297257786D-07
     5489c(53,48)=   -0.63839178227448D-07
     5490c(54,48)=   -0.27153787256252D-07
     5491c(55,48)=   -0.13374928239397D-07
     5492c(56,48)=    0.25304555690120D-07
     5493c(57,48)=    0.26820681196692D-08
     5494c(58,48)=   -0.49324278938910D-07
     5495c(59,48)=   -0.31186651188467D-07
     5496c(60,48)=    0.33338897659264D-07
     5497c(61,48)=    0.20864299491934D-07
     5498c(62,48)=    0.95898773671841D-08
     5499c(63,48)=   -0.12398556095698D-07
     5500c(64,48)=   -0.10627481591800D-07
     5501c(65,48)=   -0.92468866785723D-08
     5502c(66,48)=   -0.94963352921816D-08
     5503c(67,48)=   -0.20438806970465D-08
     5504c(68,48)=   -0.17983398277993D-07
     5505c(69,48)=   -0.30340242280293D-07
     5506c(70,48)=   -0.21676501819313D-07
     5507c(71,48)=   -0.35822028310007D-07
     5508c(72,48)=    0.14350716357890D-07
     5509c(73,48)=   -0.43515657192583D-08
     5510c(74,48)=   -0.12839602474258D-07
     5511c(75,48)=    0.52903331325952D-08
     5512c(76,48)=   -0.12157397860099D-07
     5513c(77,48)=    0.87611039507312D-08
     5514c(78,48)=   -0.27391677973795D-07
     5515c(79,48)=    0.95069694460083D-08
     5516c(80,48)=   -0.25340201833080D-07
     5517c(49,49)=   -0.83893778506803D-07
     5518c(50,49)=    0.27064741304335D-07
     5519c(51,49)=    0.59735502015113D-09
     5520c(52,49)=    0.30218896960283D-07
     5521c(53,49)=    0.78701606316708D-07
     5522c(54,49)=   -0.46582548862016D-08
     5523c(55,49)=   -0.34068124375426D-09
     5524c(56,49)=    0.48514433884466D-07
     5525c(57,49)=   -0.16947411657877D-07
     5526c(58,49)=   -0.54934651340397D-08
     5527c(59,49)=    0.24107767614798D-07
     5528c(60,49)=   -0.25104549570907D-08
     5529c(61,49)=   -0.57972944552729D-07
     5530c(62,49)=    0.42758974997715D-07
     5531c(63,49)=   -0.64445010884034D-08
     5532c(64,49)=    0.86496732192467D-08
     5533c(65,49)=    0.11232181522790D-07
     5534c(66,49)=   -0.37864499506033D-07
     5535c(67,49)=    0.19317408091003D-07
     5536c(68,49)=    0.17397051050412D-07
     5537c(69,49)=    0.80501430900921D-08
     5538c(70,49)=    0.16955407897328D-07
     5539c(71,49)=    0.38286819337312D-07
     5540c(72,49)=   -0.10128367419507D-07
     5541c(73,49)=    0.20312064206339D-07
     5542c(74,49)=    0.24389096991361D-07
     5543c(75,49)=    0.19831553378102D-07
     5544c(76,49)=    0.16471155022668D-07
     5545c(77,49)=    0.27719829269071D-07
     5546c(78,49)=    0.27858782388775D-07
     5547c(79,49)=   -0.10207394251253D-07
     5548c(80,49)=    0.37372005385793D-07
     5549c(50,50)=   -0.78655304961773D-07
     5550c(51,50)=   -0.76718587761635D-07
     5551c(52,50)=   -0.89359338973498D-07
     5552c(53,50)=   -0.63253751970261D-07
     5553c(54,50)=    0.96908722492314D-08
     5554c(55,50)=    0.25257480614650D-08
     5555c(56,50)=    0.65906394738951D-08
     5556c(57,50)=   -0.64046436732057D-08
     5557c(58,50)=   -0.24866048819383D-07
     5558c(59,50)=   -0.56934326330242D-08
     5559c(60,50)=    0.23431408908595D-08
     5560c(61,50)=    0.42512188872396D-07
     5561c(62,50)=    0.84098611284314D-08
     5562c(63,50)=   -0.21477523224098D-07
     5563c(64,50)=   -0.21031569730425D-07
     5564c(65,50)=    0.41137055754030D-07
     5565c(66,50)=   -0.21919227094243D-07
     5566c(67,50)=   -0.57077805469915D-08
     5567c(68,50)=   -0.11200861055523D-07
     5568c(69,50)=   -0.31850325078367D-07
     5569c(70,50)=   -0.39860295573898D-08
     5570c(71,50)=   -0.39638944627352D-07
     5571c(72,50)=    0.27386483149971D-07
     5572c(73,50)=   -0.33781222070150D-08
     5573c(74,50)=    0.99179260059346D-08
     5574c(75,50)=    0.14836368757641D-08
     5575c(76,50)=    0.73951694721136D-08
     5576c(77,50)=    0.63976287061156D-08
     5577c(78,50)=   -0.37047176831862D-08
     5578c(79,50)=    0.12257327135528D-07
     5579c(80,50)=   -0.65840102450554D-09
     5580c(51,51)=    0.71649831664665D-07
     5581c(52,51)=    0.16063833192547D-07
     5582c(53,51)=    0.31663668748921D-07
     5583c(54,51)=   -0.96481014932878D-09
     5584c(55,51)=   -0.15373391967241D-07
     5585c(56,51)=    0.31492453053932D-07
     5586c(57,51)=   -0.11570563810668D-09
     5587c(58,51)=   -0.28931597834427D-08
     5588c(59,51)=    0.41435796906410D-07
     5589c(60,51)=    0.13070549173929D-07
     5590c(61,51)=   -0.56997555582700D-07
     5591c(62,51)=   -0.31280643852365D-07
     5592c(63,51)=    0.39321121551819D-07
     5593c(64,51)=   -0.88565493270598D-08
     5594c(65,51)=   -0.22640084711286D-07
     5595c(66,51)=    0.18325345120306D-07
     5596c(67,51)=    0.18139330298322D-07
     5597c(68,51)=    0.20664491841579D-07
     5598c(69,51)=    0.37650603546457D-07
     5599c(70,51)=    0.32543754149647D-07
     5600c(71,51)=    0.26063198733519D-07
     5601c(72,51)=    0.32848204100458D-07
     5602c(73,51)=    0.16593720400871D-07
     5603c(74,51)=    0.22770517219112D-07
     5604c(75,51)=    0.21571734230323D-07
     5605c(76,51)=   -0.44162812278580D-08
     5606c(77,51)=    0.28007202452446D-07
     5607c(78,51)=   -0.22122967357936D-07
     5608c(79,51)=    0.19328668658253D-07
     5609c(80,51)=   -0.29308862022510D-07
     5610c(52,52)=   -0.11917850450220D-07
     5611c(53,52)=    0.10178324076334D-06
     5612c(54,52)=    0.58929881779205D-07
     5613c(55,52)=    0.34829088506542D-07
     5614c(56,52)=    0.16503415265138D-08
     5615c(57,52)=   -0.32575071175232D-08
     5616c(58,52)=    0.47579921152148D-08
     5617c(59,52)=    0.11888762468345D-07
     5618c(60,52)=   -0.17557956528633D-07
     5619c(61,52)=   -0.10272219459391D-07
     5620c(62,52)=   -0.56820460819980D-08
     5621c(63,52)=   -0.35737699480519D-07
     5622c(64,52)=   -0.16699373339017D-07
     5623c(65,52)=   -0.20041144180385D-07
     5624c(66,52)=    0.46210866588471D-07
     5625c(67,52)=   -0.31160658888733D-07
     5626c(68,52)=    0.12946214273948D-07
     5627c(69,52)=   -0.23434559023731D-07
     5628c(70,52)=   -0.83481726529725D-08
     5629c(71,52)=    0.92231887371209D-08
     5630c(72,52)=    0.31895493452823D-08
     5631c(73,52)=    0.22255625341153D-07
     5632c(74,52)=    0.21680626238655D-07
     5633c(75,52)=    0.26803795127612D-08
     5634c(76,52)=    0.11705238582242D-07
     5635c(77,52)=    0.28329758737764D-07
     5636c(78,52)=    0.21223322726206D-07
     5637c(79,52)=    0.16061455486414D-07
     5638c(80,52)=    0.22122360251331D-07
     5639c(53,53)=   -0.68906317081098D-07
     5640c(54,53)=   -0.60139427876214D-07
     5641c(55,53)=    0.15391096176413D-07
     5642c(56,53)=   -0.33805643074270D-07
     5643c(57,53)=   -0.50938541055426D-07
     5644c(58,53)=    0.16348008538981D-07
     5645c(59,53)=    0.49039386929627D-08
     5646c(60,53)=    0.44413621448349D-08
     5647c(61,53)=   -0.32225383168232D-07
     5648c(62,53)=   -0.89356017798621D-08
     5649c(63,53)=    0.94239635687397D-08
     5650c(64,53)=   -0.87572493735644D-08
     5651c(65,53)=    0.13209339403168D-07
     5652c(66,53)=    0.27687647322889D-09
     5653c(67,53)=    0.11123610748244D-07
     5654c(68,53)=    0.38325877465571D-07
     5655c(69,53)=    0.27840788777681D-07
     5656c(70,53)=   -0.88360645883774D-08
     5657c(71,53)=    0.13562389883347D-07
     5658c(72,53)=   -0.66732701659572D-08
     5659c(73,53)=    0.41933879004779D-08
     5660c(74,53)=    0.27542979980989D-08
     5661c(75,53)=   -0.26217514680132D-08
     5662c(76,53)=    0.10740428081553D-08
     5663c(77,53)=   -0.25936431338946D-07
     5664c(78,53)=    0.12336307137725D-08
     5665c(79,53)=   -0.58450093285968D-07
     5666c(80,53)=    0.23015764407575D-07
     5667c(54,54)=    0.25146386421733D-07
     5668c(55,54)=   -0.41312492468982D-07
     5669c(56,54)=    0.13899542785488D-07
     5670c(57,54)=   -0.27243615989484D-07
     5671c(58,54)=    0.16963677848444D-07
     5672c(59,54)=    0.30057873584805D-07
     5673c(60,54)=    0.90897022651945D-08
     5674c(61,54)=    0.14362518907253D-07
     5675c(62,54)=    0.21614788154163D-07
     5676c(63,54)=    0.67266755587643D-08
     5677c(64,54)=    0.80274054593026D-08
     5678c(65,54)=   -0.14779647252088D-07
     5679c(66,54)=    0.26377341781642D-08
     5680c(67,54)=    0.13119241916865D-07
     5681c(68,54)=   -0.36825921062611D-07
     5682c(69,54)=    0.15505522683942D-07
     5683c(70,54)=    0.15039615228945D-07
     5684c(71,54)=   -0.16702220423832D-08
     5685c(72,54)=   -0.15348632944715D-07
     5686c(73,54)=   -0.24829612157751D-07
     5687c(74,54)=    0.78502933547880D-08
     5688c(75,54)=   -0.67078194155254D-08
     5689c(76,54)=    0.14748767487734D-07
     5690c(77,54)=   -0.13101636965934D-07
     5691c(78,54)=    0.13844005003076D-07
     5692c(79,54)=    0.72503899731971D-08
     5693c(80,54)=    0.25821120091196D-07
     5694c(55,55)=   -0.98051494924926D-08
     5695c(56,55)=    0.14126817716778D-06
     5696c(57,55)=   -0.13467101173673D-07
     5697c(58,55)=    0.82297465056759D-08
     5698c(59,55)=    0.29225038907521D-07
     5699c(60,55)=   -0.64093659413411D-07
     5700c(61,55)=   -0.47913699208843D-07
     5701c(62,55)=   -0.10389687527535D-07
     5702c(63,55)=    0.49810414202377D-08
     5703c(64,55)=   -0.22994709008642D-07
     5704c(65,55)=    0.17242577871404D-07
     5705c(66,55)=    0.21061388375067D-07
     5706c(67,55)=   -0.68768515944441D-08
     5707c(68,55)=    0.45347017660204D-08
     5708c(69,55)=    0.47904452762682D-07
     5709c(70,55)=    0.18448559507244D-07
     5710c(71,55)=   -0.21244351613833D-07
     5711c(72,55)=   -0.13105884046395D-08
     5712c(73,55)=    0.33496923412302D-08
     5713c(74,55)=   -0.13093431332956D-07
     5714c(75,55)=   -0.55420200956180D-08
     5715c(76,55)=   -0.16499505957784D-07
     5716c(77,55)=    0.20582488512699D-08
     5717c(78,55)=   -0.44222802265208D-07
     5718c(79,55)=   -0.77237356795639D-08
     5719c(80,55)=   -0.45631690754147D-07
     5720c(56,56)=   -0.40123407345616D-07
     5721c(57,56)=   -0.48078870485104D-07
     5722c(58,56)=    0.19069834981467D-07
     5723c(59,56)=    0.26403983071577D-07
     5724c(60,56)=   -0.20851446900971D-07
     5725c(61,56)=   -0.38687964516932D-07
     5726c(62,56)=    0.40027130893790D-07
     5727c(63,56)=    0.56000185804383D-07
     5728c(64,56)=   -0.47512071486663D-08
     5729c(65,56)=    0.29803130463985D-08
     5730c(66,56)=   -0.11097075764010D-07
     5731c(67,56)=   -0.98398333106898D-09
     5732c(68,56)=   -0.89812932768307D-08
     5733c(69,56)=   -0.27444091868882D-07
     5734c(70,56)=    0.71394078207807D-08
     5735c(71,56)=    0.80232100103553D-08
     5736c(72,56)=    0.88993436969500D-08
     5737c(73,56)=    0.15966538088772D-07
     5738c(74,56)=    0.38662741665250D-08
     5739c(75,56)=    0.89148213228963D-08
     5740c(76,56)=   -0.13968865312220D-07
     5741c(77,56)=   -0.44765328926921D-08
     5742c(78,56)=   -0.19401767715379D-07
     5743c(79,56)=   -0.39704639568240D-08
     5744c(80,56)=   -0.22012530731357D-07
     5745c(57,57)=    0.63662142430206D-07
     5746c(58,57)=   -0.61005760103547D-07
     5747c(59,57)=   -0.34773117369159D-07
     5748c(60,57)=   -0.13499097103984D-07
     5749c(61,57)=    0.17126155435825D-07
     5750c(62,57)=    0.64963959932636D-07
     5751c(63,57)=    0.54259025484029D-07
     5752c(64,57)=   -0.52186134100488D-07
     5753c(65,57)=   -0.22130732676743D-07
     5754c(66,57)=   -0.54542285960446D-08
     5755c(67,57)=   -0.12538641918910D-07
     5756c(68,57)=    0.14420623833334D-07
     5757c(69,57)=    0.21102228863191D-07
     5758c(70,57)=    0.26963740902659D-08
     5759c(71,57)=   -0.16541292896987D-07
     5760c(72,57)=    0.13496408458053D-07
     5761c(73,57)=    0.47681230402104D-08
     5762c(74,57)=    0.96128372730776D-08
     5763c(75,57)=    0.40469998860768D-08
     5764c(76,57)=    0.25058187955984D-07
     5765c(77,57)=    0.48739736631978D-08
     5766c(78,57)=    0.85817486067055D-08
     5767c(79,57)=    0.91923573652914D-08
     5768c(80,57)=    0.21580207304601D-07
     5769c(58,58)=    0.30404168717792D-07
     5770c(59,58)=    0.36637732444766D-07
     5771c(60,58)=   -0.48187228617950D-07
     5772c(61,58)=   -0.18450902782091D-07
     5773c(62,58)=    0.23639019012449D-07
     5774c(63,58)=   -0.31789808240154D-07
     5775c(64,58)=   -0.51495679858299D-07
     5776c(65,58)=   -0.22612778319004D-07
     5777c(66,58)=    0.33350776016663D-08
     5778c(67,58)=   -0.30328810291125D-08
     5779c(68,58)=   -0.12511875027624D-07
     5780c(69,58)=   -0.18952692994231D-07
     5781c(70,58)=    0.16125248447427D-07
     5782c(71,58)=   -0.12079424125372D-07
     5783c(72,58)=    0.11802305307720D-07
     5784c(73,58)=   -0.98850212842383D-08
     5785c(74,58)=    0.64901372670500D-08
     5786c(75,58)=   -0.65035971316783D-10
     5787c(76,58)=    0.12462278158387D-08
     5788c(77,58)=   -0.11518357795713D-07
     5789c(78,58)=    0.17927360960238D-07
     5790c(79,58)=   -0.20106153109405D-07
     5791c(80,58)=    0.23847471373295D-07
     5792c(59,59)=   -0.54197484848084D-07
     5793c(60,59)=    0.13195419173402D-07
     5794c(61,59)=    0.45503356796075D-07
     5795c(62,59)=   -0.18488950216058D-07
     5796c(63,59)=   -0.13960575345108D-07
     5797c(64,59)=   -0.36197787334473D-07
     5798c(65,59)=   -0.33970411942424D-07
     5799c(66,59)=    0.31570141904188D-07
     5800c(67,59)=   -0.22622266641646D-07
     5801c(68,59)=   -0.23545771401746D-07
     5802c(69,59)=    0.26108287400461D-07
     5803c(70,59)=   -0.10133573729510D-07
     5804c(71,59)=   -0.25833239151630D-08
     5805c(72,59)=   -0.13609862257131D-07
     5806c(73,59)=    0.12741460641084D-08
     5807c(74,59)=   -0.48779453360635D-07
     5808c(75,59)=    0.34181500763575D-08
     5809c(76,59)=   -0.11496318806930D-07
     5810c(77,59)=    0.18047284149487D-07
     5811c(78,59)=    0.17360033625305D-07
     5812c(79,59)=   -0.93953597834784D-10
     5813c(80,59)=    0.38800928176602D-07
     5814c(60,60)=    0.28593707509687D-07
     5815c(61,60)=   -0.75616956756271D-07
     5816c(62,60)=   -0.55700540200929D-08
     5817c(63,60)=   -0.22091231827130D-07
     5818c(64,60)=    0.28948480397681D-07
     5819c(65,60)=    0.62989187973610D-07
     5820c(66,60)=   -0.71384896383999D-08
     5821c(67,60)=   -0.45844593434291D-07
     5822c(68,60)=   -0.19217972358172D-07
     5823c(69,60)=   -0.19635478036358D-07
     5824c(70,60)=   -0.11957403033925D-07
     5825c(71,60)=   -0.12261960577181D-07
     5826c(72,60)=    0.65877363610953D-08
     5827c(73,60)=   -0.17113095123597D-07
     5828c(74,60)=   -0.27127106512783D-07
     5829c(75,60)=    0.83263511549959D-08
     5830c(76,60)=    0.29824364947494D-08
     5831c(77,60)=    0.19921028326643D-07
     5832c(78,60)=    0.46332146449539D-07
     5833c(79,60)=    0.35514037943076D-07
     5834c(80,60)=    0.48865245673134D-07
     5835c(61,61)=    0.52319776819198D-07
     5836c(62,61)=    0.15023349539380D-07
     5837c(63,61)=   -0.70027422021410D-07
     5838c(64,61)=   -0.34638400597222D-07
     5839c(65,61)=    0.14985893846734D-08
     5840c(66,61)=   -0.29791974365691D-07
     5841c(67,61)=   -0.90679449958987D-08
     5842c(68,61)=    0.12857956782801D-07
     5843c(69,61)=    0.53845517212863D-07
     5844c(70,61)=   -0.17458835856659D-07
     5845c(71,61)=    0.36191908982051D-07
     5846c(72,61)=    0.25837294831375D-07
     5847c(73,61)=   -0.12606088590518D-07
     5848c(74,61)=   -0.25171077476141D-08
     5849c(75,61)=   -0.35504806941465D-07
     5850c(76,61)=    0.21289043925316D-10
     5851c(77,61)=   -0.66199539992973D-07
     5852c(78,61)=   -0.93599768844641D-08
     5853c(79,61)=   -0.96226191599110D-07
     5854c(80,61)=   -0.32834066503532D-07
     5855c(62,62)=   -0.60237139592494D-08
     5856c(63,62)=   -0.20625629252480D-08
     5857c(64,62)=    0.30807889241947D-07
     5858c(65,62)=    0.19055891691252D-07
     5859c(66,62)=    0.23197555972264D-07
     5860c(67,62)=   -0.41975845620426D-07
     5861c(68,62)=   -0.49644119375293D-09
     5862c(69,62)=   -0.51833992488221D-08
     5863c(70,62)=    0.67550663105708D-08
     5864c(71,62)=    0.10323538786660D-07
     5865c(72,62)=    0.15241950767748D-07
     5866c(73,62)=    0.23488887949895D-08
     5867c(74,62)=   -0.74696335029352D-08
     5868c(75,62)=   -0.10698619291426D-07
     5869c(76,62)=   -0.28652339175347D-07
     5870c(77,62)=    0.24374250151510D-08
     5871c(78,62)=   -0.33061642688537D-07
     5872c(79,62)=    0.14350862995235D-07
     5873c(80,62)=   -0.51276446311965D-07
     5874c(63,63)=   -0.22756202330126D-07
     5875c(64,63)=   -0.66785580121160D-08
     5876c(65,63)=    0.14062329305521D-07
     5877c(66,63)=    0.57591865682234D-07
     5878c(67,63)=    0.38626292276263D-07
     5879c(68,63)=    0.15931686122385D-07
     5880c(69,63)=    0.19912556468545D-07
     5881c(70,63)=    0.39780213948434D-07
     5882c(71,63)=   -0.64204764298785D-07
     5883c(72,63)=    0.17881688771298D-07
     5884c(73,63)=   -0.26418452436418D-07
     5885c(74,63)=    0.18081288199856D-07
     5886c(75,63)=    0.26357469243573D-07
     5887c(76,63)=    0.35714299208398D-07
     5888c(77,63)=    0.31287884421194D-07
     5889c(78,63)=    0.19831070181322D-07
     5890c(79,63)=    0.71195365286147D-07
     5891c(80,63)=   -0.17057535049470D-07
     5892c(64,64)=    0.16001141443898D-07
     5893c(65,64)=    0.26376404806720D-07
     5894c(66,64)=   -0.44667259109842D-07
     5895c(67,64)=   -0.33013127101211D-07
     5896c(68,64)=   -0.24688575424350D-07
     5897c(69,64)=   -0.16536702551016D-07
     5898c(70,64)=    0.33616196659677D-07
     5899c(71,64)=    0.82053664939067D-08
     5900c(72,64)=    0.53768906241930D-08
     5901c(73,64)=    0.22133367848765D-07
     5902c(74,64)=    0.34709204101415D-07
     5903c(75,64)=    0.11497386113963D-07
     5904c(76,64)=    0.28299933040159D-07
     5905c(77,64)=    0.42666219442628D-07
     5906c(78,64)=    0.89976141970644D-08
     5907c(79,64)=    0.61504928080787D-07
     5908c(80,64)=    0.46337885997585D-08
     5909c(65,65)=   -0.37923340594247D-07
     5910c(66,65)=    0.57908038036215D-07
     5911c(67,65)=    0.39678249190651D-07
     5912c(68,65)=   -0.32980329401940D-08
     5913c(69,65)=   -0.12573178107348D-07
     5914c(70,65)=    0.21840245123388D-07
     5915c(71,65)=   -0.15649518181756D-07
     5916c(72,65)=    0.37446874360709D-07
     5917c(73,65)=   -0.36013087655695D-07
     5918c(74,65)=    0.26242447015256D-07
     5919c(75,65)=    0.65993616223791D-08
     5920c(76,65)=   -0.89022251743086D-08
     5921c(77,65)=    0.25086514838982D-07
     5922c(78,65)=   -0.13654570164780D-07
     5923c(79,65)=    0.41828803742268D-07
     5924c(80,65)=   -0.21721222732775D-07
     5925c(66,66)=   -0.42645750642653D-07
     5926c(67,66)=   -0.35890545057486D-07
     5927c(68,66)=    0.48737014786927D-07
     5928c(69,66)=    0.89928827974056D-08
     5929c(70,66)=    0.45315771776624D-08
     5930c(71,66)=   -0.67900004779097D-08
     5931c(72,66)=   -0.22716964517560D-07
     5932c(73,66)=   -0.17907817841494D-07
     5933c(74,66)=   -0.22089058870163D-07
     5934c(75,66)=   -0.22542089210875D-07
     5935c(76,66)=   -0.24111771883861D-07
     5936c(77,66)=   -0.32975407909178D-07
     5937c(78,66)=    0.18032489207429D-07
     5938c(79,66)=   -0.67365391398799D-07
     5939c(80,66)=    0.27165847045611D-07
     5940c(67,67)=    0.13746247493082D-07
     5941c(68,67)=   -0.46840571421664D-07
     5942c(69,67)=   -0.46082937833652D-07
     5943c(70,67)=   -0.17875821555122D-07
     5944c(71,67)=   -0.13324915725140D-07
     5945c(72,67)=   -0.34047797587000D-07
     5946c(73,67)=   -0.46711868852491D-07
     5947c(74,67)=   -0.35449274763391D-08
     5948c(75,67)=   -0.20397141981446D-07
     5949c(76,67)=   -0.11108360493265D-07
     5950c(77,67)=    0.11381321576696D-07
     5951c(78,67)=   -0.63488647439425D-08
     5952c(79,67)=   -0.48538968483360D-07
     5953c(80,67)=   -0.71983453260028D-07
     5954c(68,68)=    0.16680960733166D-07
     5955c(69,68)=   -0.52083592951271D-08
     5956c(70,68)=    0.32325341968542D-07
     5957c(71,68)=   -0.16496832468463D-07
     5958c(72,68)=   -0.20643422798399D-09
     5959c(73,68)=    0.21679139252239D-07
     5960c(74,68)=    0.39106999354482D-07
     5961c(75,68)=    0.18143968667046D-07
     5962c(76,68)=   -0.68931580196856D-08
     5963c(77,68)=    0.33085534802760D-07
     5964c(78,68)=   -0.11037676026853D-07
     5965c(79,68)=    0.31808918194418D-07
     5966c(80,68)=   -0.10952551120856D-07
     5967c(69,69)=   -0.12245535537515D-07
     5968c(70,69)=    0.10287607959453D-07
     5969c(71,69)=    0.48907175215348D-07
     5970c(72,69)=   -0.66055000909424D-08
     5971c(73,69)=   -0.18998722014041D-07
     5972c(74,69)=    0.50721545495667D-07
     5973c(75,69)=    0.13625539452155D-07
     5974c(76,69)=    0.20921948458561D-07
     5975c(77,69)=   -0.80026826707920D-08
     5976c(78,69)=    0.10498380995640D-08
     5977c(79,69)=   -0.26003036261122D-08
     5978c(80,69)=   -0.18329141763226D-07
     5979c(70,70)=    0.26129165325730D-08
     5980c(71,70)=    0.39445680827134D-07
     5981c(72,70)=   -0.36440945745060D-07
     5982c(73,70)=   -0.34304469545119D-07
     5983c(74,70)=    0.90666251366812D-08
     5984c(75,70)=    0.98845829432444D-08
     5985c(76,70)=    0.20848195762778D-07
     5986c(77,70)=    0.65496386810649D-08
     5987c(78,70)=    0.13420363140932D-07
     5988c(79,70)=    0.24097504159691D-07
     5989c(80,70)=   -0.61345329316370D-07
     5990c(71,71)=   -0.23979906811712D-07
     5991c(72,71)=    0.81589711992019D-09
     5992c(73,71)=   -0.12038754975651D-07
     5993c(74,71)=   -0.33769050389210D-08
     5994c(75,71)=    0.22626329292769D-07
     5995c(76,71)=    0.34705206656060D-08
     5996c(77,71)=   -0.47557144208902D-08
     5997c(78,71)=   -0.12837520837664D-07
     5998c(79,71)=   -0.47143600956230D-08
     5999c(80,71)=   -0.13673596061185D-07
     6000c(72,72)=    0.20935785099319D-07
     6001c(73,72)=    0.15457694715164D-07
     6002c(74,72)=    0.43118438437429D-07
     6003c(75,72)=    0.44347445470690D-08
     6004c(76,72)=    0.86935013976379D-08
     6005c(77,72)=    0.14238230603767D-07
     6006c(78,72)=   -0.75862730206882D-08
     6007c(79,72)=    0.18694963412678D-07
     6008c(80,72)=   -0.22644291755096D-08
     6009c(73,73)=    0.10665385729218D-07
     6010c(74,73)=    0.10893726176099D-07
     6011c(75,73)=   -0.39069862760945D-07
     6012c(76,73)=   -0.68738761190501D-07
     6013c(77,73)=   -0.25753617667176D-07
     6014c(78,73)=   -0.42049642957662D-07
     6015c(79,73)=    0.96057051523230D-08
     6016c(80,73)=   -0.54754957010108D-09
     6017c(74,74)=    0.35533577546674D-07
     6018c(75,74)=    0.24381875264283D-08
     6019c(76,74)=   -0.16956003331522D-07
     6020c(77,74)=    0.14996059285111D-07
     6021c(78,74)=    0.15017114043667D-07
     6022c(79,74)=    0.28157653772661D-07
     6023c(80,74)=   -0.10857895553919D-07
     6024c(75,75)=   -0.20557935405623D-07
     6025c(76,75)=   -0.11445288933741D-07
     6026c(77,75)=   -0.13998374279198D-07
     6027c(78,75)=   -0.86094853130988D-07
     6028c(79,75)=   -0.44073733643326D-07
     6029c(80,75)=   -0.97888515027293D-07
     6030c(76,76)=    0.16947695586139D-07
     6031c(77,76)=    0.48271839875412D-07
     6032c(78,76)=    0.87890863155167D-07
     6033c(79,76)=   -0.47066652207509D-07
     6034c(80,76)=   -0.18420259011703D-07
     6035c(77,77)=    0.22222570253966D-07
     6036c(78,77)=   -0.35567341235073D-07
     6037c(79,77)=    0.15074521892097D-07
     6038c(80,77)=   -0.65806552524787D-07
     6039c(78,78)=    0.42469008564636D-07
     6040c(79,78)=   -0.75948714508049D-08
     6041c(80,78)=   -0.16243257517502D-07
     6042c(79,79)=   -0.12617301383201D-07
     6043c(80,79)=    0.16728015999556D-07
     6044c(80,80)=    0.54813675815846D-08
     6045s( 2, 1)=   -0.11401847225989D-09
     6046s( 3, 1)=    0.25155150744332D-04
     6047s( 4, 1)=    0.37588917182210D-05
     6048s( 5, 1)=    0.21199078107223D-05
     6049s( 6, 1)=   -0.15154712831579D-05
     6050s( 7, 1)=   -0.22693254012337D-06
     6051s( 8, 1)=    0.74869335197712D-06
     6052s( 9, 1)=   -0.48887826939649D-06
     6053s(10, 1)=    0.22250477035440D-06
     6054s(11, 1)=   -0.22078265839368D-06
     6055s(12, 1)=   -0.51290190208753D-07
     6056s(13, 1)=    0.22519671490044D-06
     6057s(14, 1)=    0.30949508730742D-06
     6058s(15, 1)=    0.25961987086161D-06
     6059s(16, 1)=   -0.55346995650064D-06
     6060s(17, 1)=   -0.63687648573341D-06
     6061s(18, 1)=   -0.57862275066301D-06
     6062s(19, 1)=    0.50580889644975D-06
     6063s(20, 1)=    0.55159048065934D-06
     6064s(21, 1)=   -0.42466628430160D-06
     6065s(22, 1)=   -0.11861574241659D-06
     6066s(23, 1)=    0.74492590496240D-07
     6067s(24, 1)=    0.16898337729283D-06
     6068s(25, 1)=   -0.16782838780194D-07
     6069s(26, 1)=   -0.38583254338416D-06
     6070s(27, 1)=   -0.42826946644146D-07
     6071s(28, 1)=    0.10245418978571D-06
     6072s(29, 1)=    0.20097501534675D-06
     6073s(30, 1)=   -0.18646620419890D-08
     6074s(31, 1)=   -0.82686085187458D-07
     6075s(32, 1)=   -0.18316285527029D-06
     6076s(33, 1)=   -0.93637017303617D-07
     6077s(34, 1)=   -0.51407090820137D-07
     6078s(35, 1)=    0.15318194346565D-06
     6079s(36, 1)=   -0.28160803509340D-07
     6080s(37, 1)=   -0.18555020643732D-06
     6081s(38, 1)=   -0.12915239202711D-07
     6082s(39, 1)=    0.11449391594282D-06
     6083s(40, 1)=   -0.12753203712807D-07
     6084s(41, 1)=   -0.67949821258339D-07
     6085s(42, 1)=   -0.16396289398253D-07
     6086s(43, 1)=   -0.43771996408463D-07
     6087s(44, 1)=   -0.12376736507648D-08
     6088s(45, 1)=    0.53832073271757D-07
     6089s(46, 1)=    0.15683302078249D-07
     6090s(47, 1)=   -0.95298601138481D-07
     6091s(48, 1)=   -0.59657889079683D-07
     6092s(49, 1)=    0.77816630739978D-07
     6093s(50, 1)=    0.39362579443894D-07
     6094s(51, 1)=   -0.50147019425721D-07
     6095s(52, 1)=   -0.76175189595045D-08
     6096s(53, 1)=    0.44470821222391D-07
     6097s(54, 1)=    0.58422934124297D-07
     6098s(55, 1)=   -0.27531333298184D-07
     6099s(56, 1)=    0.47425144454705D-07
     6100s(57, 1)=    0.12692149563230D-07
     6101s(58, 1)=   -0.62104080669803D-07
     6102s(59, 1)=   -0.78129455156601D-09
     6103s(60, 1)=    0.19250839858214D-07
     6104s(61, 1)=    0.29756964767289D-07
     6105s(62, 1)=   -0.36635669397708D-07
     6106s(63, 1)=    0.39026727963702D-07
     6107s(64, 1)=   -0.11666343243320D-08
     6108s(65, 1)=   -0.39507755076019D-08
     6109s(66, 1)=    0.13315627623450D-07
     6110s(67, 1)=   -0.90964859573059D-08
     6111s(68, 1)=    0.31922474126431D-07
     6112s(69, 1)=   -0.89309440163424D-08
     6113s(70, 1)=   -0.24655505132494D-08
     6114s(71, 1)=   -0.42602408922089D-08
     6115s(72, 1)=   -0.12030889796115D-07
     6116s(73, 1)=   -0.10741257587395D-07
     6117s(74, 1)=   -0.55499974865562D-08
     6118s(75, 1)=   -0.35174435080564D-08
     6119s(76, 1)=    0.15678335042096D-07
     6120s(77, 1)=   -0.28372251356007D-08
     6121s(78, 1)=    0.20084489528831D-07
     6122s(79, 1)=    0.22045740795526D-08
     6123s(80, 1)=    0.15356372022802D-07
     6124s( 2, 2)=    0.48905551075504D-04
     6125s( 3, 2)=    0.83539192403728D-05
     6126s( 4, 2)=   -0.89701777491190D-05
     6127s( 5, 2)=   -0.11641453008893D-05
     6128s( 6, 2)=    0.14667268956886D-05
     6129s( 7, 2)=   -0.62842100807606D-06
     6130s( 8, 2)=    0.50596700143418D-06
     6131s( 9, 2)=    0.38142891566534D-06
     6132s(10, 2)=   -0.11124225282454D-05
     6133s(11, 2)=   -0.99100594960733D-06
     6134s(12, 2)=    0.53128493253623D-06
     6135s(13, 2)=    0.85028075079998D-06
     6136s(14, 2)=   -0.52161616518213D-06
     6137s(15, 2)=   -0.78050858035765D-06
     6138s(16, 2)=   -0.87214358332511D-07
     6139s(17, 2)=    0.14579826763514D-06
     6140s(18, 2)=    0.43798807886695D-07
     6141s(19, 2)=    0.87664275315519D-07
     6142s(20, 2)=   -0.23739329968468D-06
     6143s(21, 2)=   -0.55617022532929D-06
     6144s(22, 2)=    0.74634801430613D-07
     6145s(23, 2)=    0.47058080251370D-06
     6146s(24, 2)=   -0.13833943024497D-06
     6147s(25, 2)=   -0.36206673055862D-06
     6148s(26, 2)=    0.13771086763274D-07
     6149s(27, 2)=    0.26908130569571D-06
     6150s(28, 2)=    0.25184065503879D-06
     6151s(29, 2)=    0.29109346693879D-08
     6152s(30, 2)=   -0.44165883077743D-07
     6153s(31, 2)=    0.13908167846995D-07
     6154s(32, 2)=    0.18305835915308D-06
     6155s(33, 2)=    0.20487537947298D-06
     6156s(34, 2)=    0.47320171392541D-07
     6157s(35, 2)=   -0.58882619512619D-07
     6158s(36, 2)=   -0.12311353910300D-06
     6159s(37, 2)=   -0.21919769425805D-07
     6160s(38, 2)=    0.11709291424090D-06
     6161s(39, 2)=    0.92699311123633D-07
     6162s(40, 2)=   -0.90368996680850D-07
     6163s(41, 2)=   -0.11102320608435D-06
     6164s(42, 2)=    0.85441307939682D-07
     6165s(43, 2)=    0.15019286440103D-06
     6166s(44, 2)=   -0.15758773652609D-07
     6167s(45, 2)=   -0.56546577893551D-07
     6168s(46, 2)=    0.46414838712203D-07
     6169s(47, 2)=    0.69440803211037D-07
     6170s(48, 2)=   -0.41543319320956D-07
     6171s(49, 2)=   -0.25453153619611D-07
     6172s(50, 2)=    0.61069806618382D-07
     6173s(51, 2)=   -0.21431871272039D-07
     6174s(52, 2)=   -0.27493738239856D-07
     6175s(53, 2)=    0.40499074786701D-07
     6176s(54, 2)=    0.16409989015642D-07
     6177s(55, 2)=   -0.46733116241997D-07
     6178s(56, 2)=   -0.49935750762261D-07
     6179s(57, 2)=    0.38916218999179D-07
     6180s(58, 2)=   -0.49768112095755D-08
     6181s(59, 2)=   -0.28668365214044D-07
     6182s(60, 2)=    0.10106627158974D-07
     6183s(61, 2)=   -0.15637139662540D-07
     6184s(62, 2)=   -0.20915792684197D-07
     6185s(63, 2)=   -0.54227075337162D-07
     6186s(64, 2)=    0.33432699268793D-07
     6187s(65, 2)=    0.10034791702217D-07
     6188s(66, 2)=    0.10133225197098D-07
     6189s(67, 2)=   -0.22905770890077D-07
     6190s(68, 2)=   -0.22301580854256D-07
     6191s(69, 2)=   -0.92177350430440D-08
     6192s(70, 2)=   -0.18780903598666D-08
     6193s(71, 2)=   -0.75542782412997D-09
     6194s(72, 2)=    0.49577307486526D-08
     6195s(73, 2)=   -0.10826784880676D-07
     6196s(74, 2)=   -0.23224199983071D-07
     6197s(75, 2)=    0.19561774315674D-07
     6198s(76, 2)=   -0.30216464519069D-07
     6199s(77, 2)=    0.17749568424107D-07
     6200s(78, 2)=   -0.33399757719077D-07
     6201s(79, 2)=    0.18010662015649D-07
     6202s(80, 2)=   -0.32871462541030D-07
     6203s( 3, 3)=    0.25551471726737D-04
     6204s( 4, 3)=   -0.19274827646727D-06
     6205s( 5, 3)=    0.27140581800371D-06
     6206s( 6, 3)=    0.33222302672742D-06
     6207s( 7, 3)=   -0.39609564442357D-06
     6208s( 8, 3)=   -0.13382050309136D-05
     6209s( 9, 3)=   -0.10048343370863D-05
     6210s(10, 3)=    0.44208842620839D-06
     6211s(11, 3)=    0.76239768915178D-06
     6212s(12, 3)=    0.31335143763597D-06
     6213s(13, 3)=    0.18130002960504D-06
     6214s(14, 3)=   -0.31104921120362D-06
     6215s(15, 3)=   -0.29856958137367D-06
     6216s(16, 3)=    0.42481073247226D-06
     6217s(17, 3)=    0.19122120603783D-06
     6218s(18, 3)=   -0.46117693571270D-06
     6219s(19, 3)=   -0.20023496082877D-06
     6220s(20, 3)=    0.20997193488831D-06
     6221s(21, 3)=    0.24698772474013D-06
     6222s(22, 3)=    0.14526401968646D-07
     6223s(23, 3)=   -0.13094420881434D-06
     6224s(24, 3)=   -0.28724262482356D-06
     6225s(25, 3)=   -0.14705252644312D-06
     6226s(26, 3)=    0.12595891565708D-06
     6227s(27, 3)=    0.31207723482287D-06
     6228s(28, 3)=   -0.27650809086232D-06
     6229s(29, 3)=   -0.30671076129865D-06
     6230s(30, 3)=    0.84155662713398D-08
     6231s(31, 3)=    0.54069483045578D-07
     6232s(32, 3)=    0.37773579574019D-07
     6233s(33, 3)=   -0.11854623883255D-06
     6234s(34, 3)=   -0.16136229886968D-06
     6235s(35, 3)=   -0.59238139036980D-07
     6236s(36, 3)=    0.52705208366376D-07
     6237s(37, 3)=    0.61587862484921D-07
     6238s(38, 3)=   -0.11594308999457D-07
     6239s(39, 3)=   -0.21618306258924D-07
     6240s(40, 3)=   -0.14792502688220D-07
     6241s(41, 3)=    0.62343085836212D-07
     6242s(42, 3)=    0.25134346110112D-07
     6243s(43, 3)=    0.24424514891413D-07
     6244s(44, 3)=   -0.26996983351598D-07
     6245s(45, 3)=   -0.72534663934446D-08
     6246s(46, 3)=    0.29618360439917D-07
     6247s(47, 3)=    0.52654231743027D-08
     6248s(48, 3)=   -0.10583447514475D-07
     6249s(49, 3)=    0.37626191938029D-07
     6250s(50, 3)=    0.25596290670976D-07
     6251s(51, 3)=   -0.23932391975686D-07
     6252s(52, 3)=   -0.49857747681036D-07
     6253s(53, 3)=    0.95895058624665D-08
     6254s(54, 3)=    0.71293575106710D-07
     6255s(55, 3)=    0.14572395176144D-07
     6256s(56, 3)=   -0.46910828885870D-07
     6257s(57, 3)=    0.35071316888314D-07
     6258s(58, 3)=    0.31409118702607D-07
     6259s(59, 3)=   -0.14417701951018D-07
     6260s(60, 3)=    0.13876650780031D-07
     6261s(61, 3)=   -0.35334741851824D-08
     6262s(62, 3)=   -0.30324625813371D-07
     6263s(63, 3)=   -0.32787634088217D-07
     6264s(64, 3)=    0.12694055876807D-07
     6265s(65, 3)=    0.22406210975383D-07
     6266s(66, 3)=   -0.18141161946838D-07
     6267s(67, 3)=    0.54521038956287D-09
     6268s(68, 3)=   -0.38138689619787D-08
     6269s(69, 3)=   -0.16093220344950D-07
     6270s(70, 3)=   -0.37036403872396D-07
     6271s(71, 3)=   -0.47186949728098D-08
     6272s(72, 3)=   -0.27956746206030D-07
     6273s(73, 3)=    0.85634852321390D-09
     6274s(74, 3)=   -0.38325087199963D-07
     6275s(75, 3)=    0.15398137020464D-07
     6276s(76, 3)=   -0.39023342002934D-07
     6277s(77, 3)=    0.19635939217429D-07
     6278s(78, 3)=   -0.35504514917566D-07
     6279s(79, 3)=    0.21761683080775D-07
     6280s(80, 3)=   -0.31625978448866D-07
     6281s( 4, 4)=   -0.12857823170070D-04
     6282s( 5, 4)=   -0.33773263335749D-05
     6283s( 6, 4)=    0.26339507884398D-05
     6284s( 7, 4)=   -0.42144144853044D-06
     6285s( 8, 4)=    0.14777413181852D-06
     6286s( 9, 4)=    0.16194710093435D-05
     6287s(10, 4)=   -0.69313507253819D-07
     6288s(11, 4)=   -0.64233300320774D-06
     6289s(12, 4)=    0.12301690995295D-06
     6290s(13, 4)=    0.68736009234055D-06
     6291s(14, 4)=   -0.95770079832859D-06
     6292s(15, 4)=   -0.83528061339268D-06
     6293s(16, 4)=   -0.54260378146251D-07
     6294s(17, 4)=   -0.93929405238052D-08
     6295s(18, 4)=    0.13191461217734D-06
     6296s(19, 4)=    0.25226344496632D-06
     6297s(20, 4)=    0.20621490254119D-06
     6298s(21, 4)=   -0.14043749966466D-06
     6299s(22, 4)=   -0.37858016062249D-06
     6300s(23, 4)=    0.73495913921712D-07
     6301s(24, 4)=    0.11779230311764D-06
     6302s(25, 4)=    0.15527691778753D-06
     6303s(26, 4)=    0.21058477382704D-06
     6304s(27, 4)=    0.89681836558224D-07
     6305s(28, 4)=    0.19622213253189D-07
     6306s(29, 4)=    0.47678131095151D-07
     6307s(30, 4)=    0.21380065806948D-06
     6308s(31, 4)=    0.75620818268705D-08
     6309s(32, 4)=    0.69970608136749D-07
     6310s(33, 4)=    0.31985403196957D-07
     6311s(34, 4)=    0.98787731189489D-07
     6312s(35, 4)=    0.79432952777437D-07
     6313s(36, 4)=   -0.22350132896334D-07
     6314s(37, 4)=    0.66789039516572D-08
     6315s(38, 4)=    0.64998554245920D-07
     6316s(39, 4)=    0.36097324429760D-07
     6317s(40, 4)=    0.53798620841362D-07
     6318s(41, 4)=   -0.60633572489982D-08
     6319s(42, 4)=    0.43908209925831D-07
     6320s(43, 4)=    0.69304474175146D-07
     6321s(44, 4)=    0.17136856044562D-07
     6322s(45, 4)=   -0.21172262663520D-07
     6323s(46, 4)=    0.15964270630663D-07
     6324s(47, 4)=    0.68319629051684D-07
     6325s(48, 4)=    0.22307463806329D-07
     6326s(49, 4)=   -0.22098747481583D-07
     6327s(50, 4)=   -0.13416105611403D-07
     6328s(51, 4)=   -0.28727639863575D-08
     6329s(52, 4)=    0.61362062327015D-08
     6330s(53, 4)=    0.28029179020574D-07
     6331s(54, 4)=    0.20493852005795D-07
     6332s(55, 4)=   -0.34076081538132D-07
     6333s(56, 4)=   -0.50027878148709D-07
     6334s(57, 4)=    0.25275768023372D-07
     6335s(58, 4)=    0.32984416637604D-07
     6336s(59, 4)=    0.46748302094913D-08
     6337s(60, 4)=   -0.28731083679469D-07
     6338s(61, 4)=   -0.12185426332213D-08
     6339s(62, 4)=    0.24196923372757D-07
     6340s(63, 4)=   -0.38300851302597D-07
     6341s(64, 4)=    0.23385333301277D-07
     6342s(65, 4)=    0.10699297135166D-07
     6343s(66, 4)=    0.24635886833335D-07
     6344s(67, 4)=    0.16525365641931D-08
     6345s(68, 4)=    0.11620271286385D-08
     6346s(69, 4)=    0.21844011370929D-07
     6347s(70, 4)=   -0.21954322860600D-07
     6348s(71, 4)=   -0.29656501717783D-08
     6349s(72, 4)=    0.11819742766063D-07
     6350s(73, 4)=   -0.33898434165158D-07
     6351s(74, 4)=    0.10552495877755D-07
     6352s(75, 4)=   -0.60657709996744D-08
     6353s(76, 4)=   -0.15629828556566D-07
     6354s(77, 4)=   -0.20599003025979D-08
     6355s(78, 4)=   -0.38749943891530D-08
     6356s(79, 4)=   -0.12713374207514D-07
     6357s(80, 4)=    0.22321713775651D-09
     6358s( 5, 5)=    0.37742550130119D-05
     6359s( 6, 5)=    0.16199010884387D-05
     6360s( 7, 5)=   -0.13557075249867D-05
     6361s( 8, 5)=   -0.16260186706174D-05
     6362s( 9, 5)=   -0.15457469241661D-05
     6363s(10, 5)=   -0.10600209030637D-05
     6364s(11, 5)=    0.89636346823903D-06
     6365s(12, 5)=    0.99814527374599D-06
     6366s(13, 5)=   -0.40334461020521D-06
     6367s(14, 5)=   -0.96150455430912D-06
     6368s(15, 5)=   -0.47286535275867D-06
     6369s(16, 5)=    0.58730941024010D-06
     6370s(17, 5)=    0.31152083265288D-06
     6371s(18, 5)=   -0.61825374203407D-06
     6372s(19, 5)=   -0.44472448343507D-06
     6373s(20, 5)=    0.14586438492309D-07
     6374s(21, 5)=    0.16628168439163D-06
     6375s(22, 5)=    0.31241402527141D-07
     6376s(23, 5)=    0.18854458337510D-06
     6377s(24, 5)=   -0.16489726638894D-06
     6378s(25, 5)=   -0.31845421512104D-06
     6379s(26, 5)=    0.22721950714351D-06
     6380s(27, 5)=    0.28299545652663D-06
     6381s(28, 5)=   -0.37389057002835D-07
     6382s(29, 5)=   -0.17226603663226D-06
     6383s(30, 5)=    0.14710390042110D-06
     6384s(31, 5)=    0.17561089328596D-06
     6385s(32, 5)=   -0.65422322261088D-07
     6386s(33, 5)=    0.54998698313070D-07
     6387s(34, 5)=   -0.58162952622315D-07
     6388s(35, 5)=   -0.21460608956987D-06
     6389s(36, 5)=    0.10197746868170D-07
     6390s(37, 5)=    0.12520063761894D-06
     6391s(38, 5)=   -0.35506011727971D-07
     6392s(39, 5)=   -0.19201531312844D-06
     6393s(40, 5)=   -0.12269200040578D-06
     6394s(41, 5)=    0.89778390439825D-07
     6395s(42, 5)=   -0.41913786741451D-07
     6396s(43, 5)=   -0.91520006488999D-07
     6397s(44, 5)=   -0.44920044599259D-07
     6398s(45, 5)=    0.11643541732227D-07
     6399s(46, 5)=   -0.26360725053581D-08
     6400s(47, 5)=   -0.44760884506842D-08
     6401s(48, 5)=   -0.21592819756822D-07
     6402s(49, 5)=   -0.60937408379074D-08
     6403s(50, 5)=    0.27401279526375D-08
     6404s(51, 5)=    0.15851055218607D-07
     6405s(52, 5)=   -0.39887968690482D-07
     6406s(53, 5)=   -0.18343774352404D-07
     6407s(54, 5)=    0.62372930417058D-08
     6408s(55, 5)=    0.20924085053186D-07
     6409s(56, 5)=   -0.30622186799619D-07
     6410s(57, 5)=   -0.11748953359707D-07
     6411s(58, 5)=    0.23880590247310D-07
     6412s(59, 5)=    0.20034896605191D-07
     6413s(60, 5)=   -0.16471279024280D-07
     6414s(61, 5)=   -0.11357411549884D-07
     6415s(62, 5)=   -0.18049010749233D-07
     6416s(63, 5)=   -0.65094139439041D-07
     6417s(64, 5)=   -0.20737977692137D-07
     6418s(65, 5)=   -0.29791542438761D-07
     6419s(66, 5)=    0.78550958031711D-09
     6420s(67, 5)=    0.98305589918783D-08
     6421s(68, 5)=    0.15360752910204D-07
     6422s(69, 5)=    0.17205978100653D-07
     6423s(70, 5)=    0.82258548517498D-08
     6424s(71, 5)=    0.85106428921503D-08
     6425s(72, 5)=    0.11577667889131D-07
     6426s(73, 5)=    0.16308111802428D-08
     6427s(74, 5)=    0.14229372953148D-07
     6428s(75, 5)=   -0.82577367551857D-08
     6429s(76, 5)=    0.16419910665001D-07
     6430s(77, 5)=   -0.76141933727246D-08
     6431s(78, 5)=    0.15663078015234D-07
     6432s(79, 5)=   -0.38076118797541D-08
     6433s(80, 5)=    0.19338680156276D-07
     6434s( 6, 6)=    0.82048914571916D-06
     6435s( 7, 6)=   -0.18976252698758D-05
     6436s( 8, 6)=   -0.17859907392665D-05
     6437s( 9, 6)=    0.57635343927424D-06
     6438s(10, 6)=    0.11141482531981D-05
     6439s(11, 6)=    0.20520417204917D-07
     6440s(12, 6)=   -0.16241518863413D-05
     6441s(13, 6)=   -0.92898699384914D-06
     6442s(14, 6)=   -0.83030911917673D-07
     6443s(15, 6)=    0.63029479290680D-06
     6444s(16, 6)=    0.22377218327274D-06
     6445s(17, 6)=   -0.30803335024641D-06
     6446s(18, 6)=   -0.67899952282254D-06
     6447s(19, 6)=   -0.15250901091529D-06
     6448s(20, 6)=    0.37831534677241D-06
     6449s(21, 6)=    0.27709441869198D-06
     6450s(22, 6)=   -0.52996707240534D-06
     6451s(23, 6)=   -0.49676668701636D-06
     6452s(24, 6)=    0.36332436606584D-07
     6453s(25, 6)=    0.35015834406465D-06
     6454s(26, 6)=    0.58170241349480D-07
     6455s(27, 6)=   -0.32085152929534D-06
     6456s(28, 6)=   -0.26174056751663D-06
     6457s(29, 6)=    0.74912443471519D-08
     6458s(30, 6)=    0.36062403088968D-06
     6459s(31, 6)=    0.11445836997106D-06
     6460s(32, 6)=   -0.21026389477025D-06
     6461s(33, 6)=   -0.26176185843027D-06
     6462s(34, 6)=    0.27649159609722D-07
     6463s(35, 6)=    0.18659652364132D-06
     6464s(36, 6)=    0.64867610890407D-08
     6465s(37, 6)=   -0.12178155734875D-06
     6466s(38, 6)=   -0.11711628132855D-06
     6467s(39, 6)=   -0.54345146341479D-08
     6468s(40, 6)=    0.71059805395230D-07
     6469s(41, 6)=    0.46535261677561D-07
     6470s(42, 6)=   -0.19077964613060D-07
     6471s(43, 6)=   -0.61725941246726D-07
     6472s(44, 6)=    0.56827990615115D-07
     6473s(45, 6)=    0.49360626933475D-07
     6474s(46, 6)=   -0.44437585732807D-07
     6475s(47, 6)=   -0.16590532201585D-07
     6476s(48, 6)=    0.52118679119891D-07
     6477s(49, 6)=   -0.39270934787392D-07
     6478s(50, 6)=   -0.29200578663369D-07
     6479s(51, 6)=    0.71930752953130D-08
     6480s(52, 6)=   -0.55013112384309D-08
     6481s(53, 6)=   -0.41179828878416D-07
     6482s(54, 6)=    0.27775828195230D-07
     6483s(55, 6)=    0.40970764709541D-07
     6484s(56, 6)=   -0.93882334391395D-08
     6485s(57, 6)=   -0.19406697176474D-07
     6486s(58, 6)=    0.33469412443438D-07
     6487s(59, 6)=    0.12935720779420D-07
     6488s(60, 6)=   -0.11381909184848D-07
     6489s(61, 6)=    0.94081584158453D-08
     6490s(62, 6)=    0.47789557270427D-07
     6491s(63, 6)=    0.17622793297102D-07
     6492s(64, 6)=   -0.18345308909856D-07
     6493s(65, 6)=    0.26940425956765D-08
     6494s(66, 6)=   -0.12905439356089D-07
     6495s(67, 6)=   -0.19649164082368D-07
     6496s(68, 6)=    0.15817487307388D-07
     6497s(69, 6)=    0.98315960599906D-08
     6498s(70, 6)=   -0.36651513112467D-08
     6499s(71, 6)=   -0.31455261139310D-08
     6500s(72, 6)=    0.23442550631311D-07
     6501s(73, 6)=   -0.91447673426722D-08
     6502s(74, 6)=    0.12777811795930D-07
     6503s(75, 6)=   -0.38604892131951D-08
     6504s(76, 6)=    0.15707324950716D-07
     6505s(77, 6)=   -0.54637645120108D-08
     6506s(78, 6)=    0.12652007604582D-07
     6507s(79, 6)=    0.76513109485040D-08
     6508s(80, 6)=    0.80948836322871D-08
     6509s( 7, 7)=   -0.17718148905347D-05
     6510s( 8, 7)=    0.16408397974219D-05
     6511s( 9, 7)=    0.86647021106569D-06
     6512s(10, 7)=   -0.61835547459555D-06
     6513s(11, 7)=   -0.86232464665112D-06
     6514s(12, 7)=   -0.11248859759827D-06
     6515s(13, 7)=    0.39634821776235D-06
     6516s(14, 7)=    0.24045824377199D-06
     6517s(15, 7)=    0.36039156989872D-06
     6518s(16, 7)=    0.31060939091896D-06
     6519s(17, 7)=   -0.24009029696849D-06
     6520s(18, 7)=   -0.16932094993760D-06
     6521s(19, 7)=    0.18821371044436D-06
     6522s(20, 7)=    0.40126716006775D-07
     6523s(21, 7)=   -0.30263479586734D-06
     6524s(22, 7)=    0.12697718689314D-07
     6525s(23, 7)=    0.28287048180980D-06
     6526s(24, 7)=    0.50713252130312D-06
     6527s(25, 7)=    0.26061153429560D-06
     6528s(26, 7)=   -0.23148709970149D-06
     6529s(27, 7)=   -0.11121282776403D-06
     6530s(28, 7)=    0.19604577315001D-06
     6531s(29, 7)=    0.16686812676659D-06
     6532s(30, 7)=    0.30214879537025D-07
     6533s(31, 7)=   -0.13377877566804D-06
     6534s(32, 7)=   -0.16610438475314D-06
     6535s(33, 7)=    0.28746228761159D-06
     6536s(34, 7)=    0.22764174789091D-06
     6537s(35, 7)=   -0.10676698900774D-06
     6538s(36, 7)=   -0.11823947886321D-06
     6539s(37, 7)=   -0.18761169597968D-07
     6540s(38, 7)=    0.15498239194539D-06
     6541s(39, 7)=   -0.39950543926411D-08
     6542s(40, 7)=   -0.43229921049524D-07
     6543s(41, 7)=    0.11412007712194D-06
     6544s(42, 7)=   -0.14466968510796D-07
     6545s(43, 7)=   -0.50395367209663D-07
     6546s(44, 7)=    0.10038828070189D-07
     6547s(45, 7)=    0.89846934942603D-07
     6548s(46, 7)=    0.26646513249887D-07
     6549s(47, 7)=   -0.10731318307303D-06
     6550s(48, 7)=    0.42121798444175D-08
     6551s(49, 7)=    0.75577709045872D-07
     6552s(50, 7)=   -0.42621912089417D-07
     6553s(51, 7)=   -0.16964770982555D-07
     6554s(52, 7)=    0.22999036083795D-07
     6555s(53, 7)=   -0.20887288050776D-07
     6556s(54, 7)=   -0.44108867497604D-07
     6557s(55, 7)=    0.13930811021967D-08
     6558s(56, 7)=   -0.83764704949305D-08
     6559s(57, 7)=   -0.69153676523682D-08
     6560s(58, 7)=    0.18007382119490D-08
     6561s(59, 7)=    0.33336892845039D-08
     6562s(60, 7)=   -0.41896555386511D-08
     6563s(61, 7)=   -0.17039520923528D-07
     6564s(62, 7)=   -0.16712720904900D-07
     6565s(63, 7)=    0.37298748429177D-07
     6566s(64, 7)=   -0.25654109191059D-07
     6567s(65, 7)=   -0.13749720601388D-07
     6568s(66, 7)=    0.26676806808541D-07
     6569s(67, 7)=    0.16476181922272D-07
     6570s(68, 7)=    0.83007982073902D-08
     6571s(69, 7)=    0.26847074426587D-07
     6572s(70, 7)=    0.18339215465452D-07
     6573s(71, 7)=   -0.12096493390590D-07
     6574s(72, 7)=    0.30873049918127D-07
     6575s(73, 7)=   -0.22948720255903D-08
     6576s(74, 7)=    0.42303559984739D-09
     6577s(75, 7)=   -0.31468500927299D-09
     6578s(76, 7)=   -0.78036646136261D-08
     6579s(77, 7)=   -0.15461825889251D-07
     6580s(78, 7)=    0.35576129993784D-08
     6581s(79, 7)=   -0.87002735760482D-08
     6582s(80, 7)=   -0.34389487185570D-09
     6583s( 8, 8)=   -0.24959849099076D-06
     6584s( 9, 8)=   -0.14580693512087D-06
     6585s(10, 8)=    0.81805036262635D-06
     6586s(11, 8)=    0.76433996425429D-06
     6587s(12, 8)=   -0.38702672712394D-06
     6588s(13, 8)=   -0.64465263597708D-08
     6589s(14, 8)=    0.37300526843875D-06
     6590s(15, 8)=    0.47222387124156D-06
     6591s(16, 8)=    0.38955608515904D-06
     6592s(17, 8)=   -0.20383440752989D-06
     6593s(18, 8)=   -0.26151194759556D-06
     6594s(19, 8)=   -0.13178247598978D-06
     6595s(20, 8)=    0.31649702590755D-06
     6596s(21, 8)=    0.31101517689284D-06
     6597s(22, 8)=   -0.21168255118607D-06
     6598s(23, 8)=   -0.28466023855760D-06
     6599s(24, 8)=    0.11719052550134D-06
     6600s(25, 8)=    0.15843866010930D-06
     6601s(26, 8)=    0.23810692528317D-07
     6602s(27, 8)=    0.53647006877697D-07
     6603s(28, 8)=   -0.31906307271979D-08
     6604s(29, 8)=   -0.10391985530998D-07
     6605s(30, 8)=    0.95109571880006D-07
     6606s(31, 8)=    0.57365947063787D-07
     6607s(32, 8)=   -0.40518346014117D-07
     6608s(33, 8)=   -0.15499078054985D-06
     6609s(34, 8)=    0.37313770945502D-07
     6610s(35, 8)=    0.93476114898862D-07
     6611s(36, 8)=   -0.45262218231854D-07
     6612s(37, 8)=   -0.98638451420277D-07
     6613s(38, 8)=    0.69215062222509D-07
     6614s(39, 8)=    0.30032636960184D-07
     6615s(40, 8)=   -0.75098783816941D-07
     6616s(41, 8)=   -0.63812778667225D-07
     6617s(42, 8)=   -0.57734182666462D-08
     6618s(43, 8)=   -0.43605753090059D-07
     6619s(44, 8)=    0.53239834915912D-07
     6620s(45, 8)=    0.29151322995370D-07
     6621s(46, 8)=   -0.19230450020761D-07
     6622s(47, 8)=   -0.39920862610279D-07
     6623s(48, 8)=    0.27925566188812D-07
     6624s(49, 8)=    0.58064949635228D-07
     6625s(50, 8)=   -0.71988778892891D-08
     6626s(51, 8)=    0.78900516452218D-08
     6627s(52, 8)=    0.28429706686802D-07
     6628s(53, 8)=    0.76661527952012D-08
     6629s(54, 8)=    0.72627505164607D-08
     6630s(55, 8)=   -0.67541296281969D-08
     6631s(56, 8)=    0.17380975529252D-07
     6632s(57, 8)=   -0.64317567606288D-08
     6633s(58, 8)=    0.11915145445347D-07
     6634s(59, 8)=    0.12196090940292D-07
     6635s(60, 8)=   -0.27987670013253D-07
     6636s(61, 8)=   -0.71249626874001D-08
     6637s(62, 8)=   -0.51867829783309D-08
     6638s(63, 8)=   -0.19468386912618D-07
     6639s(64, 8)=    0.23098695913554D-07
     6640s(65, 8)=    0.28411589627994D-07
     6641s(66, 8)=    0.27127785981138D-07
     6642s(67, 8)=    0.20265388073624D-07
     6643s(68, 8)=   -0.69432862125621D-08
     6644s(69, 8)=    0.51173112821441D-08
     6645s(70, 8)=   -0.43588065245559D-08
     6646s(71, 8)=    0.61109017794536D-08
     6647s(72, 8)=    0.21118182460781D-07
     6648s(73, 8)=   -0.94860333532873D-09
     6649s(74, 8)=    0.43499469247456D-08
     6650s(75, 8)=    0.15440798733987D-07
     6651s(76, 8)=    0.42930395860814D-08
     6652s(77, 8)=   -0.10648979146836D-07
     6653s(78, 8)=    0.23716172947373D-07
     6654s(79, 8)=   -0.23048343056173D-07
     6655s(80, 8)=    0.16544765807105D-07
     6656s( 9, 9)=   -0.65627326888320D-06
     6657s(10, 9)=   -0.14595950764968D-05
     6658s(11, 9)=   -0.41836765661321D-06
     6659s(12, 9)=    0.47512601540373D-06
     6660s(13, 9)=    0.80247505155953D-06
     6661s(14, 9)=    0.11498533744602D-05
     6662s(15, 9)=   -0.37235910487197D-06
     6663s(16, 9)=   -0.93489733864836D-06
     6664s(17, 9)=   -0.32805356533853D-06
     6665s(18, 9)=    0.22858126868659D-06
     6666s(19, 9)=    0.39400348404035D-06
     6667s(20, 9)=    0.18072704192137D-06
     6668s(21, 9)=   -0.10183574008031D-06
     6669s(22, 9)=   -0.30654676245482D-07
     6670s(23, 9)=    0.10420719046342D-06
     6671s(24, 9)=    0.33274868234587D-06
     6672s(25, 9)=    0.21290437080171D-06
     6673s(26, 9)=   -0.51156668516244D-06
     6674s(27, 9)=   -0.38743075186968D-06
     6675s(28, 9)=    0.42432381937433D-06
     6676s(29, 9)=    0.33265775129990D-06
     6677s(30, 9)=   -0.14915562556088D-07
     6678s(31, 9)=   -0.41861144470828D-07
     6679s(32, 9)=   -0.99150362320510D-07
     6680s(33, 9)=    0.10711465229193D-06
     6681s(34, 9)=    0.12194543304261D-06
     6682s(35, 9)=   -0.46902631272439D-07
     6683s(36, 9)=   -0.66049672182928D-07
     6684s(37, 9)=   -0.52095734962230D-07
     6685s(38, 9)=    0.13573875181403D-06
     6686s(39, 9)=    0.18417451602229D-07
     6687s(40, 9)=   -0.11934084112825D-06
     6688s(41, 9)=   -0.18995682305052D-07
     6689s(42, 9)=    0.54219013565157D-07
     6690s(43, 9)=    0.35057697093395D-07
     6691s(44, 9)=    0.53305704921528D-09
     6692s(45, 9)=    0.64794407176129D-07
     6693s(46, 9)=    0.27331745831916D-07
     6694s(47, 9)=   -0.58988474395239D-07
     6695s(48, 9)=    0.17461117306505D-07
     6696s(49, 9)=    0.87270646852327D-07
     6697s(50, 9)=   -0.71342940132626D-08
     6698s(51, 9)=   -0.28435611154970D-07
     6699s(52, 9)=    0.11805683008097D-07
     6700s(53, 9)=    0.89143404074597D-08
     6701s(54, 9)=   -0.26555392074377D-07
     6702s(55, 9)=    0.33828855511918D-07
     6703s(56, 9)=    0.42546390083977D-07
     6704s(57, 9)=   -0.36734873423041D-07
     6705s(58, 9)=   -0.22395650708275D-07
     6706s(59, 9)=    0.24315885012474D-07
     6707s(60, 9)=    0.79944980951610D-08
     6708s(61, 9)=   -0.38296575561497D-07
     6709s(62, 9)=    0.70571132839722D-08
     6710s(63, 9)=    0.25038246911884D-07
     6711s(64, 9)=    0.34757865716423D-07
     6712s(65, 9)=    0.71465665945082D-08
     6713s(66, 9)=    0.96220861771692D-08
     6714s(67, 9)=    0.14907466291611D-07
     6715s(68, 9)=   -0.12459707429573D-07
     6716s(69, 9)=    0.25196834012392D-09
     6717s(70, 9)=   -0.24635603469987D-07
     6718s(71, 9)=   -0.34947072691407D-08
     6719s(72, 9)=   -0.40986826279927D-07
     6720s(73, 9)=   -0.53285000800155D-08
     6721s(74, 9)=   -0.21864929212364D-07
     6722s(75, 9)=    0.31655289123553D-08
     6723s(76, 9)=   -0.71972613348107D-08
     6724s(77, 9)=   -0.11715970978303D-07
     6725s(78, 9)=   -0.91581498788497D-08
     6726s(79, 9)=   -0.33289555113209D-08
     6727s(80, 9)=   -0.69618551966212D-08
     6728s(10,10)=    0.75110049124197D-06
     6729s(11,10)=    0.19602479146368D-05
     6730s(12,10)=    0.13735593875557D-05
     6731s(13,10)=   -0.64528317351519D-06
     6732s(14,10)=   -0.15806738741427D-05
     6733s(15,10)=   -0.15651979227771D-06
     6734s(16,10)=    0.34092895016214D-06
     6735s(17,10)=    0.26625026138228D-06
     6736s(18,10)=   -0.66632869044241D-07
     6737s(19,10)=   -0.78558502011907D-07
     6738s(20,10)=   -0.27558540599626D-07
     6739s(21,10)=    0.10612069522761D-06
     6740s(22,10)=    0.27759528560520D-06
     6741s(23,10)=   -0.14762936279683D-06
     6742s(24,10)=   -0.30649417359411D-06
     6743s(25,10)=   -0.24934120573227D-06
     6744s(26,10)=    0.45214442081102D-07
     6745s(27,10)=    0.24920251008875D-07
     6746s(28,10)=    0.11146872495122D-07
     6747s(29,10)=   -0.26060426643668D-07
     6748s(30,10)=   -0.23781098460740D-06
     6749s(31,10)=   -0.22249872682332D-06
     6750s(32,10)=    0.10939022689204D-06
     6751s(33,10)=   -0.99274702786069D-08
     6752s(34,10)=   -0.11057200235541D-06
     6753s(35,10)=   -0.71666688130456D-07
     6754s(36,10)=    0.34024516192873D-07
     6755s(37,10)=    0.55363294504361D-07
     6756s(38,10)=    0.35642895088882D-08
     6757s(39,10)=    0.10576871280035D-07
     6758s(40,10)=   -0.11697411911326D-06
     6759s(41,10)=   -0.73996793185219D-07
     6760s(42,10)=    0.38678791991800D-07
     6761s(43,10)=    0.24828811765688D-07
     6762s(44,10)=   -0.42505224541213D-07
     6763s(45,10)=   -0.87400153715382D-07
     6764s(46,10)=   -0.52257551226251D-08
     6765s(47,10)=   -0.15139873000105D-07
     6766s(48,10)=   -0.30765583056167D-07
     6767s(49,10)=    0.37035367656631D-07
     6768s(50,10)=   -0.25016564928436D-07
     6769s(51,10)=   -0.35771827517194D-07
     6770s(52,10)=   -0.33478355753907D-09
     6771s(53,10)=    0.20219187490712D-07
     6772s(54,10)=    0.38102648478186D-08
     6773s(55,10)=   -0.34616352014803D-07
     6774s(56,10)=   -0.51970170086516D-08
     6775s(57,10)=    0.46109370443295D-07
     6776s(58,10)=   -0.62288697447250D-08
     6777s(59,10)=    0.16408443629483D-07
     6778s(60,10)=    0.17080610897797D-07
     6779s(61,10)=   -0.20496638449623D-07
     6780s(62,10)=    0.88434962009344D-08
     6781s(63,10)=   -0.45568632645146D-07
     6782s(64,10)=   -0.32009339658894D-07
     6783s(65,10)=    0.22650298617807D-08
     6784s(66,10)=    0.11883874117333D-07
     6785s(67,10)=   -0.29624723139076D-07
     6786s(68,10)=    0.91697466414316D-08
     6787s(69,10)=   -0.40427796463915D-08
     6788s(70,10)=   -0.78382603351011D-08
     6789s(71,10)=    0.62882121043255D-08
     6790s(72,10)=    0.10388060801758D-07
     6791s(73,10)=   -0.10887005067750D-07
     6792s(74,10)=    0.93326955954817D-08
     6793s(75,10)=   -0.35375814440110D-08
     6794s(76,10)=    0.11440477826086D-07
     6795s(77,10)=    0.11280465372383D-07
     6796s(78,10)=    0.80737354952143D-09
     6797s(79,10)=    0.13169751291096D-07
     6798s(80,10)=   -0.89384411088562D-08
     6799s(11,11)=   -0.32243874465540D-06
     6800s(12,11)=   -0.16488455183527D-05
     6801s(13,11)=   -0.82051095635799D-06
     6802s(14,11)=    0.15963288344652D-06
     6803s(15,11)=    0.57043780534665D-06
     6804s(16,11)=   -0.31162197414919D-06
     6805s(17,11)=    0.51284823319059D-07
     6806s(18,11)=   -0.30113265411810D-06
     6807s(19,11)=   -0.39066464008848D-06
     6808s(20,11)=    0.19716210205580D-07
     6809s(21,11)=   -0.17102747377246D-06
     6810s(22,11)=   -0.16030018161286D-06
     6811s(23,11)=   -0.31284845289221D-06
     6812s(24,11)=    0.30924886178203D-06
     6813s(25,11)=    0.40328090713224D-06
     6814s(26,11)=   -0.22008090349919D-06
     6815s(27,11)=   -0.22263962027705D-06
     6816s(28,11)=    0.28201322279299D-06
     6817s(29,11)=    0.58131493898922D-07
     6818s(30,11)=   -0.11375026639270D-06
     6819s(31,11)=    0.18978094742895D-06
     6820s(32,11)=    0.81541810295914D-07
     6821s(33,11)=   -0.15861779452979D-06
     6822s(34,11)=   -0.21333796420055D-06
     6823s(35,11)=    0.33398335918711D-07
     6824s(36,11)=    0.37795393184265D-07
     6825s(37,11)=   -0.47045914061136D-07
     6826s(38,11)=   -0.96238569513032D-07
     6827s(39,11)=   -0.26332968760336D-07
     6828s(40,11)=   -0.57618669052149D-07
     6829s(41,11)=   -0.12609690722743D-07
     6830s(42,11)=    0.92647921190134D-07
     6831s(43,11)=    0.15554619277272D-07
     6832s(44,11)=   -0.14729797978674D-06
     6833s(45,11)=   -0.35970928874431D-07
     6834s(46,11)=    0.63535970160862D-07
     6835s(47,11)=    0.36411397717139D-07
     6836s(48,11)=   -0.96957422611593D-07
     6837s(49,11)=   -0.30295526388977D-08
     6838s(50,11)=    0.71644391986672D-07
     6839s(51,11)=    0.24307941537757D-08
     6840s(52,11)=   -0.40647107856712D-07
     6841s(53,11)=   -0.21995970977921D-07
     6842s(54,11)=    0.10271836091161D-07
     6843s(55,11)=    0.19536869823667D-07
     6844s(56,11)=    0.28264297233668D-07
     6845s(57,11)=    0.59982895719428D-08
     6846s(58,11)=    0.52151716282265D-08
     6847s(59,11)=   -0.21249449590778D-07
     6848s(60,11)=    0.16590631640645D-07
     6849s(61,11)=    0.30957968332036D-07
     6850s(62,11)=    0.12664703332618D-07
     6851s(63,11)=    0.58286283310618D-08
     6852s(64,11)=   -0.15894064666470D-07
     6853s(65,11)=   -0.10004824485461D-07
     6854s(66,11)=    0.18897384981152D-08
     6855s(67,11)=    0.92202405384102D-08
     6856s(68,11)=   -0.41312478365989D-07
     6857s(69,11)=   -0.47410459394041D-08
     6858s(70,11)=   -0.13962678469304D-07
     6859s(71,11)=   -0.29120421461712D-07
     6860s(72,11)=   -0.33846955715306D-08
     6861s(73,11)=   -0.21463688511713D-07
     6862s(74,11)=   -0.15861238274070D-07
     6863s(75,11)=    0.40683442664938D-08
     6864s(76,11)=   -0.18831197923717D-07
     6865s(77,11)=    0.12897496781262D-07
     6866s(78,11)=   -0.89125352021773D-08
     6867s(79,11)=   -0.13556648439713D-08
     6868s(80,11)=   -0.44640224309969D-08
     6869s(12,12)=   -0.88920779082167D-07
     6870s(13,12)=   -0.42925246963553D-06
     6871s(14,12)=   -0.30381120209259D-06
     6872s(15,12)=    0.75705454254370D-06
     6873s(16,12)=    0.66822060944807D-06
     6874s(17,12)=   -0.31080678295820D-08
     6875s(18,12)=   -0.10087201702018D-06
     6876s(19,12)=   -0.21529973577778D-07
     6877s(20,12)=   -0.17140589471271D-06
     6878s(21,12)=    0.77850994715886D-07
     6879s(22,12)=   -0.69979530788204D-07
     6880s(23,12)=   -0.93144143314537D-08
     6881s(24,12)=   -0.31991542759975D-06
     6882s(25,12)=   -0.23780819412334D-06
     6883s(26,12)=   -0.57158660489078D-07
     6884s(27,12)=   -0.62059213801999D-08
     6885s(28,12)=   -0.15907547414198D-07
     6886s(29,12)=    0.10171806953978D-06
     6887s(30,12)=    0.10491439130093D-06
     6888s(31,12)=   -0.45676262519329D-07
     6889s(32,12)=    0.25768458653127D-07
     6890s(33,12)=   -0.35446527289965D-07
     6891s(34,12)=   -0.47116393079744D-07
     6892s(35,12)=    0.45383703782855D-07
     6893s(36,12)=    0.58386526496614D-08
     6894s(37,12)=   -0.85162673042796D-07
     6895s(38,12)=   -0.91882765548383D-07
     6896s(39,12)=   -0.36025149381032D-07
     6897s(40,12)=    0.14595185410301D-07
     6898s(41,12)=    0.17593887978747D-07
     6899s(42,12)=    0.92166455685116D-08
     6900s(43,12)=    0.14563806235588D-07
     6901s(44,12)=    0.63545789496187D-08
     6902s(45,12)=   -0.17181064007162D-07
     6903s(46,12)=    0.67254550365132D-07
     6904s(47,12)=   -0.88853639772640D-08
     6905s(48,12)=   -0.39625401175776D-07
     6906s(49,12)=    0.33547808860120D-07
     6907s(50,12)=   -0.27539465725800D-07
     6908s(51,12)=   -0.72009659384084D-07
     6909s(52,12)=   -0.65160563283952D-08
     6910s(53,12)=    0.58297585674734D-07
     6911s(54,12)=    0.16743434242418D-08
     6912s(55,12)=   -0.31503739387471D-07
     6913s(56,12)=    0.22844849793649D-07
     6914s(57,12)=    0.12620994119193D-07
     6915s(58,12)=   -0.28295430174200D-07
     6916s(59,12)=   -0.23511171040329D-07
     6917s(60,12)=    0.22816487987095D-07
     6918s(61,12)=    0.17900096358017D-07
     6919s(62,12)=   -0.19359220793239D-07
     6920s(63,12)=   -0.20436015960463D-07
     6921s(64,12)=    0.29421441916531D-07
     6922s(65,12)=    0.25063647453935D-09
     6923s(66,12)=   -0.23434053627949D-07
     6924s(67,12)=    0.47996977707156D-08
     6925s(68,12)=   -0.26536851961145D-07
     6926s(69,12)=   -0.24253678258790D-07
     6927s(70,12)=   -0.29390882380831D-08
     6928s(71,12)=   -0.16333925954900D-08
     6929s(72,12)=   -0.28490175642328D-07
     6930s(73,12)=    0.60768142527698D-08
     6931s(74,12)=   -0.72357878393461D-08
     6932s(75,12)=    0.47286146894435D-08
     6933s(76,12)=   -0.29640799063399D-07
     6934s(77,12)=    0.77994725347343D-08
     6935s(78,12)=   -0.25082417039953D-07
     6936s(79,12)=    0.44238135506005D-08
     6937s(80,12)=   -0.29369750400863D-07
     6938s(13,13)=    0.87090151746402D-06
     6939s(14,13)=    0.20603291432190D-05
     6940s(15,13)=    0.70781194137062D-06
     6941s(16,13)=   -0.59505211895115D-06
     6942s(17,13)=   -0.79988519244723D-06
     6943s(18,13)=   -0.26781919637356D-06
     6944s(19,13)=   -0.39638127126335D-07
     6945s(20,13)=    0.34308208665972D-06
     6946s(21,13)=    0.10176613624133D-06
     6947s(22,13)=   -0.17303916297882D-06
     6948s(23,13)=   -0.97853601308965D-07
     6949s(24,13)=   -0.23487959545685D-07
     6950s(25,13)=    0.27930133682935D-06
     6951s(26,13)=   -0.81776277087869D-08
     6952s(27,13)=   -0.11040107048514D-06
     6953s(28,13)=    0.35518665380933D-07
     6954s(29,13)=    0.28024876055130D-07
     6955s(30,13)=    0.62729815192089D-07
     6956s(31,13)=    0.14212575392451D-06
     6957s(32,13)=    0.18847039668974D-07
     6958s(33,13)=   -0.18720676208875D-07
     6959s(34,13)=   -0.12328174691030D-06
     6960s(35,13)=    0.13471841102089D-07
     6961s(36,13)=    0.18504594338397D-06
     6962s(37,13)=    0.41332784858941D-07
     6963s(38,13)=   -0.90322029947740D-07
     6964s(39,13)=   -0.89696583112129D-07
     6965s(40,13)=    0.31621240917421D-07
     6966s(41,13)=   -0.10732345514734D-08
     6967s(42,13)=    0.51671318931160D-08
     6968s(43,13)=    0.18086307630789D-08
     6969s(44,13)=   -0.49976630665191D-07
     6970s(45,13)=   -0.28555583722465D-07
     6971s(46,13)=    0.72434265587148D-07
     6972s(47,13)=    0.11841653994144D-06
     6973s(48,13)=   -0.63007329286238D-07
     6974s(49,13)=   -0.81663659434407D-07
     6975s(50,13)=    0.92299309105374D-07
     6976s(51,13)=    0.61277108914371D-07
     6977s(52,13)=   -0.31928594863025D-07
     6978s(53,13)=   -0.42066672979787D-07
     6979s(54,13)=    0.20881374939344D-07
     6980s(55,13)=    0.23357346197626D-07
     6981s(56,13)=    0.55376552249704D-08
     6982s(57,13)=    0.26637506077608D-07
     6983s(58,13)=    0.45853451895835D-08
     6984s(59,13)=   -0.37810514693800D-07
     6985s(60,13)=    0.17827259495442D-07
     6986s(61,13)=    0.33606099974048D-07
     6987s(62,13)=    0.11087419305904D-07
     6988s(63,13)=   -0.18858176682939D-07
     6989s(64,13)=   -0.12846138794470D-07
     6990s(65,13)=    0.62418715082964D-08
     6991s(66,13)=    0.17820386364416D-07
     6992s(67,13)=   -0.86672830025847D-08
     6993s(68,13)=    0.42984837759796D-07
     6994s(69,13)=    0.22895749266152D-07
     6995s(70,13)=    0.24048612493333D-07
     6996s(71,13)=    0.35644430659660D-07
     6997s(72,13)=    0.32707523090933D-07
     6998s(73,13)=    0.22954078635023D-07
     6999s(74,13)=    0.23616745111190D-07
     7000s(75,13)=    0.42243201693742D-07
     7001s(76,13)=   -0.41136165002182D-08
     7002s(77,13)=    0.48575954733840D-07
     7003s(78,13)=   -0.10767185336948D-07
     7004s(79,13)=    0.66336704576549D-07
     7005s(80,13)=   -0.44014299099342D-07
     7006s(14,14)=   -0.74240282317235D-06
     7007s(15,14)=   -0.13571091998453D-05
     7008s(16,14)=   -0.93817219005892D-06
     7009s(17,14)=   -0.46937395151752D-06
     7010s(18,14)=    0.19153934057115D-06
     7011s(19,14)=    0.51536173249611D-06
     7012s(20,14)=    0.23375072844855D-06
     7013s(21,14)=   -0.39050845702147D-06
     7014s(22,14)=   -0.51863544921841D-06
     7015s(23,14)=   -0.32332506607369D-06
     7016s(24,14)=    0.39865595042181D-06
     7017s(25,14)=    0.26591743031456D-06
     7018s(26,14)=   -0.81802188971568D-07
     7019s(27,14)=   -0.32291096639111D-07
     7020s(28,14)=    0.12860175423286D-06
     7021s(29,14)=    0.13830153071439D-06
     7022s(30,14)=    0.35042509660984D-07
     7023s(31,14)=   -0.11918938957786D-06
     7024s(32,14)=   -0.18345702668221D-06
     7025s(33,14)=   -0.13524513613963D-07
     7026s(34,14)=    0.77822106322462D-07
     7027s(35,14)=    0.98718013634759D-07
     7028s(36,14)=   -0.52654027292184D-07
     7029s(37,14)=   -0.21310515155309D-06
     7030s(38,14)=   -0.28779444492386D-07
     7031s(39,14)=    0.51388765792751D-07
     7032s(40,14)=    0.51863412740192D-07
     7033s(41,14)=    0.53744070843108D-07
     7034s(42,14)=   -0.91839891177993D-07
     7035s(43,14)=   -0.25400916794614D-07
     7036s(44,14)=    0.54614253806952D-07
     7037s(45,14)=    0.66912389017243D-07
     7038s(46,14)=    0.44942897130642D-07
     7039s(47,14)=   -0.46320048520030D-07
     7040s(48,14)=    0.35565097794370D-07
     7041s(49,14)=    0.12012861482544D-06
     7042s(50,14)=    0.77541596409904D-07
     7043s(51,14)=   -0.35353777578629D-07
     7044s(52,14)=   -0.33571218394550D-07
     7045s(53,14)=    0.30101593756227D-07
     7046s(54,14)=    0.26974668151704D-07
     7047s(55,14)=   -0.15995052196413D-07
     7048s(56,14)=   -0.52692369031442D-08
     7049s(57,14)=   -0.18302276242218D-07
     7050s(58,14)=   -0.21796489423620D-07
     7051s(59,14)=    0.21371899255291D-08
     7052s(60,14)=    0.48769586142551D-07
     7053s(61,14)=   -0.13661773678492D-08
     7054s(62,14)=   -0.79691872794417D-08
     7055s(63,14)=    0.12767619131777D-09
     7056s(64,14)=    0.23277013161202D-08
     7057s(65,14)=   -0.15345742502274D-07
     7058s(66,14)=   -0.10229721399366D-07
     7059s(67,14)=    0.40370458826901D-07
     7060s(68,14)=    0.75088309600281D-08
     7061s(69,14)=    0.69388818240717D-08
     7062s(70,14)=    0.18188183034137D-07
     7063s(71,14)=    0.15492869250359D-07
     7064s(72,14)=   -0.15765666455539D-07
     7065s(73,14)=    0.63309934038770D-08
     7066s(74,14)=   -0.36176635096533D-08
     7067s(75,14)=    0.85598158046522D-08
     7068s(76,14)=   -0.20951869182447D-07
     7069s(77,14)=    0.31145212456406D-07
     7070s(78,14)=   -0.24169629065450D-07
     7071s(79,14)=    0.20848670628370D-07
     7072s(80,14)=   -0.94467363979311D-08
     7073s(15,15)=    0.12600108653866D-06
     7074s(16,15)=    0.32271595745797D-06
     7075s(17,15)=    0.40586600900225D-06
     7076s(18,15)=    0.75111672234084D-06
     7077s(19,15)=    0.50346290834619D-06
     7078s(20,15)=   -0.28657327016529D-06
     7079s(21,15)=   -0.57915871656014D-06
     7080s(22,15)=    0.25969276409394D-06
     7081s(23,15)=    0.70089053193120D-06
     7082s(24,15)=   -0.29883118930912D-07
     7083s(25,15)=   -0.14451769473653D-06
     7084s(26,15)=   -0.48198140002715D-07
     7085s(27,15)=    0.86264490499589D-07
     7086s(28,15)=    0.12886841925463D-06
     7087s(29,15)=    0.13684825500462D-06
     7088s(30,15)=   -0.18797149406364D-07
     7089s(31,15)=    0.15358171628512D-07
     7090s(32,15)=    0.78329095841779D-07
     7091s(33,15)=    0.99712503238671D-07
     7092s(34,15)=    0.67720736038059D-07
     7093s(35,15)=   -0.17093110750896D-06
     7094s(36,15)=   -0.78041032755813D-07
     7095s(37,15)=    0.43826692760960D-07
     7096s(38,15)=   -0.79099615504350D-07
     7097s(39,15)=    0.22676114875732D-07
     7098s(40,15)=   -0.34353729658173D-07
     7099s(41,15)=   -0.54211660036877D-07
     7100s(42,15)=    0.16078659653430D-07
     7101s(43,15)=    0.81221155568093D-07
     7102s(44,15)=    0.26945602783787D-07
     7103s(45,15)=   -0.11550748808496D-06
     7104s(46,15)=    0.64854612383680D-08
     7105s(47,15)=    0.59305343934151D-07
     7106s(48,15)=    0.17334533420205D-07
     7107s(49,15)=   -0.26013901667132D-07
     7108s(50,15)=    0.19676556187785D-07
     7109s(51,15)=    0.43600441789107D-07
     7110s(52,15)=   -0.17613984985822D-07
     7111s(53,15)=    0.13042832953335D-08
     7112s(54,15)=    0.21604516348254D-07
     7113s(55,15)=    0.83649756938879D-08
     7114s(56,15)=   -0.25031837850356D-07
     7115s(57,15)=   -0.10202997939252D-07
     7116s(58,15)=    0.20575074324128D-07
     7117s(59,15)=   -0.12508788110162D-07
     7118s(60,15)=   -0.78480710934675D-08
     7119s(61,15)=    0.26665962449193D-07
     7120s(62,15)=   -0.44229316448830D-07
     7121s(63,15)=   -0.49351437360333D-07
     7122s(64,15)=    0.37661603535803D-07
     7123s(65,15)=    0.36167346808350D-07
     7124s(66,15)=    0.51363730875905D-08
     7125s(67,15)=    0.36600538010786D-08
     7126s(68,15)=    0.20002172436516D-07
     7127s(69,15)=    0.28148380444181D-07
     7128s(70,15)=    0.21821541647166D-07
     7129s(71,15)=    0.17456029122273D-08
     7130s(72,15)=    0.37208080162656D-07
     7131s(73,15)=   -0.15048696636328D-07
     7132s(74,15)=    0.19767509098502D-07
     7133s(75,15)=   -0.47994233940629D-08
     7134s(76,15)=    0.14017048848831D-07
     7135s(77,15)=   -0.11215950504154D-07
     7136s(78,15)=    0.14580230802822D-07
     7137s(79,15)=   -0.20740278485624D-07
     7138s(80,15)=    0.18176997659370D-07
     7139s(16,16)=    0.11999639763360D-06
     7140s(17,16)=    0.56520236837337D-06
     7141s(18,16)=    0.22241299522815D-06
     7142s(19,16)=   -0.13582747558851D-06
     7143s(20,16)=   -0.27521114384639D-06
     7144s(21,16)=   -0.13714024214610D-07
     7145s(22,16)=   -0.42714935026343D-07
     7146s(23,16)=    0.13846890751522D-06
     7147s(24,16)=    0.32611904178744D-06
     7148s(25,16)=    0.24278245987262D-06
     7149s(26,16)=   -0.11672236873981D-06
     7150s(27,16)=   -0.23027802135381D-06
     7151s(28,16)=    0.64961121297676D-07
     7152s(29,16)=    0.23471924216379D-07
     7153s(30,16)=    0.63772434226171D-07
     7154s(31,16)=   -0.73835040421860D-08
     7155s(32,16)=   -0.61206732178322D-07
     7156s(33,16)=   -0.55020494835377D-07
     7157s(34,16)=   -0.42828380877650D-08
     7158s(35,16)=    0.75980026207406D-07
     7159s(36,16)=   -0.16217047689604D-07
     7160s(37,16)=   -0.26913462260087D-08
     7161s(38,16)=    0.18528209966077D-07
     7162s(39,16)=   -0.19324089706529D-07
     7163s(40,16)=   -0.82312570349735D-08
     7164s(41,16)=   -0.54669670503534D-08
     7165s(42,16)=    0.64355045434192D-08
     7166s(43,16)=   -0.91015210205317D-07
     7167s(44,16)=   -0.43879876041803D-08
     7168s(45,16)=    0.46355226427945D-07
     7169s(46,16)=    0.23826788645936D-07
     7170s(47,16)=   -0.26727931830145D-07
     7171s(48,16)=   -0.39825287398680D-07
     7172s(49,16)=    0.27701521836883D-07
     7173s(50,16)=    0.37425392830532D-07
     7174s(51,16)=    0.32479270044008D-08
     7175s(52,16)=   -0.31910867126780D-07
     7176s(53,16)=   -0.87454377854954D-08
     7177s(54,16)=    0.22758936660709D-07
     7178s(55,16)=    0.83734593120842D-08
     7179s(56,16)=    0.84285271391003D-08
     7180s(57,16)=    0.35171485277021D-08
     7181s(58,16)=    0.75832095687950D-09
     7182s(59,16)=    0.43268168776164D-08
     7183s(60,16)=   -0.95942808601991D-08
     7184s(61,16)=    0.95403421274832D-08
     7185s(62,16)=    0.76600691821439D-08
     7186s(63,16)=   -0.14954024697104D-07
     7187s(64,16)=    0.67348966750108D-08
     7188s(65,16)=   -0.98517593621749D-08
     7189s(66,16)=   -0.17651774758307D-07
     7190s(67,16)=   -0.13048185705955D-07
     7191s(68,16)=   -0.10775049205703D-07
     7192s(69,16)=   -0.83608843251429D-08
     7193s(70,16)=   -0.22850830348438D-07
     7194s(71,16)=    0.22617862998312D-07
     7195s(72,16)=   -0.11615177933685D-07
     7196s(73,16)=    0.41249820870472D-08
     7197s(74,16)=   -0.10011928436219D-07
     7198s(75,16)=   -0.94657443577397D-08
     7199s(76,16)=    0.20011823844755D-07
     7200s(77,16)=   -0.33807858449145D-07
     7201s(78,16)=    0.32016564260843D-07
     7202s(79,16)=   -0.29026097371181D-07
     7203s(80,16)=    0.22842416845736D-07
     7204s(17,17)=    0.29248504614490D-06
     7205s(18,17)=   -0.11033089461961D-05
     7206s(19,17)=   -0.43514339734912D-06
     7207s(20,17)=   -0.37811064797666D-06
     7208s(21,17)=   -0.32773850863498D-06
     7209s(22,17)=    0.23530841179301D-06
     7210s(23,17)=    0.78411745594169D-06
     7211s(24,17)=   -0.22796960437638D-07
     7212s(25,17)=   -0.81775824768547D-06
     7213s(26,17)=   -0.54832823201304D-07
     7214s(27,17)=    0.36518698462665D-06
     7215s(28,17)=    0.38124418820090D-06
     7216s(29,17)=   -0.72547858089236D-07
     7217s(30,17)=   -0.18838459479281D-06
     7218s(31,17)=    0.47926572910547D-07
     7219s(32,17)=   -0.20450598643054D-07
     7220s(33,17)=    0.29165593938367D-07
     7221s(34,17)=    0.69125694047977D-07
     7222s(35,17)=   -0.87708918207654D-07
     7223s(36,17)=   -0.11676243249569D-06
     7224s(37,17)=    0.11419120111819D-06
     7225s(38,17)=    0.82080852459118D-07
     7226s(39,17)=    0.23240081183279D-07
     7227s(40,17)=   -0.37879701407989D-07
     7228s(41,17)=   -0.96433041548023D-07
     7229s(42,17)=    0.38916730000796D-07
     7230s(43,17)=    0.10053447126529D-06
     7231s(44,17)=   -0.12019890556586D-07
     7232s(45,17)=   -0.52972547052434D-07
     7233s(46,17)=   -0.68212142440632D-07
     7234s(47,17)=    0.26895107755749D-07
     7235s(48,17)=    0.53081409381668D-07
     7236s(49,17)=   -0.22951427108757D-07
     7237s(50,17)=   -0.76202558407981D-07
     7238s(51,17)=   -0.32349951224846D-08
     7239s(52,17)=    0.11481715329839D-07
     7240s(53,17)=   -0.59524666022700D-08
     7241s(54,17)=    0.18813501639828D-07
     7242s(55,17)=   -0.22940730979658D-07
     7243s(56,17)=   -0.53348901787942D-08
     7244s(57,17)=    0.17072079069305D-07
     7245s(58,17)=    0.12881746245804D-07
     7246s(59,17)=   -0.16563061398827D-07
     7247s(60,17)=    0.19277069773992D-07
     7248s(61,17)=   -0.39978892742045D-08
     7249s(62,17)=   -0.16038939466946D-08
     7250s(63,17)=    0.19128554124721D-07
     7251s(64,17)=    0.11520684868882D-07
     7252s(65,17)=    0.44875099081015D-09
     7253s(66,17)=   -0.19609303908066D-07
     7254s(67,17)=    0.18354623733187D-07
     7255s(68,17)=    0.29301502723368D-07
     7256s(69,17)=    0.28161118621374D-07
     7257s(70,17)=    0.69095268314862D-08
     7258s(71,17)=    0.41547099989174D-08
     7259s(72,17)=    0.30357091060737D-07
     7260s(73,17)=   -0.18609159497309D-07
     7261s(74,17)=    0.43833534507557D-07
     7262s(75,17)=   -0.22021390424856D-07
     7263s(76,17)=    0.21569704607224D-07
     7264s(77,17)=   -0.45260068167049D-08
     7265s(78,17)=    0.30967907611003D-08
     7266s(79,17)=   -0.15022630097898D-07
     7267s(80,17)=    0.19496751617350D-07
     7268s(18,18)=    0.34414061621346D-06
     7269s(19,18)=    0.59127244706872D-06
     7270s(20,18)=    0.72378561403062D-06
     7271s(21,18)=    0.54121452249458D-06
     7272s(22,18)=    0.52011524184896D-07
     7273s(23,18)=   -0.60360508908718D-06
     7274s(24,18)=   -0.54724968646783D-06
     7275s(25,18)=    0.46999608659197D-07
     7276s(26,18)=    0.51981672576762D-06
     7277s(27,18)=    0.14846896174889D-06
     7278s(28,18)=   -0.33779965470001D-06
     7279s(29,18)=   -0.92157585525228D-07
     7280s(30,18)=    0.53492902837147D-08
     7281s(31,18)=    0.15359735482649D-06
     7282s(32,18)=    0.98521227357963D-08
     7283s(33,18)=    0.40659583739091D-07
     7284s(34,18)=   -0.97787967430515D-07
     7285s(35,18)=   -0.57606309931337D-07
     7286s(36,18)=    0.14976973703166D-06
     7287s(37,18)=    0.14384575033233D-06
     7288s(38,18)=   -0.94105038960809D-07
     7289s(39,18)=   -0.17770816278234D-06
     7290s(40,18)=    0.62857306993194D-07
     7291s(41,18)=    0.10564055594076D-06
     7292s(42,18)=    0.26395600000873D-07
     7293s(43,18)=   -0.22586048098759D-07
     7294s(44,18)=   -0.19626803050804D-07
     7295s(45,18)=   -0.26790029669805D-07
     7296s(46,18)=    0.48875275415834D-07
     7297s(47,18)=    0.77336313016548D-07
     7298s(48,18)=   -0.28007132170749D-07
     7299s(49,18)=   -0.56903480123028D-07
     7300s(50,18)=    0.21859930554090D-07
     7301s(51,18)=    0.26056945293627D-07
     7302s(52,18)=   -0.17413777591014D-07
     7303s(53,18)=   -0.65354897869392D-07
     7304s(54,18)=   -0.94184192009345D-08
     7305s(55,18)=    0.51900751533010D-07
     7306s(56,18)=   -0.57408788836675D-08
     7307s(57,18)=   -0.50384189794216D-08
     7308s(58,18)=    0.32982260089339D-07
     7309s(59,18)=    0.24308102652917D-07
     7310s(60,18)=   -0.30314024384954D-07
     7311s(61,18)=    0.46233654698603D-08
     7312s(62,18)=   -0.10034917592270D-07
     7313s(63,18)=   -0.25151953911156D-07
     7314s(64,18)=   -0.27547219768778D-07
     7315s(65,18)=   -0.12825473156738D-07
     7316s(66,18)=   -0.23356444061669D-08
     7317s(67,18)=    0.16196132089985D-07
     7318s(68,18)=    0.11747662784129D-07
     7319s(69,18)=    0.40196515918347D-07
     7320s(70,18)=    0.84991016936327D-08
     7321s(71,18)=   -0.16844142890715D-07
     7322s(72,18)=    0.11605574724861D-07
     7323s(73,18)=   -0.14117429773240D-07
     7324s(74,18)=    0.10821358889875D-07
     7325s(75,18)=   -0.91755950038818D-08
     7326s(76,18)=    0.49454972151494D-08
     7327s(77,18)=    0.88031137082583D-08
     7328s(78,18)=    0.25538539368416D-08
     7329s(79,18)=    0.33067900513529D-08
     7330s(80,18)=   -0.26856994598150D-08
     7331s(19,19)=   -0.83207181083117D-06
     7332s(20,19)=   -0.19243210368148D-07
     7333s(21,19)=   -0.77247799989911D-06
     7334s(22,19)=   -0.41876045076903D-06
     7335s(23,19)=    0.89358853172121D-07
     7336s(24,19)=    0.40011464623022D-06
     7337s(25,19)=   -0.56271728665351D-07
     7338s(26,19)=   -0.16817956463516D-06
     7339s(27,19)=    0.18805463102992D-06
     7340s(28,19)=    0.48807625473716D-07
     7341s(29,19)=   -0.27960321578934D-07
     7342s(30,19)=    0.41704961518042D-07
     7343s(31,19)=    0.10017377545951D-06
     7344s(32,19)=   -0.99040199940945D-07
     7345s(33,19)=   -0.19747524928826D-06
     7346s(34,19)=    0.19999031060789D-06
     7347s(35,19)=    0.73847531274333D-07
     7348s(36,19)=   -0.77229614984630D-07
     7349s(37,19)=   -0.66164882097243D-07
     7350s(38,19)=   -0.57655690293397D-07
     7351s(39,19)=    0.62929739483183D-07
     7352s(40,19)=   -0.64102977423462D-09
     7353s(41,19)=    0.17572199930565D-07
     7354s(42,19)=   -0.42606475303314D-07
     7355s(43,19)=   -0.79925299535828D-07
     7356s(44,19)=   -0.24430081199529D-08
     7357s(45,19)=   -0.40069459859954D-08
     7358s(46,19)=   -0.90487367026726D-08
     7359s(47,19)=   -0.46045184562653D-07
     7360s(48,19)=    0.60516966760385D-08
     7361s(49,19)=   -0.12727570691752D-07
     7362s(50,19)=   -0.61817612034050D-08
     7363s(51,19)=    0.17609953063319D-07
     7364s(52,19)=   -0.43194132518131D-07
     7365s(53,19)=   -0.52548737695946D-08
     7366s(54,19)=   -0.12007188827659D-07
     7367s(55,19)=    0.31582175037706D-08
     7368s(56,19)=   -0.11497396834233D-07
     7369s(57,19)=   -0.32165430513135D-09
     7370s(58,19)=    0.32312688232480D-07
     7371s(59,19)=    0.16256252932751D-08
     7372s(60,19)=   -0.11796624470980D-07
     7373s(61,19)=    0.24179493099147D-07
     7374s(62,19)=   -0.12316628846491D-08
     7375s(63,19)=    0.16770336871055D-07
     7376s(64,19)=   -0.11401084406765D-07
     7377s(65,19)=    0.16191494603284D-08
     7378s(66,19)=    0.19016507804866D-08
     7379s(67,19)=   -0.19853183621290D-08
     7380s(68,19)=   -0.13392201323370D-07
     7381s(69,19)=    0.27863708515734D-07
     7382s(70,19)=    0.37308575408022D-07
     7383s(71,19)=    0.14003822138422D-08
     7384s(72,19)=    0.42743649987506D-07
     7385s(73,19)=    0.24059852936671D-07
     7386s(74,19)=    0.72128040264929D-09
     7387s(75,19)=    0.36498605152585D-07
     7388s(76,19)=   -0.14229114783173D-09
     7389s(77,19)=    0.22176186379688D-07
     7390s(78,19)=    0.16909636249029D-07
     7391s(79,19)=    0.13548014160202D-07
     7392s(80,19)=    0.16098574863556D-07
     7393s(20,20)=    0.68495628517140D-07
     7394s(21,20)=   -0.31271698464022D-06
     7395s(22,20)=    0.57051643647335D-07
     7396s(23,20)=    0.46838729499973D-08
     7397s(24,20)=   -0.14902251350050D-06
     7398s(25,20)=    0.11568289451042D-06
     7399s(26,20)=    0.36424260503754D-06
     7400s(27,20)=   -0.75694899244258D-07
     7401s(28,20)=   -0.42145265720545D-06
     7402s(29,20)=   -0.97179348884585D-07
     7403s(30,20)=    0.18431388850136D-06
     7404s(31,20)=    0.16621600245409D-06
     7405s(32,20)=    0.48973155179554D-07
     7406s(33,20)=   -0.52738506468826D-07
     7407s(34,20)=   -0.89743613430438D-07
     7408s(35,20)=   -0.90198666076864D-07
     7409s(36,20)=    0.91884351911659D-07
     7410s(37,20)=    0.93363810701203D-07
     7411s(38,20)=   -0.33630822298069D-07
     7412s(39,20)=   -0.10605986819334D-06
     7413s(40,20)=   -0.10691444909545D-08
     7414s(41,20)=    0.59276915592852D-07
     7415s(42,20)=    0.15815236396154D-07
     7416s(43,20)=   -0.61838158769288D-07
     7417s(44,20)=   -0.51267588638259D-07
     7418s(45,20)=   -0.28526483573614D-07
     7419s(46,20)=    0.46277117704401D-07
     7420s(47,20)=    0.51681277500150D-07
     7421s(48,20)=   -0.65171325042152D-07
     7422s(49,20)=   -0.21247258261835D-07
     7423s(50,20)=   -0.43771569363668D-08
     7424s(51,20)=    0.34169491656334D-08
     7425s(52,20)=   -0.97534013510140D-08
     7426s(53,20)=   -0.11347312251366D-07
     7427s(54,20)=    0.15467152210774D-07
     7428s(55,20)=    0.40292347301225D-07
     7429s(56,20)=   -0.13079962180250D-07
     7430s(57,20)=   -0.47052245767119D-07
     7431s(58,20)=   -0.82495766579039D-08
     7432s(59,20)=    0.97114458103715D-08
     7433s(60,20)=    0.19913011710781D-07
     7434s(61,20)=    0.36330274198173D-07
     7435s(62,20)=   -0.13478687494604D-07
     7436s(63,20)=   -0.26320561902926D-08
     7437s(64,20)=   -0.16223451913486D-07
     7438s(65,20)=   -0.10574281830612D-07
     7439s(66,20)=    0.13839348502220D-07
     7440s(67,20)=    0.11574284005268D-08
     7441s(68,20)=   -0.11394258845984D-07
     7442s(69,20)=   -0.68757042573032D-08
     7443s(70,20)=    0.26808323992675D-07
     7444s(71,20)=   -0.20990759642604D-07
     7445s(72,20)=    0.17962079718463D-07
     7446s(73,20)=    0.14028330809315D-07
     7447s(74,20)=   -0.24187878478030D-08
     7448s(75,20)=    0.17239582900246D-07
     7449s(76,20)=   -0.18791192207054D-07
     7450s(77,20)=    0.30074987185535D-07
     7451s(78,20)=   -0.30113578588281D-07
     7452s(79,20)=    0.39571391512958D-07
     7453s(80,20)=   -0.34183756475334D-07
     7454s(21,21)=    0.39509696270180D-06
     7455s(22,21)=    0.58412852268006D-06
     7456s(23,21)=    0.65443933539251D-06
     7457s(24,21)=    0.49488306227768D-06
     7458s(25,21)=    0.13005647364853D-06
     7459s(26,21)=   -0.57736507305760D-06
     7460s(27,21)=   -0.28716704730465D-06
     7461s(28,21)=    0.15344083253979D-06
     7462s(29,21)=    0.25221193020450D-06
     7463s(30,21)=    0.77537550128164D-07
     7464s(31,21)=    0.27125424267040D-07
     7465s(32,21)=   -0.22822771898708D-06
     7466s(33,21)=   -0.24125249759175D-06
     7467s(34,21)=    0.14008778097270D-06
     7468s(35,21)=    0.22976364858201D-06
     7469s(36,21)=   -0.33609303386721D-07
     7470s(37,21)=   -0.11099515652416D-06
     7471s(38,21)=   -0.78867820909184D-07
     7472s(39,21)=    0.67538516214823D-07
     7473s(40,21)=    0.80979401970730D-07
     7474s(41,21)=    0.18693961079579D-07
     7475s(42,21)=   -0.76253978031094D-07
     7476s(43,21)=   -0.10584263309521D-06
     7477s(44,21)=    0.59555481450139D-07
     7478s(45,21)=    0.62478998656977D-07
     7479s(46,21)=   -0.10407191719497D-07
     7480s(47,21)=   -0.57007502243515D-07
     7481s(48,21)=   -0.46275770111026D-08
     7482s(49,21)=    0.56834403221335D-08
     7483s(50,21)=    0.39607818527299D-07
     7484s(51,21)=    0.29133654190181D-07
     7485s(52,21)=   -0.21171185313688D-07
     7486s(53,21)=   -0.33129279461783D-07
     7487s(54,21)=    0.11092356803145D-07
     7488s(55,21)=   -0.36856992077205D-08
     7489s(56,21)=   -0.61171426857546D-07
     7490s(57,21)=   -0.44966367677811D-07
     7491s(58,21)=    0.28939146376838D-07
     7492s(59,21)=    0.27997575907820D-07
     7493s(60,21)=   -0.43559182682407D-07
     7494s(61,21)=   -0.18396042855272D-07
     7495s(62,21)=    0.38422180278898D-07
     7496s(63,21)=    0.19545978340560D-07
     7497s(64,21)=    0.11044904958006D-07
     7498s(65,21)=   -0.12556088956423D-07
     7499s(66,21)=   -0.12450193849506D-07
     7500s(67,21)=   -0.90707423538275D-08
     7501s(68,21)=   -0.15648720052535D-07
     7502s(69,21)=   -0.27818304947498D-07
     7503s(70,21)=    0.52571730877252D-08
     7504s(71,21)=   -0.78485105342175D-08
     7505s(72,21)=   -0.24361309893413D-07
     7506s(73,21)=    0.18537092819574D-07
     7507s(74,21)=   -0.31528850699925D-07
     7508s(75,21)=   -0.12295009610784D-07
     7509s(76,21)=   -0.26879033180146D-07
     7510s(77,21)=   -0.48641495118474D-08
     7511s(78,21)=   -0.27262229899390D-07
     7512s(79,21)=   -0.31296070040175D-08
     7513s(80,21)=   -0.18355253625983D-07
     7514s(22,22)=   -0.32472175304397D-06
     7515s(23,22)=   -0.18794503883115D-06
     7516s(24,22)=   -0.70495763436332D-06
     7517s(25,22)=   -0.40985566966945D-06
     7518s(26,22)=    0.82733514635286D-07
     7519s(27,22)=    0.37746620514078D-06
     7520s(28,22)=    0.69614132594899D-07
     7521s(29,22)=   -0.13794766607726D-07
     7522s(30,22)=   -0.22551051537638D-08
     7523s(31,22)=   -0.14602895561313D-06
     7524s(32,22)=   -0.75909083967744D-07
     7525s(33,22)=    0.11406221093765D-06
     7526s(34,22)=    0.12136146886712D-06
     7527s(35,22)=   -0.98589998891183D-07
     7528s(36,22)=   -0.10003304936051D-06
     7529s(37,22)=    0.50298676434516D-07
     7530s(38,22)=    0.60612538803716D-07
     7531s(39,22)=   -0.13103547630008D-07
     7532s(40,22)=   -0.30051950468690D-07
     7533s(41,22)=   -0.26011654021801D-07
     7534s(42,22)=   -0.81220118762205D-07
     7535s(43,22)=    0.31474978731978D-07
     7536s(44,22)=    0.28339826075713D-07
     7537s(45,22)=   -0.38700086509404D-08
     7538s(46,22)=   -0.46011104766624D-07
     7539s(47,22)=   -0.27640275048026D-07
     7540s(48,22)=   -0.10239800122767D-07
     7541s(49,22)=    0.24734785595614D-07
     7542s(50,22)=    0.14992914812251D-07
     7543s(51,22)=    0.25393101822446D-07
     7544s(52,22)=    0.38371746547476D-08
     7545s(53,22)=   -0.19153595362559D-07
     7546s(54,22)=    0.33803865148579D-07
     7547s(55,22)=    0.56285859789713D-07
     7548s(56,22)=   -0.38085937147590D-07
     7549s(57,22)=   -0.63827478261483D-07
     7550s(58,22)=    0.68254911727498D-08
     7551s(59,22)=    0.31916386181269D-07
     7552s(60,22)=   -0.28390268407220D-07
     7553s(61,22)=   -0.51497624546058D-07
     7554s(62,22)=   -0.10102801384017D-07
     7555s(63,22)=    0.21202600642596D-07
     7556s(64,22)=   -0.21960804438917D-07
     7557s(65,22)=   -0.38562372640046D-08
     7558s(66,22)=    0.50321543221399D-08
     7559s(67,22)=   -0.11120594384824D-07
     7560s(68,22)=   -0.34766929179416D-07
     7561s(69,22)=    0.14560299724971D-07
     7562s(70,22)=   -0.17208788676041D-07
     7563s(71,22)=   -0.22412321730335D-07
     7564s(72,22)=    0.34117018314396D-08
     7565s(73,22)=    0.28254216720055D-07
     7566s(74,22)=    0.17709979587694D-07
     7567s(75,22)=    0.13675524334921D-07
     7568s(76,22)=    0.33574552806071D-07
     7569s(77,22)=   -0.49966310691079D-08
     7570s(78,22)=    0.28734719794092D-07
     7571s(79,22)=   -0.15906431570965D-07
     7572s(80,22)=    0.35288814115458D-07
     7573s(23,23)=    0.22719941596897D-06
     7574s(24,23)=   -0.15396408753817D-07
     7575s(25,23)=    0.42480863281236D-06
     7576s(26,23)=    0.20336928244053D-06
     7577s(27,23)=   -0.25760860961128D-06
     7578s(28,23)=    0.13579469239490D-06
     7579s(29,23)=    0.32187304031659D-06
     7580s(30,23)=    0.80394556354472D-07
     7581s(31,23)=   -0.17912333490658D-06
     7582s(32,23)=    0.13220864045900D-06
     7583s(33,23)=    0.11829940030533D-06
     7584s(34,23)=   -0.47860233500407D-07
     7585s(35,23)=    0.54187652460546D-07
     7586s(36,23)=    0.89141708188153D-07
     7587s(37,23)=    0.20676076210812D-07
     7588s(38,23)=   -0.10261855286854D-06
     7589s(39,23)=    0.36368105668424D-08
     7590s(40,23)=    0.80548590305522D-07
     7591s(41,23)=   -0.39402998138252D-07
     7592s(42,23)=   -0.13044776330453D-07
     7593s(43,23)=    0.35230822511696D-07
     7594s(44,23)=   -0.38126285997105D-08
     7595s(45,23)=   -0.41870291407728D-07
     7596s(46,23)=   -0.40542175855106D-07
     7597s(47,23)=    0.52512970896453D-07
     7598s(48,23)=    0.64472339154468D-07
     7599s(49,23)=   -0.13764138097832D-07
     7600s(50,23)=   -0.23262961649640D-07
     7601s(51,23)=   -0.54498090962075D-08
     7602s(52,23)=   -0.40832137320425D-07
     7603s(53,23)=    0.30883788965682D-07
     7604s(54,23)=    0.59554143490002D-08
     7605s(55,23)=    0.15826576402758D-07
     7606s(56,23)=   -0.30546366389131D-08
     7607s(57,23)=   -0.33710759479548D-07
     7608s(58,23)=    0.42432292031115D-07
     7609s(59,23)=    0.19055844739369D-07
     7610s(60,23)=   -0.53493171836413D-07
     7611s(61,23)=   -0.86122918322742D-08
     7612s(62,23)=    0.42435124794369D-07
     7613s(63,23)=    0.24086226827129D-08
     7614s(64,23)=   -0.19299029335542D-07
     7615s(65,23)=    0.27344753084321D-07
     7616s(66,23)=   -0.64811007443060D-08
     7617s(67,23)=    0.40723327050428D-08
     7618s(68,23)=    0.12308992461489D-08
     7619s(69,23)=   -0.13519766695142D-07
     7620s(70,23)=    0.15952942060573D-07
     7621s(71,23)=   -0.19862866658780D-07
     7622s(72,23)=    0.21193483815864D-07
     7623s(73,23)=    0.77746498722503D-08
     7624s(74,23)=    0.46649362127192D-08
     7625s(75,23)=    0.13571741248582D-07
     7626s(76,23)=    0.77914367333071D-09
     7627s(77,23)=    0.12620984254097D-07
     7628s(78,23)=   -0.76843752977740D-08
     7629s(79,23)=    0.14957902201148D-07
     7630s(80,23)=   -0.11704671972042D-08
     7631s(24,24)=    0.13365654513812D-06
     7632s(25,24)=    0.10420440793780D-06
     7633s(26,24)=    0.69892842255922D-07
     7634s(27,24)=    0.20822951271181D-07
     7635s(28,24)=    0.17328224754317D-06
     7636s(29,24)=   -0.31771054193579D-06
     7637s(30,24)=   -0.22658020777197D-06
     7638s(31,24)=    0.11768365987851D-06
     7639s(32,24)=    0.15392478445121D-06
     7640s(33,24)=    0.14970977269238D-06
     7641s(34,24)=   -0.18409701453663D-07
     7642s(35,24)=   -0.13423591418765D-07
     7643s(36,24)=   -0.71647913872669D-07
     7644s(37,24)=   -0.15648959767529D-07
     7645s(38,24)=    0.44608328778969D-07
     7646s(39,24)=   -0.13572564408638D-07
     7647s(40,24)=    0.44809188076787D-08
     7648s(41,24)=   -0.85562804175540D-07
     7649s(42,24)=   -0.17330890954671D-07
     7650s(43,24)=   -0.75641223117804D-08
     7651s(44,24)=    0.33642338348812D-07
     7652s(45,24)=    0.22118487981987D-07
     7653s(46,24)=   -0.76448411311210D-07
     7654s(47,24)=   -0.59672118147122D-07
     7655s(48,24)=    0.36943136668974D-07
     7656s(49,24)=    0.27410232206408D-07
     7657s(50,24)=   -0.36602861967874D-07
     7658s(51,24)=   -0.49738771243184D-07
     7659s(52,24)=    0.24689100919164D-07
     7660s(53,24)=   -0.34229297600612D-08
     7661s(54,24)=   -0.47632654023059D-08
     7662s(55,24)=    0.22289622363861D-08
     7663s(56,24)=    0.44689900647894D-08
     7664s(57,24)=   -0.12928420382710D-07
     7665s(58,24)=   -0.42174766304784D-08
     7666s(59,24)=    0.21273250831510D-07
     7667s(60,24)=   -0.33424298857639D-09
     7668s(61,24)=   -0.12107587705232D-07
     7669s(62,24)=    0.14317042771814D-09
     7670s(63,24)=   -0.20993014525141D-07
     7671s(64,24)=   -0.26778503005350D-07
     7672s(65,24)=   -0.30292522435917D-07
     7673s(66,24)=    0.17601994659046D-07
     7674s(67,24)=    0.33698577624798D-07
     7675s(68,24)=    0.12250204010052D-07
     7676s(69,24)=    0.29217190072430D-07
     7677s(70,24)=   -0.10819728157274D-07
     7678s(71,24)=    0.39233527254074D-07
     7679s(72,24)=    0.48275080073852D-08
     7680s(73,24)=   -0.19264686446292D-07
     7681s(74,24)=    0.17623540189089D-07
     7682s(75,24)=   -0.43220085749331D-07
     7683s(76,24)=    0.10621305199599D-07
     7684s(77,24)=   -0.39080250417911D-07
     7685s(78,24)=    0.21350367060357D-07
     7686s(79,24)=   -0.46835778642193D-07
     7687s(80,24)=    0.28507269098269D-07
     7688s(25,25)=   -0.28343383249738D-06
     7689s(26,25)=   -0.41376619591643D-06
     7690s(27,25)=   -0.58673900423947D-06
     7691s(28,25)=   -0.11103774475890D-06
     7692s(29,25)=    0.28364746018767D-06
     7693s(30,25)=    0.25965497175507D-06
     7694s(31,25)=   -0.94438231555344D-08
     7695s(32,25)=   -0.12000761429814D-06
     7696s(33,25)=   -0.54415022292270D-07
     7697s(34,25)=   -0.10164908575427D-06
     7698s(35,25)=   -0.47046845571941D-07
     7699s(36,25)=    0.11550555976001D-06
     7700s(37,25)=    0.60618145789925D-07
     7701s(38,25)=   -0.41389424022968D-07
     7702s(39,25)=   -0.92966391031709D-07
     7703s(40,25)=   -0.53736514318232D-07
     7704s(41,25)=   -0.54497487858867D-07
     7705s(42,25)=    0.72148313908372D-07
     7706s(43,25)=    0.62334082759228D-07
     7707s(44,25)=   -0.29218597413776D-07
     7708s(45,25)=   -0.61029121259232D-07
     7709s(46,25)=   -0.50983851941039D-07
     7710s(47,25)=    0.18630917759058D-07
     7711s(48,25)=    0.59003820157533D-07
     7712s(49,25)=    0.28403235587668D-07
     7713s(50,25)=   -0.22985892903289D-07
     7714s(51,25)=   -0.33488421991056D-07
     7715s(52,25)=   -0.12563713087659D-07
     7716s(53,25)=    0.28423814410021D-07
     7717s(54,25)=    0.90493803763162D-08
     7718s(55,25)=   -0.34771934325339D-07
     7719s(56,25)=   -0.86197138185889D-08
     7720s(57,25)=   -0.50852900447310D-08
     7721s(58,25)=    0.14205254460726D-07
     7722s(59,25)=   -0.38952178709227D-08
     7723s(60,25)=    0.18170442000334D-07
     7724s(61,25)=    0.15252783788542D-07
     7725s(62,25)=   -0.86902777480379D-08
     7726s(63,25)=   -0.42928136365090D-07
     7727s(64,25)=    0.29468803733683D-08
     7728s(65,25)=   -0.93471377774845D-08
     7729s(66,25)=   -0.10127788250041D-07
     7730s(67,25)=    0.42852726412705D-07
     7731s(68,25)=   -0.18592828646705D-08
     7732s(69,25)=    0.16988875042302D-07
     7733s(70,25)=   -0.18162904280886D-07
     7734s(71,25)=   -0.29915694799725D-08
     7735s(72,25)=   -0.17528084203899D-07
     7736s(73,25)=   -0.25442757363903D-07
     7737s(74,25)=   -0.25468049336641D-08
     7738s(75,25)=   -0.31969511674933D-07
     7739s(76,25)=    0.54675379007774D-09
     7740s(77,25)=   -0.24783534205878D-07
     7741s(78,25)=    0.25779347834228D-08
     7742s(79,25)=   -0.32941556756683D-07
     7743s(80,25)=    0.92235974771148D-08
     7744s(26,26)=    0.43338187234426D-06
     7745s(27,26)=    0.32255747503100D-06
     7746s(28,26)=    0.51542611412935D-06
     7747s(29,26)=    0.26605201857376D-06
     7748s(30,26)=   -0.32663208942466D-06
     7749s(31,26)=   -0.30707617643347D-07
     7750s(32,26)=   -0.65448538173474D-07
     7751s(33,26)=   -0.12366214261228D-06
     7752s(34,26)=   -0.10310360826025D-06
     7753s(35,26)=    0.39829968263619D-07
     7754s(36,26)=    0.76407885525851D-07
     7755s(37,26)=   -0.88826261416065D-07
     7756s(38,26)=   -0.11340067571691D-06
     7757s(39,26)=   -0.62812841030767D-08
     7758s(40,26)=    0.12313744577302D-06
     7759s(41,26)=    0.94051267435214D-07
     7760s(42,26)=   -0.89213215251186D-07
     7761s(43,26)=   -0.85416625541469D-07
     7762s(44,26)=   -0.54529321002864D-07
     7763s(45,26)=    0.17806700371047D-07
     7764s(46,26)=    0.32277381280023D-07
     7765s(47,26)=   -0.13854184904487D-07
     7766s(48,26)=   -0.53769740665614D-07
     7767s(49,26)=   -0.26659909255083D-07
     7768s(50,26)=    0.33559732217126D-08
     7769s(51,26)=    0.12995541672008D-08
     7770s(52,26)=    0.40773157036140D-07
     7771s(53,26)=    0.45692247832734D-07
     7772s(54,26)=   -0.36732719547698D-07
     7773s(55,26)=   -0.92533664791458D-08
     7774s(56,26)=    0.86132244618483D-08
     7775s(57,26)=    0.10846602869552D-07
     7776s(58,26)=   -0.17247917928208D-07
     7777s(59,26)=   -0.28413095500352D-07
     7778s(60,26)=    0.22558628341088D-07
     7779s(61,26)=   -0.41449878368046D-08
     7780s(62,26)=    0.60769760888392D-09
     7781s(63,26)=    0.19623277856483D-07
     7782s(64,26)=   -0.14473895347379D-07
     7783s(65,26)=    0.90417076513148D-08
     7784s(66,26)=    0.16239691540043D-07
     7785s(67,26)=   -0.14184759836242D-07
     7786s(68,26)=   -0.87303978099637D-08
     7787s(69,26)=    0.13089690945973D-07
     7788s(70,26)=    0.62270462211982D-08
     7789s(71,26)=   -0.95019319057695D-08
     7790s(72,26)=    0.13705009796467D-07
     7791s(73,26)=   -0.15879202025637D-07
     7792s(74,26)=    0.52592361908252D-08
     7793s(75,26)=    0.74244869289485D-08
     7794s(76,26)=   -0.12607839461997D-08
     7795s(77,26)=    0.31095151602912D-08
     7796s(78,26)=    0.99793715366390D-09
     7797s(79,26)=    0.51272824362602D-08
     7798s(80,26)=   -0.57770178320492D-08
     7799s(27,27)=   -0.34170443014580D-07
     7800s(28,27)=    0.42909908753145D-07
     7801s(29,27)=    0.70641170336061D-07
     7802s(30,27)=   -0.20849406545547D-06
     7803s(31,27)=   -0.13261660576630D-06
     7804s(32,27)=   -0.10992100095684D-06
     7805s(33,27)=    0.40746677241334D-07
     7806s(34,27)=    0.11510647196811D-06
     7807s(35,27)=   -0.97357586430325D-08
     7808s(36,27)=   -0.61999880756536D-07
     7809s(37,27)=   -0.62936756411612D-07
     7810s(38,27)=    0.10171846329650D-06
     7811s(39,27)=    0.12125582972906D-06
     7812s(40,27)=   -0.16059653639408D-07
     7813s(41,27)=   -0.50701162673004D-07
     7814s(42,27)=   -0.43803028209664D-07
     7815s(43,27)=    0.98345630252460D-07
     7816s(44,27)=    0.37100350641786D-07
     7817s(45,27)=   -0.75542753431233D-08
     7818s(46,27)=   -0.31517137838158D-07
     7819s(47,27)=   -0.12291518438071D-07
     7820s(48,27)=    0.44004759412813D-07
     7821s(49,27)=    0.24694589785261D-07
     7822s(50,27)=   -0.23941178895794D-07
     7823s(51,27)=   -0.22826126011045D-07
     7824s(52,27)=   -0.66949746661043D-08
     7825s(53,27)=    0.18135417630152D-07
     7826s(54,27)=    0.29502084853047D-07
     7827s(55,27)=   -0.41327952897796D-07
     7828s(56,27)=   -0.96129223122568D-08
     7829s(57,27)=    0.29900387474418D-07
     7830s(58,27)=    0.79785180422400D-08
     7831s(59,27)=   -0.26146583614980D-07
     7832s(60,27)=   -0.12639543885775D-07
     7833s(61,27)=    0.34889103817727D-07
     7834s(62,27)=    0.14741697501236D-07
     7835s(63,27)=   -0.14955246973965D-07
     7836s(64,27)=    0.12973524043207D-07
     7837s(65,27)=    0.33743032144455D-07
     7838s(66,27)=    0.10104936959663D-07
     7839s(67,27)=   -0.28782081297409D-07
     7840s(68,27)=    0.13625943373120D-08
     7841s(69,27)=    0.22799370217497D-07
     7842s(70,27)=   -0.91103186516143D-08
     7843s(71,27)=    0.11806369559136D-07
     7844s(72,27)=    0.24960924930024D-07
     7845s(73,27)=    0.13308222061162D-07
     7846s(74,27)=    0.32700211987723D-07
     7847s(75,27)=    0.39456678413889D-07
     7848s(76,27)=    0.28884966557988D-07
     7849s(77,27)=    0.50691069305749D-07
     7850s(78,27)=    0.51318087982712D-08
     7851s(79,27)=    0.56932129094163D-07
     7852s(80,27)=   -0.53130371518947D-08
     7853s(28,28)=   -0.58985837407318D-06
     7854s(29,28)=   -0.22491706106929D-06
     7855s(30,28)=   -0.33657612528292D-06
     7856s(31,28)=   -0.17588007120398D-06
     7857s(32,28)=    0.27198972538494D-06
     7858s(33,28)=    0.18609546807248D-06
     7859s(34,28)=   -0.14344940495241D-07
     7860s(35,28)=    0.78461507290809D-08
     7861s(36,28)=    0.19337648678170D-06
     7862s(37,28)=   -0.72197020817564D-08
     7863s(38,28)=   -0.13766557518626D-06
     7864s(39,28)=   -0.33989003948112D-07
     7865s(40,28)=    0.13716997268007D-06
     7866s(41,28)=    0.43720861794535D-07
     7867s(42,28)=   -0.53775665106866D-07
     7868s(43,28)=   -0.49722185022982D-07
     7869s(44,28)=    0.15179888848508D-08
     7870s(45,28)=    0.49797683624109D-07
     7871s(46,28)=    0.78626078282292D-07
     7872s(47,28)=    0.29271105990369D-08
     7873s(48,28)=   -0.12095485088284D-07
     7874s(49,28)=    0.33592775142139D-08
     7875s(50,28)=    0.14593614729016D-07
     7876s(51,28)=    0.77588273282151D-08
     7877s(52,28)=    0.16854138017509D-07
     7878s(53,28)=    0.51531108406875D-07
     7879s(54,28)=   -0.30953009796593D-07
     7880s(55,28)=   -0.13159235460372D-07
     7881s(56,28)=    0.12573303530113D-07
     7882s(57,28)=    0.53297198998565D-07
     7883s(58,28)=   -0.47285470038410D-07
     7884s(59,28)=   -0.53724988753629D-07
     7885s(60,28)=    0.32119661032479D-07
     7886s(61,28)=    0.18521465315670D-08
     7887s(62,28)=   -0.22863052872106D-07
     7888s(63,28)=   -0.10582187950961D-08
     7889s(64,28)=    0.31079660281112D-07
     7890s(65,28)=    0.11364485225309D-07
     7891s(66,28)=    0.22983251494080D-07
     7892s(67,28)=    0.18454123546409D-07
     7893s(68,28)=   -0.17287640656947D-07
     7894s(69,28)=    0.18760264653712D-07
     7895s(70,28)=    0.75169808875106D-08
     7896s(71,28)=   -0.10219926273799D-08
     7897s(72,28)=   -0.67842615858714D-08
     7898s(73,28)=   -0.14976962407661D-07
     7899s(74,28)=   -0.30469466429983D-07
     7900s(75,28)=   -0.23386278766646D-07
     7901s(76,28)=   -0.33580736734242D-07
     7902s(77,28)=   -0.18394421066540D-07
     7903s(78,28)=   -0.31594991341127D-07
     7904s(79,28)=   -0.86844378634889D-08
     7905s(80,28)=   -0.37054489276426D-07
     7906s(29,29)=    0.15934179139910D-06
     7907s(30,29)=    0.80261183497611D-07
     7908s(31,29)=    0.20452087491675D-06
     7909s(32,29)=    0.19302949858415D-06
     7910s(33,29)=    0.31044324018296D-07
     7911s(34,29)=    0.68372561049159D-07
     7912s(35,29)=   -0.68406151061339D-07
     7913s(36,29)=   -0.18550487603784D-06
     7914s(37,29)=   -0.98042903845356D-07
     7915s(38,29)=    0.22138827313363D-06
     7916s(39,29)=    0.21394124499928D-06
     7917s(40,29)=   -0.15416201266810D-06
     7918s(41,29)=   -0.10576508454304D-06
     7919s(42,29)=   -0.22805079313001D-07
     7920s(43,29)=    0.14827037599014D-06
     7921s(44,29)=    0.75196844827512D-07
     7922s(45,29)=   -0.21389377822180D-07
     7923s(46,29)=   -0.87293909692996D-07
     7924s(47,29)=   -0.10737236474157D-06
     7925s(48,29)=    0.44305518712465D-07
     7926s(49,29)=    0.86990542087037D-07
     7927s(50,29)=   -0.15392293253890D-07
     7928s(51,29)=   -0.27392242860976D-07
     7929s(52,29)=    0.40015795231051D-07
     7930s(53,29)=    0.47976448579178D-08
     7931s(54,29)=    0.43940406414663D-09
     7932s(55,29)=   -0.63088793315440D-08
     7933s(56,29)=    0.17116906947311D-07
     7934s(57,29)=   -0.24362425804244D-07
     7935s(58,29)=   -0.31087444982469D-07
     7936s(59,29)=    0.71810373620219D-08
     7937s(60,29)=    0.44337931570666D-07
     7938s(61,29)=    0.30994772588096D-09
     7939s(62,29)=   -0.15456911802245D-07
     7940s(63,29)=    0.27462379375534D-07
     7941s(64,29)=   -0.18164946905034D-07
     7942s(65,29)=   -0.31507596095268D-07
     7943s(66,29)=   -0.19550489228411D-07
     7944s(67,29)=    0.28930785623828D-07
     7945s(68,29)=   -0.11451115042695D-07
     7946s(69,29)=   -0.58469224805794D-10
     7947s(70,29)=    0.13406669034784D-07
     7948s(71,29)=   -0.14069122767834D-07
     7949s(72,29)=    0.97192394157168D-08
     7950s(73,29)=    0.28957457754385D-08
     7951s(74,29)=   -0.11911867022075D-07
     7952s(75,29)=    0.29834427818979D-07
     7953s(76,29)=   -0.15518302956492D-07
     7954s(77,29)=    0.20382105419020D-07
     7955s(78,29)=   -0.78095369888892D-08
     7956s(79,29)=    0.23614790722157D-07
     7957s(80,29)=   -0.18284196055722D-07
     7958s(30,30)=   -0.73208354445994D-08
     7959s(31,30)=    0.20503197108988D-06
     7960s(32,30)=   -0.60664330159172D-07
     7961s(33,30)=   -0.15149502720144D-06
     7962s(34,30)=   -0.22995321782695D-06
     7963s(35,30)=   -0.11486429179361D-06
     7964s(36,30)=    0.19271900187518D-06
     7965s(37,30)=    0.30515933963324D-06
     7966s(38,30)=   -0.10739721056435D-06
     7967s(39,30)=   -0.23837351416915D-06
     7968s(40,30)=   -0.43570935938292D-07
     7969s(41,30)=    0.10306543986188D-06
     7970s(42,30)=    0.95073214474989D-07
     7971s(43,30)=   -0.31670675362918D-07
     7972s(44,30)=   -0.43072082570833D-07
     7973s(45,30)=   -0.42628687639845D-07
     7974s(46,30)=   -0.46591332486110D-07
     7975s(47,30)=    0.36297872037229D-07
     7976s(48,30)=    0.50066873364918D-08
     7977s(49,30)=   -0.20773077169859D-07
     7978s(50,30)=   -0.56230260521248D-07
     7979s(51,30)=   -0.23225006093591D-07
     7980s(52,30)=    0.13150371355644D-07
     7981s(53,30)=    0.13647901560827D-08
     7982s(54,30)=   -0.34376051509691D-07
     7983s(55,30)=    0.35961991143393D-08
     7984s(56,30)=    0.46380988195390D-07
     7985s(57,30)=    0.97444094524642D-08
     7986s(58,30)=   -0.18212691120108D-07
     7987s(59,30)=   -0.39712009869295D-07
     7988s(60,30)=    0.30781051371393D-07
     7989s(61,30)=    0.51745294237553D-08
     7990s(62,30)=   -0.12859144651056D-07
     7991s(63,30)=   -0.28232237860941D-07
     7992s(64,30)=   -0.58781004111777D-07
     7993s(65,30)=   -0.12682708120815D-07
     7994s(66,30)=    0.15713937458397D-07
     7995s(67,30)=    0.13893147215378D-07
     7996s(68,30)=   -0.14738832789576D-07
     7997s(69,30)=    0.84698454522225D-08
     7998s(70,30)=    0.63319613781522D-08
     7999s(71,30)=   -0.11737291055526D-08
     8000s(72,30)=    0.20959946701376D-07
     8001s(73,30)=    0.17291696084040D-07
     8002s(74,30)=    0.33146482887149D-07
     8003s(75,30)=    0.26747011919294D-07
     8004s(76,30)=    0.32677623283850D-07
     8005s(77,30)=    0.30887204285341D-07
     8006s(78,30)=    0.20456256872414D-07
     8007s(79,30)=    0.22274599354938D-07
     8008s(80,30)=    0.13660597104178D-07
     8009s(31,31)=    0.78953381289128D-07
     8010s(32,31)=    0.55092681530910D-07
     8011s(33,31)=   -0.24066812936350D-07
     8012s(34,31)=    0.83331006094216D-07
     8013s(35,31)=    0.20605195393677D-07
     8014s(36,31)=   -0.16601047334463D-06
     8015s(37,31)=   -0.11457522585646D-06
     8016s(38,31)=    0.55916272890031D-07
     8017s(39,31)=    0.16616746720778D-06
     8018s(40,31)=   -0.37589902744299D-07
     8019s(41,31)=   -0.11581940689458D-06
     8020s(42,31)=    0.44661598930658D-07
     8021s(43,31)=    0.23115976793491D-07
     8022s(44,31)=    0.52789006379119D-08
     8023s(45,31)=   -0.38801867403663D-07
     8024s(46,31)=    0.58426457641535D-07
     8025s(47,31)=   -0.73087469795559D-08
     8026s(48,31)=   -0.15876001289290D-07
     8027s(49,31)=    0.24498735694810D-07
     8028s(50,31)=   -0.12124946374761D-07
     8029s(51,31)=   -0.59637546214590D-07
     8030s(52,31)=    0.15716912069639D-07
     8031s(53,31)=    0.27156878636963D-07
     8032s(54,31)=   -0.20598529734341D-07
     8033s(55,31)=   -0.38168653542138D-07
     8034s(56,31)=    0.18160363777274D-08
     8035s(57,31)=    0.17309169075534D-08
     8036s(58,31)=   -0.57335222802739D-07
     8037s(59,31)=    0.18564145366185D-07
     8038s(60,31)=    0.25766229579466D-07
     8039s(61,31)=   -0.10333355906040D-07
     8040s(62,31)=   -0.18464747507191D-07
     8041s(63,31)=    0.13195542467325D-07
     8042s(64,31)=    0.11997271372907D-08
     8043s(65,31)=    0.30458308482371D-07
     8044s(66,31)=   -0.52514627551796D-08
     8045s(67,31)=   -0.32599509915357D-07
     8046s(68,31)=    0.31415332439130D-07
     8047s(69,31)=   -0.25740231453981D-07
     8048s(70,31)=   -0.16680113918527D-08
     8049s(71,31)=    0.11995163703205D-08
     8050s(72,31)=   -0.63110056965274D-08
     8051s(73,31)=   -0.27153087065670D-07
     8052s(74,31)=   -0.19474317437066D-07
     8053s(75,31)=   -0.20038597783690D-07
     8054s(76,31)=   -0.32275924064217D-07
     8055s(77,31)=   -0.16759991878209D-07
     8056s(78,31)=   -0.35136289991141D-07
     8057s(79,31)=   -0.23546381236919D-07
     8058s(80,31)=   -0.36693928431794D-07
     8059s(32,32)=    0.89374420888902D-07
     8060s(33,32)=   -0.39771492440454D-06
     8061s(34,32)=    0.11469182814266D-06
     8062s(35,32)=    0.25395957524143D-06
     8063s(36,32)=    0.42129618578725D-07
     8064s(37,32)=    0.98208473981999D-07
     8065s(38,32)=    0.99469730680367D-08
     8066s(39,32)=   -0.25745403534494D-06
     8067s(40,32)=   -0.41443252825890D-07
     8068s(41,32)=    0.16820069751870D-06
     8069s(42,32)=    0.10308232626339D-06
     8070s(43,32)=   -0.70038064535491D-07
     8071s(44,32)=   -0.12196361595307D-06
     8072s(45,32)=    0.42272108497804D-07
     8073s(46,32)=    0.59377348437907D-07
     8074s(47,32)=    0.18906628013296D-07
     8075s(48,32)=    0.13649977026942D-07
     8076s(49,32)=   -0.34490511565167D-07
     8077s(50,32)=    0.43027917035399D-09
     8078s(51,32)=    0.50270922076139D-07
     8079s(52,32)=    0.46357304116044D-07
     8080s(53,32)=   -0.24282795615853D-08
     8081s(54,32)=   -0.90643338662239D-08
     8082s(55,32)=   -0.23829540610693D-07
     8083s(56,32)=    0.11711589064585D-07
     8084s(57,32)=    0.35754022645868D-07
     8085s(58,32)=   -0.48182753078852D-08
     8086s(59,32)=   -0.23753633638613D-07
     8087s(60,32)=   -0.22342169368798D-07
     8088s(61,32)=    0.24521309772462D-07
     8089s(62,32)=    0.39161940497231D-07
     8090s(63,32)=   -0.21554336265665D-07
     8091s(64,32)=   -0.28586080845642D-08
     8092s(65,32)=   -0.97613286544951D-08
     8093s(66,32)=   -0.33763392592834D-07
     8094s(67,32)=   -0.38442901236260D-08
     8095s(68,32)=   -0.24250680463403D-08
     8096s(69,32)=   -0.97733825080326D-08
     8097s(70,32)=    0.21796544995104D-07
     8098s(71,32)=   -0.63533297575582D-09
     8099s(72,32)=   -0.24344198631389D-07
     8100s(73,32)=   -0.14144615871724D-08
     8101s(74,32)=   -0.27606198840908D-07
     8102s(75,32)=   -0.26461670063636D-07
     8103s(76,32)=   -0.14595660921976D-07
     8104s(77,32)=   -0.25425669305366D-07
     8105s(78,32)=   -0.81070748800349D-08
     8106s(79,32)=   -0.15184683821167D-07
     8107s(80,32)=   -0.11268838420761D-07
     8108s(33,33)=   -0.94208598006704D-07
     8109s(34,33)=    0.29799617179318D-08
     8110s(35,33)=   -0.22242110984293D-06
     8111s(36,33)=   -0.29066411984174D-06
     8112s(37,33)=   -0.20209988882640D-06
     8113s(38,33)=    0.17897713731673D-07
     8114s(39,33)=    0.13953494947431D-06
     8115s(40,33)=    0.11413168482978D-06
     8116s(41,33)=   -0.48813662280767D-07
     8117s(42,33)=   -0.16926140355608D-06
     8118s(43,33)=   -0.49953698561631D-07
     8119s(44,33)=    0.52300068682533D-07
     8120s(45,33)=    0.53569128202290D-07
     8121s(46,33)=    0.16136373991569D-07
     8122s(47,33)=   -0.14485682922362D-07
     8123s(48,33)=   -0.65624463147833D-07
     8124s(49,33)=   -0.19381554421885D-07
     8125s(50,33)=    0.58309224409575D-07
     8126s(51,33)=    0.98195847838631D-08
     8127s(52,33)=   -0.26550731825424D-08
     8128s(53,33)=    0.97682209709751D-08
     8129s(54,33)=    0.42960391153541D-08
     8130s(55,33)=    0.12797933236365D-07
     8131s(56,33)=    0.38541856808679D-07
     8132s(57,33)=   -0.12234250882913D-07
     8133s(58,33)=    0.15517306753324D-07
     8134s(59,33)=   -0.31018353753256D-07
     8135s(60,33)=    0.22914717662037D-07
     8136s(61,33)=    0.15804975374955D-07
     8137s(62,33)=    0.50757151028676D-08
     8138s(63,33)=   -0.80321210231905D-08
     8139s(64,33)=   -0.12636820680965D-08
     8140s(65,33)=   -0.17081053415114D-07
     8141s(66,33)=   -0.16051416121923D-08
     8142s(67,33)=   -0.28763013588895D-07
     8143s(68,33)=   -0.18131621216844D-07
     8144s(69,33)=   -0.23869942652726D-08
     8145s(70,33)=   -0.61060341390310D-08
     8146s(71,33)=    0.15176146381324D-07
     8147s(72,33)=    0.40800040051723D-08
     8148s(73,33)=   -0.14707421372003D-07
     8149s(74,33)=   -0.88115310774511D-08
     8150s(75,33)=   -0.19825518153810D-07
     8151s(76,33)=    0.64698444424280D-08
     8152s(77,33)=   -0.56801384886818D-08
     8153s(78,33)=   -0.11924496262571D-07
     8154s(79,33)=    0.18518675387124D-07
     8155s(80,33)=   -0.19178282810397D-07
     8156s(34,34)=    0.57891361833442D-07
     8157s(35,34)=    0.35410000719729D-06
     8158s(36,34)=    0.14032205000435D-06
     8159s(37,34)=    0.27999725729822D-07
     8160s(38,34)=    0.18242723452292D-06
     8161s(39,34)=   -0.73527413966796D-07
     8162s(40,34)=   -0.21144239516408D-06
     8163s(41,34)=   -0.56269656280633D-07
     8164s(42,34)=    0.37385595963484D-07
     8165s(43,34)=   -0.61348664789110D-08
     8166s(44,34)=   -0.35479484011716D-07
     8167s(45,34)=    0.25877502023238D-07
     8168s(46,34)=   -0.22933272566050D-07
     8169s(47,34)=   -0.10917202035018D-06
     8170s(48,34)=   -0.45419133217149D-07
     8171s(49,34)=    0.41834613424255D-07
     8172s(50,34)=    0.45564394341709D-07
     8173s(51,34)=    0.29839224484537D-07
     8174s(52,34)=   -0.21684207261625D-07
     8175s(53,34)=   -0.52560461950635D-07
     8176s(54,34)=   -0.49734569633855D-08
     8177s(55,34)=    0.62609322210806D-07
     8178s(56,34)=    0.23037019399123D-08
     8179s(57,34)=    0.28567371343927D-08
     8180s(58,34)=   -0.48283994827938D-08
     8181s(59,34)=    0.85945902364989D-08
     8182s(60,34)=   -0.16766221308052D-07
     8183s(61,34)=    0.20397296405930D-07
     8184s(62,34)=   -0.16348347560272D-07
     8185s(63,34)=   -0.16633471743895D-07
     8186s(64,34)=   -0.20720067762420D-07
     8187s(65,34)=   -0.21684071991585D-07
     8188s(66,34)=    0.43792547302982D-08
     8189s(67,34)=   -0.44138759859463D-08
     8190s(68,34)=    0.70357085654840D-08
     8191s(69,34)=    0.11822517036222D-07
     8192s(70,34)=   -0.12881206313722D-07
     8193s(71,34)=   -0.19482515896062D-07
     8194s(72,34)=   -0.67663252746500D-08
     8195s(73,34)=   -0.27619766132433D-08
     8196s(74,34)=    0.65622048076009D-08
     8197s(75,34)=    0.13198689067665D-07
     8198s(76,34)=   -0.72285366979372D-08
     8199s(77,34)=    0.11673329617847D-07
     8200s(78,34)=    0.58468649983396D-09
     8201s(79,34)=   -0.75417288260744D-08
     8202s(80,34)=    0.13374343775362D-07
     8203s(35,35)=    0.17574893437826D-07
     8204s(36,35)=   -0.18917698132751D-06
     8205s(37,35)=    0.10402270997036D-06
     8206s(38,35)=    0.66196197312449D-07
     8207s(39,35)=    0.10897013392005D-06
     8208s(40,35)=    0.71306369032483D-07
     8209s(41,35)=    0.21379564891250D-07
     8210s(42,35)=   -0.45856563658787D-07
     8211s(43,35)=    0.22318982455819D-07
     8212s(44,35)=    0.95498176986744D-07
     8213s(45,35)=    0.21977868445240D-07
     8214s(46,35)=   -0.72451901992539D-07
     8215s(47,35)=   -0.31058301957535D-07
     8216s(48,35)=    0.16324095077608D-07
     8217s(49,35)=    0.10429426214531D-07
     8218s(50,35)=    0.94221774231592D-08
     8219s(51,35)=    0.12176235287938D-07
     8220s(52,35)=   -0.29172667049278D-07
     8221s(53,35)=   -0.16589494701342D-07
     8222s(54,35)=    0.26089459167721D-07
     8223s(55,35)=    0.78345423397103D-07
     8224s(56,35)=   -0.45583432726474D-08
     8225s(57,35)=   -0.49458722169173D-07
     8226s(58,35)=   -0.24416230031301D-08
     8227s(59,35)=   -0.35624603264824D-08
     8228s(60,35)=   -0.27603732186268D-08
     8229s(61,35)=    0.91364997384810D-08
     8230s(62,35)=    0.50467062635717D-09
     8231s(63,35)=   -0.30528611453612D-07
     8232s(64,35)=   -0.83018345618891D-08
     8233s(65,35)=   -0.81366284734688D-08
     8234s(66,35)=   -0.61185123425041D-08
     8235s(67,35)=   -0.14965236741050D-07
     8236s(68,35)=    0.57111160293270D-08
     8237s(69,35)=   -0.13278372297938D-07
     8238s(70,35)=   -0.24891598456516D-07
     8239s(71,35)=    0.45291250627892D-08
     8240s(72,35)=   -0.25883497180767D-07
     8241s(73,35)=   -0.19594072388370D-07
     8242s(74,35)=   -0.31778035058203D-08
     8243s(75,35)=   -0.26856121714990D-07
     8244s(76,35)=   -0.80253713217046D-08
     8245s(77,35)=   -0.30881564979065D-08
     8246s(78,35)=   -0.46166508756688D-08
     8247s(79,35)=   -0.12906559027396D-07
     8248s(80,35)=    0.13935082715953D-07
     8249s(36,36)=   -0.20219346710156D-06
     8250s(37,36)=   -0.18565703689859D-06
     8251s(38,36)=   -0.18586053945669D-06
     8252s(39,36)=   -0.71406867219384D-07
     8253s(40,36)=   -0.63776123497810D-07
     8254s(41,36)=   -0.47554070004202D-07
     8255s(42,36)=    0.79512097443865D-07
     8256s(43,36)=    0.11649586191650D-06
     8257s(44,36)=   -0.50904431344214D-07
     8258s(45,36)=   -0.75423388300267D-07
     8259s(46,36)=    0.58602766101646D-07
     8260s(47,36)=    0.46850361082441D-07
     8261s(48,36)=    0.32015762470739D-08
     8262s(49,36)=   -0.25335742724641D-07
     8263s(50,36)=    0.26346357568252D-07
     8264s(51,36)=    0.10879802316803D-09
     8265s(52,36)=   -0.66981996635857D-08
     8266s(53,36)=   -0.29306027844671D-08
     8267s(54,36)=    0.16351763245747D-07
     8268s(55,36)=    0.25856474578397D-07
     8269s(56,36)=    0.13700179370321D-08
     8270s(57,36)=   -0.27868568299405D-07
     8271s(58,36)=    0.84458741057917D-08
     8272s(59,36)=    0.37746613907334D-07
     8273s(60,36)=    0.17836526402338D-07
     8274s(61,36)=   -0.29162421924768D-07
     8275s(62,36)=   -0.32836453597881D-07
     8276s(63,36)=   -0.25289019775190D-07
     8277s(64,36)=    0.12202549479010D-07
     8278s(65,36)=    0.19022429206720D-07
     8279s(66,36)=    0.99826883595768D-08
     8280s(67,36)=   -0.12786222890282D-07
     8281s(68,36)=    0.37875948566872D-07
     8282s(69,36)=   -0.29062152850641D-07
     8283s(70,36)=    0.39182214734233D-08
     8284s(71,36)=    0.96862530007850D-09
     8285s(72,36)=    0.90080155735125D-08
     8286s(73,36)=    0.80087161731193D-08
     8287s(74,36)=    0.38858346341065D-08
     8288s(75,36)=    0.11475665208163D-07
     8289s(76,36)=    0.19320641646836D-07
     8290s(77,36)=   -0.95972419672990D-10
     8291s(78,36)=    0.12611076496036D-07
     8292s(79,36)=    0.15892552740599D-07
     8293s(80,36)=   -0.61614213870784D-08
     8294s(37,37)=    0.82499963689137D-07
     8295s(38,37)=    0.32579548514251D-06
     8296s(39,37)=    0.82129925904680D-07
     8297s(40,37)=    0.11123696638987D-06
     8298s(41,37)=    0.10814123499530D-06
     8299s(42,37)=    0.20875184329936D-07
     8300s(43,37)=   -0.53648197571687D-07
     8301s(44,37)=   -0.30090988672809D-07
     8302s(45,37)=    0.32274694930966D-07
     8303s(46,37)=    0.20143534109540D-07
     8304s(47,37)=    0.74917476342432D-08
     8305s(48,37)=    0.40429547752282D-09
     8306s(49,37)=    0.27519728689204D-09
     8307s(50,37)=   -0.19402358295504D-07
     8308s(51,37)=    0.22498893646525D-07
     8309s(52,37)=   -0.10868384024413D-07
     8310s(53,37)=   -0.16461898658393D-07
     8311s(54,37)=   -0.26565798924259D-07
     8312s(55,37)=    0.10062120351788D-07
     8313s(56,37)=   -0.35329493726135D-07
     8314s(57,37)=   -0.34725348468397D-07
     8315s(58,37)=    0.38650836668818D-07
     8316s(59,37)=    0.47928999771503D-07
     8317s(60,37)=   -0.21037700929038D-07
     8318s(61,37)=   -0.23348386689476D-07
     8319s(62,37)=   -0.33175121606318D-08
     8320s(63,37)=    0.10813339572817D-07
     8321s(64,37)=   -0.98037281949979D-08
     8322s(65,37)=    0.16641096036252D-07
     8323s(66,37)=   -0.20239999348763D-08
     8324s(67,37)=   -0.86697474572006D-08
     8325s(68,37)=    0.47546227967430D-07
     8326s(69,37)=   -0.11331337838453D-08
     8327s(70,37)=    0.25441637443214D-07
     8328s(71,37)=    0.82327691620187D-08
     8329s(72,37)=    0.13909970929050D-07
     8330s(73,37)=    0.19755954609375D-07
     8331s(74,37)=    0.12156382486042D-07
     8332s(75,37)=    0.61724690151772D-07
     8333s(76,37)=   -0.72090808068583D-08
     8334s(77,37)=    0.72313923016550D-07
     8335s(78,37)=    0.11118751637188D-07
     8336s(79,37)=    0.55826430259919D-07
     8337s(80,37)=    0.16853621311489D-07
     8338s(38,38)=    0.27223825235871D-07
     8339s(39,38)=   -0.11797781782116D-06
     8340s(40,38)=   -0.27052502411252D-07
     8341s(41,38)=   -0.11205128441237D-06
     8342s(42,38)=   -0.13264118511390D-06
     8343s(43,38)=    0.18137299951394D-07
     8344s(44,38)=    0.25366425674263D-07
     8345s(45,38)=   -0.39955814072124D-07
     8346s(46,38)=    0.40592068927744D-07
     8347s(47,38)=    0.66094637996260D-07
     8348s(48,38)=   -0.59480576006430D-07
     8349s(49,38)=   -0.84877407686127D-07
     8350s(50,38)=    0.27760798622301D-07
     8351s(51,38)=    0.52906318561677D-07
     8352s(52,38)=   -0.28076115668295D-07
     8353s(53,38)=    0.67679253181968D-08
     8354s(54,38)=    0.25023820910351D-07
     8355s(55,38)=   -0.11048359651356D-07
     8356s(56,38)=   -0.76902740526226D-08
     8357s(57,38)=    0.15112418885969D-07
     8358s(58,38)=   -0.49008942050067D-08
     8359s(59,38)=   -0.42835038959172D-07
     8360s(60,38)=   -0.64952785851025D-08
     8361s(61,38)=   -0.45589164370352D-09
     8362s(62,38)=    0.51483704670460D-07
     8363s(63,38)=    0.15181653233649D-07
     8364s(64,38)=   -0.12355377536275D-08
     8365s(65,38)=    0.74811315736456D-08
     8366s(66,38)=    0.13310719431886D-07
     8367s(67,38)=    0.35815003168421D-07
     8368s(68,38)=    0.38129468651773D-07
     8369s(69,38)=   -0.12798508066516D-07
     8370s(70,38)=    0.20274720379769D-07
     8371s(71,38)=   -0.19832787862815D-07
     8372s(72,38)=    0.20011499089307D-07
     8373s(73,38)=    0.18873273793084D-08
     8374s(74,38)=    0.11229187536925D-07
     8375s(75,38)=    0.47505456955470D-07
     8376s(76,38)=    0.73479965358184D-08
     8377s(77,38)=    0.22438227895970D-07
     8378s(78,38)=    0.22393204715969D-07
     8379s(79,38)=    0.33354869887151D-07
     8380s(80,38)=    0.34794547967602D-08
     8381s(39,39)=   -0.23100635007645D-06
     8382s(40,39)=   -0.27132087150901D-07
     8383s(41,39)=   -0.29897783129876D-07
     8384s(42,39)=    0.45265121596468D-09
     8385s(43,39)=    0.42604362762869D-07
     8386s(44,39)=    0.39685524039415D-07
     8387s(45,39)=   -0.23165310740645D-08
     8388s(46,39)=    0.48756411069904D-08
     8389s(47,39)=   -0.37235630952126D-07
     8390s(48,39)=    0.34506784357156D-07
     8391s(49,39)=    0.63774228923100D-07
     8392s(50,39)=    0.37698756216119D-07
     8393s(51,39)=   -0.63429968977591D-07
     8394s(52,39)=   -0.34314284304191D-07
     8395s(53,39)=   -0.14510670384084D-08
     8396s(54,39)=    0.40910022347703D-07
     8397s(55,39)=   -0.10674556987582D-07
     8398s(56,39)=    0.88658932627125D-09
     8399s(57,39)=    0.11712834589807D-07
     8400s(58,39)=    0.27155416083045D-07
     8401s(59,39)=    0.22173455156329D-07
     8402s(60,39)=   -0.47702136132581D-07
     8403s(61,39)=   -0.81528797843478D-08
     8404s(62,39)=    0.31748754541902D-07
     8405s(63,39)=    0.32090501264960D-07
     8406s(64,39)=   -0.25061816495101D-07
     8407s(65,39)=   -0.29457360270732D-08
     8408s(66,39)=   -0.72222793814467D-08
     8409s(67,39)=   -0.26685180842147D-07
     8410s(68,39)=   -0.28893311138220D-07
     8411s(69,39)=    0.49541153990283D-08
     8412s(70,39)=    0.20220364716010D-08
     8413s(71,39)=    0.17994294427792D-08
     8414s(72,39)=    0.38180894115193D-08
     8415s(73,39)=   -0.81797098238474D-08
     8416s(74,39)=    0.16597033668737D-07
     8417s(75,39)=    0.12839057150194D-07
     8418s(76,39)=    0.19423668585256D-08
     8419s(77,39)=    0.23922240782047D-08
     8420s(78,39)=    0.20899374431030D-07
     8421s(79,39)=    0.10939143624707D-07
     8422s(80,39)=    0.33971126423981D-07
     8423s(40,40)=    0.37633854063966D-07
     8424s(41,40)=    0.15948666943187D-06
     8425s(42,40)=    0.13930277589366D-06
     8426s(43,40)=    0.66549248594838D-07
     8427s(44,40)=    0.30909904541082D-07
     8428s(45,40)=   -0.49584762111330D-07
     8429s(46,40)=   -0.44018295076622D-07
     8430s(47,40)=    0.30405240826239D-07
     8431s(48,40)=   -0.39008575624906D-07
     8432s(49,40)=   -0.43461828371225D-07
     8433s(50,40)=   -0.22996589710628D-07
     8434s(51,40)=    0.21230992940219D-08
     8435s(52,40)=    0.25943906999772D-07
     8436s(53,40)=   -0.36429058564067D-08
     8437s(54,40)=   -0.67648234541438D-08
     8438s(55,40)=    0.16197265528847D-08
     8439s(56,40)=    0.15403161449800D-07
     8440s(57,40)=    0.24091423149443D-07
     8441s(58,40)=   -0.25958650400231D-07
     8442s(59,40)=   -0.30090295714212D-07
     8443s(60,40)=    0.22328902928061D-07
     8444s(61,40)=    0.87894198549764D-08
     8445s(62,40)=    0.16722121284547D-07
     8446s(63,40)=    0.24822384736756D-08
     8447s(64,40)=   -0.13224757347678D-07
     8448s(65,40)=   -0.15709124253837D-07
     8449s(66,40)=    0.33822511715929D-08
     8450s(67,40)=   -0.51688211527445D-08
     8451s(68,40)=    0.10228655575234D-08
     8452s(69,40)=   -0.84616272515865D-08
     8453s(70,40)=   -0.14335359703049D-07
     8454s(71,40)=    0.10305188346012D-07
     8455s(72,40)=   -0.17198291224937D-07
     8456s(73,40)=    0.14138217077587D-07
     8457s(74,40)=    0.88432263233331D-08
     8458s(75,40)=   -0.51690588014883D-09
     8459s(76,40)=    0.70026887954992D-08
     8460s(77,40)=   -0.63782994128776D-08
     8461s(78,40)=   -0.72332619059323D-09
     8462s(79,40)=   -0.42733879792314D-08
     8463s(80,40)=   -0.53694026424618D-08
     8464s(41,41)=    0.16361583052024D-06
     8465s(42,41)=   -0.14270106868287D-06
     8466s(43,41)=   -0.21622197626879D-07
     8467s(44,41)=   -0.63359839274286D-07
     8468s(45,41)=   -0.13327859682953D-06
     8469s(46,41)=   -0.69118344660528D-07
     8470s(47,41)=    0.55641732790067D-07
     8471s(48,41)=    0.48222948428843D-08
     8472s(49,41)=    0.94428120484847D-08
     8473s(50,41)=    0.88766067357840D-08
     8474s(51,41)=   -0.42503796506277D-07
     8475s(52,41)=   -0.72736915711942D-07
     8476s(53,41)=    0.48149716729819D-07
     8477s(54,41)=    0.54294075001544D-07
     8478s(55,41)=   -0.29081387916231D-07
     8479s(56,41)=   -0.38764691292697D-07
     8480s(57,41)=    0.22870772994382D-08
     8481s(58,41)=    0.54967585178154D-08
     8482s(59,41)=    0.73958775748365D-08
     8483s(60,41)=    0.17255365571717D-08
     8484s(61,41)=   -0.31948069897762D-07
     8485s(62,41)=    0.97542386001343D-08
     8486s(63,41)=    0.28835943902525D-07
     8487s(64,41)=    0.10094744488281D-07
     8488s(65,41)=   -0.33852368620708D-08
     8489s(66,41)=   -0.15899017687540D-07
     8490s(67,41)=   -0.77570233005493D-08
     8491s(68,41)=   -0.89675282337751D-08
     8492s(69,41)=   -0.10455947048287D-07
     8493s(70,41)=    0.12388769941907D-07
     8494s(71,41)=    0.15698764962763D-07
     8495s(72,41)=   -0.36472860036889D-08
     8496s(73,41)=    0.79706161045882D-08
     8497s(74,41)=    0.28522677490986D-08
     8498s(75,41)=   -0.31802752389756D-08
     8499s(76,41)=   -0.48429000222026D-08
     8500s(77,41)=    0.11117759385866D-07
     8501s(78,41)=    0.57121298774040D-08
     8502s(79,41)=    0.55007918672074D-08
     8503s(80,41)=    0.10741095553646D-07
     8504s(42,42)=   -0.94068189248922D-07
     8505s(43,42)=   -0.78475574428159D-07
     8506s(44,42)=   -0.21291124423595D-07
     8507s(45,42)=    0.72712292796957D-07
     8508s(46,42)=    0.15721274969429D-06
     8509s(47,42)=    0.58508120683539D-07
     8510s(48,42)=    0.50802973859490D-07
     8511s(49,42)=   -0.12163182901950D-07
     8512s(50,42)=   -0.48060046663381D-07
     8513s(51,42)=    0.21016277449898D-07
     8514s(52,42)=    0.70639423628635D-07
     8515s(53,42)=   -0.13442592402474D-07
     8516s(54,42)=   -0.68730543364773D-07
     8517s(55,42)=   -0.26145802044600D-07
     8518s(56,42)=    0.52023033546749D-07
     8519s(57,42)=    0.55216866997477D-07
     8520s(58,42)=   -0.89221508510052D-09
     8521s(59,42)=   -0.28969136741613D-07
     8522s(60,42)=   -0.47262881525008D-08
     8523s(61,42)=    0.49644823278567D-08
     8524s(62,42)=    0.14674788264441D-07
     8525s(63,42)=   -0.13846385454179D-07
     8526s(64,42)=   -0.14302505306491D-07
     8527s(65,42)=    0.24585348266529D-08
     8528s(66,42)=   -0.19036969477211D-07
     8529s(67,42)=    0.19388854163557D-07
     8530s(68,42)=    0.28229706002095D-07
     8531s(69,42)=   -0.47726239636899D-08
     8532s(70,42)=   -0.14550935657971D-07
     8533s(71,42)=    0.49995071977586D-08
     8534s(72,42)=    0.14730620563668D-07
     8535s(73,42)=   -0.19699606456276D-07
     8536s(74,42)=    0.45987930383571D-08
     8537s(75,42)=   -0.12764967951112D-07
     8538s(76,42)=   -0.65963694759358D-08
     8539s(77,42)=    0.13145141507264D-08
     8540s(78,42)=   -0.13092518502489D-07
     8541s(79,42)=    0.22064865780193D-07
     8542s(80,42)=   -0.24244728742283D-07
     8543s(43,43)=   -0.17175615617360D-07
     8544s(44,43)=    0.10258719927514D-06
     8545s(45,43)=   -0.93605270868609D-07
     8546s(46,43)=   -0.29653575732994D-07
     8547s(47,43)=    0.27866959534308D-07
     8548s(48,43)=   -0.67860105464752D-08
     8549s(49,43)=   -0.79717452180601D-07
     8550s(50,43)=    0.17773008164420D-07
     8551s(51,43)=    0.78598952090166D-08
     8552s(52,43)=   -0.57943976379675D-07
     8553s(53,43)=    0.23321268480130D-07
     8554s(54,43)=    0.62760408057170D-07
     8555s(55,43)=   -0.20315736754032D-07
     8556s(56,43)=   -0.50337164678803D-07
     8557s(57,43)=   -0.88098873811898D-08
     8558s(58,43)=   -0.20279041166094D-07
     8559s(59,43)=   -0.18403190307266D-07
     8560s(60,43)=    0.14374202707386D-07
     8561s(61,43)=   -0.39945112984150D-07
     8562s(62,43)=   -0.25125706256732D-07
     8563s(63,43)=    0.11054654858016D-07
     8564s(64,43)=    0.60269555058883D-08
     8565s(65,43)=   -0.13495157784041D-07
     8566s(66,43)=   -0.87315372152658D-08
     8567s(67,43)=    0.12785861073393D-07
     8568s(68,43)=    0.17894615605784D-07
     8569s(69,43)=    0.79559030798355D-08
     8570s(70,43)=   -0.17732617097839D-07
     8571s(71,43)=   -0.25969192658430D-07
     8572s(72,43)=    0.10460427938408D-07
     8573s(73,43)=   -0.25004808857820D-07
     8574s(74,43)=   -0.63896670164526D-08
     8575s(75,43)=    0.51701135999391D-08
     8576s(76,43)=   -0.21221841431201D-08
     8577s(77,43)=    0.11158689146173D-07
     8578s(78,43)=    0.18183513032212D-07
     8579s(79,43)=   -0.22844797597350D-07
     8580s(80,43)=    0.14056355185349D-07
     8581s(44,44)=    0.19649743701830D-06
     8582s(45,44)=   -0.57499258737927D-08
     8583s(46,44)=    0.52681752369751D-07
     8584s(47,44)=   -0.17819888430494D-08
     8585s(48,44)=   -0.14807072952223D-06
     8586s(49,44)=   -0.48971146987035D-07
     8587s(50,44)=    0.50108159887150D-07
     8588s(51,44)=    0.19588526493264D-07
     8589s(52,44)=    0.32170405238601D-07
     8590s(53,44)=    0.65214326301844D-08
     8591s(54,44)=   -0.64208210163437D-07
     8592s(55,44)=   -0.22741537933769D-07
     8593s(56,44)=    0.75815480934254D-07
     8594s(57,44)=    0.23262449193373D-07
     8595s(58,44)=    0.17883947143873D-08
     8596s(59,44)=   -0.36630210562996D-07
     8597s(60,44)=   -0.35269048564885D-07
     8598s(61,44)=    0.46518011697369D-07
     8599s(62,44)=   -0.75934903981466D-09
     8600s(63,44)=   -0.84924522238898D-07
     8601s(64,44)=    0.70285558573001D-07
     8602s(65,44)=    0.38084206122098D-07
     8603s(66,44)=   -0.55269253309188D-07
     8604s(67,44)=    0.47795929245733D-07
     8605s(68,44)=    0.10429536893844D-07
     8606s(69,44)=   -0.39285221715527D-07
     8607s(70,44)=   -0.15979873468228D-07
     8608s(71,44)=    0.70623045381242D-08
     8609s(72,44)=   -0.28306028666131D-07
     8610s(73,44)=   -0.20005201856888D-07
     8611s(74,44)=    0.18800919344200D-07
     8612s(75,44)=   -0.28527082293398D-07
     8613s(76,44)=    0.38386032796612D-07
     8614s(77,44)=   -0.38906574388033D-08
     8615s(78,44)=    0.45375767288144D-08
     8616s(79,44)=    0.56513112459831D-07
     8617s(80,44)=   -0.19255397328033D-07
     8618s(45,45)=   -0.10865082700048D-06
     8619s(46,45)=    0.22449081799764D-07
     8620s(47,45)=    0.11452550163554D-07
     8621s(48,45)=    0.71124305689779D-07
     8622s(49,45)=    0.52740137523616D-07
     8623s(50,45)=    0.13691364917273D-07
     8624s(51,45)=   -0.92681462753584D-08
     8625s(52,45)=   -0.41161019223283D-07
     8626s(53,45)=   -0.17672853921607D-07
     8627s(54,45)=    0.18050146388353D-07
     8628s(55,45)=    0.25155932496392D-07
     8629s(56,45)=   -0.82071719711664D-08
     8630s(57,45)=   -0.36716978291219D-07
     8631s(58,45)=   -0.15962763701682D-07
     8632s(59,45)=    0.20212472566845D-07
     8633s(60,45)=    0.36085656631687D-07
     8634s(61,45)=   -0.62079380929853D-08
     8635s(62,45)=    0.61419783719518D-08
     8636s(63,45)=    0.84355508741461D-08
     8637s(64,45)=   -0.75785809211492D-08
     8638s(65,45)=   -0.31540365747449D-08
     8639s(66,45)=    0.13059243935779D-07
     8640s(67,45)=    0.26074913879975D-07
     8641s(68,45)=    0.28232459150081D-08
     8642s(69,45)=   -0.26158484508234D-08
     8643s(70,45)=   -0.23761634344636D-08
     8644s(71,45)=    0.10813245864093D-07
     8645s(72,45)=    0.33671248775672D-07
     8646s(73,45)=    0.25201712831274D-07
     8647s(74,45)=    0.46237802256802D-08
     8648s(75,45)=    0.13216404078551D-07
     8649s(76,45)=    0.14791030326728D-08
     8650s(77,45)=    0.20800712258151D-07
     8651s(78,45)=   -0.23900170752781D-08
     8652s(79,45)=    0.13299013133179D-07
     8653s(80,45)=    0.43964054988728D-08
     8654s(46,46)=   -0.88356225965378D-07
     8655s(47,46)=   -0.64760424058702D-07
     8656s(48,46)=   -0.39826277930573D-07
     8657s(49,46)=   -0.75906935850517D-07
     8658s(50,46)=    0.98672161286397D-08
     8659s(51,46)=    0.20659809230718D-07
     8660s(52,46)=   -0.58253254250572D-07
     8661s(53,46)=   -0.39453247431162D-08
     8662s(54,46)=   -0.15453009145983D-07
     8663s(55,46)=   -0.10065623045061D-07
     8664s(56,46)=    0.64678697152750D-07
     8665s(57,46)=    0.69102225799176D-07
     8666s(58,46)=    0.12211266501667D-07
     8667s(59,46)=   -0.31701203022193D-07
     8668s(60,46)=   -0.35969777153588D-07
     8669s(61,46)=    0.11654300141702D-07
     8670s(62,46)=   -0.41135319043059D-08
     8671s(63,46)=   -0.74714099779694D-08
     8672s(64,46)=   -0.17431396789403D-08
     8673s(65,46)=   -0.32480237129338D-07
     8674s(66,46)=   -0.22636362469650D-08
     8675s(67,46)=    0.39752977211402D-07
     8676s(68,46)=   -0.41201164173970D-08
     8677s(69,46)=   -0.19071890092420D-08
     8678s(70,46)=   -0.10675912037546D-07
     8679s(71,46)=   -0.16867147025881D-07
     8680s(72,46)=    0.67612347551718D-08
     8681s(73,46)=   -0.90103490948792D-08
     8682s(74,46)=    0.57580821456753D-08
     8683s(75,46)=    0.22528547467380D-07
     8684s(76,46)=    0.19236683341946D-07
     8685s(77,46)=    0.32723809997015D-07
     8686s(78,46)=    0.15739454322480D-07
     8687s(79,46)=    0.20756800713409D-07
     8688s(80,46)=    0.21001965327917D-07
     8689s(47,47)=    0.14713449426786D-06
     8690s(48,47)=   -0.14490673119231D-07
     8691s(49,47)=    0.58241696161682D-07
     8692s(50,47)=   -0.39377256236389D-07
     8693s(51,47)=   -0.66624987073184D-07
     8694s(52,47)=   -0.15390784582860D-07
     8695s(53,47)=    0.23609855345167D-07
     8696s(54,47)=    0.31331887295154D-07
     8697s(55,47)=    0.53148542810258D-07
     8698s(56,47)=    0.56560670984931D-08
     8699s(57,47)=   -0.75416563810170D-07
     8700s(58,47)=   -0.68686622162163D-07
     8701s(59,47)=   -0.61226247817557D-08
     8702s(60,47)=    0.42852299221086D-07
     8703s(61,47)=    0.18568547550282D-07
     8704s(62,47)=   -0.11500339104735D-07
     8705s(63,47)=   -0.43090253077912D-10
     8706s(64,47)=    0.80779319148837D-08
     8707s(65,47)=    0.29102735381094D-07
     8708s(66,47)=    0.73412240002891D-08
     8709s(67,47)=   -0.14108928666898D-07
     8710s(68,47)=   -0.49923372973142D-08
     8711s(69,47)=   -0.19528244915968D-07
     8712s(70,47)=   -0.18079336718715D-07
     8713s(71,47)=   -0.17072216033032D-07
     8714s(72,47)=   -0.19817637709924D-07
     8715s(73,47)=   -0.80644078505365D-08
     8716s(74,47)=    0.15869731761828D-08
     8717s(75,47)=   -0.70347199851673D-08
     8718s(76,47)=    0.26620112804348D-07
     8719s(77,47)=    0.26024658824095D-07
     8720s(78,47)=    0.30006950515015D-07
     8721s(79,47)=    0.41591832853396D-07
     8722s(80,47)=    0.14920507656653D-07
     8723s(48,48)=   -0.85825814090879D-08
     8724s(49,48)=    0.40424701944199D-07
     8725s(50,48)=    0.27571321637424D-07
     8726s(51,48)=    0.58168004029702D-07
     8727s(52,48)=    0.39701694424485D-07
     8728s(53,48)=   -0.47797012917057D-07
     8729s(54,48)=    0.68366852961632D-08
     8730s(55,48)=   -0.29732342377243D-07
     8731s(56,48)=   -0.24298702145464D-07
     8732s(57,48)=    0.15659575360552D-07
     8733s(58,48)=   -0.10742059006886D-08
     8734s(59,48)=    0.33194866195169D-07
     8735s(60,48)=    0.34023828374198D-07
     8736s(61,48)=    0.17927001976014D-08
     8737s(62,48)=   -0.27907183126808D-07
     8738s(63,48)=   -0.13600043604844D-08
     8739s(64,48)=    0.33174845311097D-08
     8740s(65,48)=    0.57892016321730D-08
     8741s(66,48)=    0.42572312647152D-07
     8742s(67,48)=    0.26056621586498D-07
     8743s(68,48)=   -0.59818467585085D-08
     8744s(69,48)=   -0.22532828133696D-07
     8745s(70,48)=   -0.99543454356127D-08
     8746s(71,48)=   -0.69725754731765D-08
     8747s(72,48)=   -0.16967058726840D-07
     8748s(73,48)=   -0.21269195383782D-07
     8749s(74,48)=   -0.43940549399126D-08
     8750s(75,48)=   -0.22513525598338D-07
     8751s(76,48)=   -0.11404204479014D-07
     8752s(77,48)=   -0.14328969595887D-07
     8753s(78,48)=   -0.40363436125631D-07
     8754s(79,48)=    0.36945342616493D-08
     8755s(80,48)=   -0.44130987055631D-07
     8756s(49,49)=   -0.11260526377236D-06
     8757s(50,49)=   -0.10635221628594D-07
     8758s(51,49)=   -0.46731148814368D-07
     8759s(52,49)=   -0.47249561144027D-07
     8760s(53,49)=    0.47589248753034D-07
     8761s(54,49)=    0.37343882195670D-07
     8762s(55,49)=   -0.33983604958279D-08
     8763s(56,49)=    0.26655237671410D-07
     8764s(57,49)=   -0.21709226762108D-07
     8765s(58,49)=   -0.15462558454324D-07
     8766s(59,49)=    0.11967295783703D-07
     8767s(60,49)=    0.68721394585310D-07
     8768s(61,49)=    0.20059662005922D-08
     8769s(62,49)=   -0.58975984561642D-07
     8770s(63,49)=   -0.16660034054480D-09
     8771s(64,49)=    0.91325709578376D-08
     8772s(65,49)=    0.11002498982300D-07
     8773s(66,49)=   -0.22791133905585D-07
     8774s(67,49)=    0.93887282819034D-08
     8775s(68,49)=    0.66094156933658D-08
     8776s(69,49)=   -0.27007489870657D-08
     8777s(70,49)=    0.29936712231289D-07
     8778s(71,49)=    0.17294441517683D-07
     8779s(72,49)=   -0.18010949037563D-07
     8780s(73,49)=    0.18182500570283D-07
     8781s(74,49)=   -0.26102567975112D-08
     8782s(75,49)=   -0.16396642101500D-07
     8783s(76,49)=   -0.83725776177244D-08
     8784s(77,49)=   -0.57245831551524D-08
     8785s(78,49)=   -0.15982186385015D-07
     8786s(79,49)=   -0.19515174299655D-07
     8787s(80,49)=    0.99399969558361D-08
     8788s(50,50)=    0.63310931071963D-07
     8789s(51,50)=   -0.32426966034317D-07
     8790s(52,50)=    0.27758360215090D-07
     8791s(53,50)=   -0.73657968897853D-08
     8792s(54,50)=   -0.83108567351799D-07
     8793s(55,50)=    0.35777826327563D-07
     8794s(56,50)=   -0.33090782260912D-07
     8795s(57,50)=   -0.77057505632743D-09
     8796s(58,50)=    0.32552459967129D-07
     8797s(59,50)=    0.16367778009434D-07
     8798s(60,50)=   -0.50405170622168D-07
     8799s(61,50)=   -0.41804341485482D-07
     8800s(62,50)=    0.56537902950171D-08
     8801s(63,50)=   -0.31947010347959D-07
     8802s(64,50)=   -0.40373010107808D-07
     8803s(65,50)=    0.25315974135676D-07
     8804s(66,50)=    0.36806906177224D-07
     8805s(67,50)=   -0.21929380770970D-07
     8806s(68,50)=   -0.29828341034869D-07
     8807s(69,50)=   -0.48995486788422D-07
     8808s(70,50)=   -0.34696480864670D-07
     8809s(71,50)=   -0.42692532548816D-07
     8810s(72,50)=    0.13317126321926D-07
     8811s(73,50)=   -0.28270557313785D-08
     8812s(74,50)=    0.13636799004785D-07
     8813s(75,50)=    0.14139798253565D-07
     8814s(76,50)=    0.23979956644393D-07
     8815s(77,50)=    0.31689199109142D-08
     8816s(78,50)=    0.38193030778588D-07
     8817s(79,50)=    0.12136339665176D-07
     8818s(80,50)=    0.45078308829265D-07
     8819s(51,51)=    0.21036377950648D-09
     8820s(52,51)=    0.71544713892764D-07
     8821s(53,51)=    0.29826211749575D-07
     8822s(54,51)=    0.55548242411779D-07
     8823s(55,51)=    0.13136323014290D-07
     8824s(56,51)=   -0.21254117753256D-07
     8825s(57,51)=   -0.14524205674212D-07
     8826s(58,51)=   -0.88440457924637D-08
     8827s(59,51)=   -0.29418514317947D-07
     8828s(60,51)=    0.93091893442430D-08
     8829s(61,51)=    0.21319212441324D-07
     8830s(62,51)=    0.23212297956107D-08
     8831s(63,51)=   -0.15081366020778D-07
     8832s(64,51)=    0.26453080769706D-07
     8833s(65,51)=    0.45639925827969D-07
     8834s(66,51)=   -0.54163027325770D-07
     8835s(67,51)=   -0.99129065883353D-08
     8836s(68,51)=    0.10400901583623D-07
     8837s(69,51)=   -0.33509274100876D-08
     8838s(70,51)=   -0.38675690405383D-07
     8839s(71,51)=    0.75392364674283D-08
     8840s(72,51)=    0.26504284412249D-08
     8841s(73,51)=    0.18874294804081D-07
     8842s(74,51)=    0.18106664634767D-07
     8843s(75,51)=    0.35138122344854D-07
     8844s(76,51)=    0.18575295478563D-07
     8845s(77,51)=    0.15983899109469D-07
     8846s(78,51)=    0.24893470078327D-07
     8847s(79,51)=    0.33685374825783D-08
     8848s(80,51)=    0.34671956334330D-07
     8849s(52,52)=   -0.70651930540011D-07
     8850s(53,52)=   -0.41950384236510D-07
     8851s(54,52)=   -0.33194791172937D-07
     8852s(55,52)=   -0.39405376929366D-07
     8853s(56,52)=   -0.25413271840269D-07
     8854s(57,52)=    0.42567249395159D-07
     8855s(58,52)=    0.68249763828673D-07
     8856s(59,52)=    0.39070291708969D-07
     8857s(60,52)=   -0.12569698684176D-07
     8858s(61,52)=   -0.45417003465732D-07
     8859s(62,52)=    0.37861444823120D-07
     8860s(63,52)=   -0.16508195158349D-07
     8861s(64,52)=   -0.52838568901772D-07
     8862s(65,52)=   -0.13031666041770D-07
     8863s(66,52)=    0.88823811106077D-08
     8864s(67,52)=    0.99335228524426D-08
     8865s(68,52)=   -0.38245337922748D-07
     8866s(69,52)=   -0.20037012000485D-07
     8867s(70,52)=   -0.15952667327445D-07
     8868s(71,52)=   -0.30878355546525D-07
     8869s(72,52)=    0.49328447297288D-08
     8870s(73,52)=   -0.25137219351314D-08
     8871s(74,52)=   -0.26317381627957D-07
     8872s(75,52)=   -0.10197093108605D-07
     8873s(76,52)=   -0.28128754088150D-07
     8874s(77,52)=    0.20995695694403D-07
     8875s(78,52)=   -0.26561726441059D-07
     8876s(79,52)=    0.11886220694607D-07
     8877s(80,52)=    0.17753071244395D-07
     8878s(53,53)=    0.97962180638267D-08
     8879s(54,53)=   -0.45183423878581D-07
     8880s(55,53)=   -0.48324882271015D-08
     8881s(56,53)=   -0.34896744810624D-07
     8882s(57,53)=   -0.23690015587009D-07
     8883s(58,53)=    0.38747326759476D-07
     8884s(59,53)=    0.13113418525450D-07
     8885s(60,53)=    0.33962232603379D-08
     8886s(61,53)=   -0.15142561871763D-08
     8887s(62,53)=   -0.38150568764116D-08
     8888s(63,53)=    0.32246974551838D-08
     8889s(64,53)=    0.16024365607515D-07
     8890s(65,53)=   -0.89546432656164D-08
     8891s(66,53)=    0.10225322836894D-08
     8892s(67,53)=   -0.17315652243658D-09
     8893s(68,53)=   -0.27938667603040D-07
     8894s(69,53)=   -0.12245001428012D-08
     8895s(70,53)=    0.25485633978499D-08
     8896s(71,53)=   -0.26784892522196D-07
     8897s(72,53)=   -0.15376969443526D-07
     8898s(73,53)=    0.11406429223802D-07
     8899s(74,53)=    0.53529327504560D-08
     8900s(75,53)=    0.10681455381125D-07
     8901s(76,53)=    0.83390598556217D-08
     8902s(77,53)=    0.19510573348420D-07
     8903s(78,53)=    0.21111791659573D-07
     8904s(79,53)=    0.27664945312980D-07
     8905s(80,53)=    0.26483685256207D-07
     8906s(54,54)=    0.47513077720641D-07
     8907s(55,54)=    0.69657504196109D-07
     8908s(56,54)=    0.65192698677921D-08
     8909s(57,54)=    0.71003456137054D-07
     8910s(58,54)=    0.23737682516615D-07
     8911s(59,54)=   -0.51609046219115D-07
     8912s(60,54)=   -0.34218740125708D-08
     8913s(61,54)=    0.29132938123487D-07
     8914s(62,54)=    0.57302906541253D-08
     8915s(63,54)=   -0.12238570956267D-07
     8916s(64,54)=   -0.19117351656598D-07
     8917s(65,54)=   -0.12367589994689D-07
     8918s(66,54)=   -0.33864393915753D-07
     8919s(67,54)=    0.80448539923812D-08
     8920s(68,54)=   -0.71081539754366D-09
     8921s(69,54)=   -0.40972477236838D-07
     8922s(70,54)=    0.10061847376392D-07
     8923s(71,54)=    0.71702987132682D-08
     8924s(72,54)=    0.15580346865279D-07
     8925s(73,54)=    0.12406339655761D-07
     8926s(74,54)=    0.22252425626581D-07
     8927s(75,54)=    0.22043889058061D-07
     8928s(76,54)=    0.27329153380725D-07
     8929s(77,54)=    0.32570864320265D-07
     8930s(78,54)=    0.32754415245410D-07
     8931s(79,54)=    0.37315320924442D-07
     8932s(80,54)=    0.21477785942637D-07
     8933s(55,55)=   -0.54398801812038D-07
     8934s(56,55)=   -0.66889995585568D-08
     8935s(57,55)=   -0.21058372235604D-07
     8936s(58,55)=    0.37081685359186D-08
     8937s(59,55)=    0.71654115252569D-08
     8938s(60,55)=   -0.17916046801929D-07
     8939s(61,55)=    0.13295320170212D-08
     8940s(62,55)=    0.21185601523102D-07
     8941s(63,55)=    0.37634078455465D-08
     8942s(64,55)=   -0.13822363141095D-07
     8943s(65,55)=    0.47425549068940D-08
     8944s(66,55)=   -0.11252877422222D-07
     8945s(67,55)=   -0.19606476005546D-07
     8946s(68,55)=   -0.11798201001951D-07
     8947s(69,55)=    0.35865636994739D-08
     8948s(70,55)=   -0.10121100056996D-07
     8949s(71,55)=   -0.74298850862301D-08
     8950s(72,55)=    0.13196373038602D-07
     8951s(73,55)=    0.84763716554278D-08
     8952s(74,55)=    0.16066201576666D-07
     8953s(75,55)=    0.39494115243290D-07
     8954s(76,55)=    0.97091141641524D-09
     8955s(77,55)=    0.37145136854224D-07
     8956s(78,55)=    0.18199323664616D-07
     8957s(79,55)=    0.29703556083206D-07
     8958s(80,55)=    0.26213441306470D-07
     8959s(56,56)=    0.62867991403506D-07
     8960s(57,56)=   -0.10499416242556D-06
     8961s(58,56)=   -0.82067734075627D-09
     8962s(59,56)=    0.23715074606582D-08
     8963s(60,56)=   -0.29945665088491D-07
     8964s(61,56)=    0.64656896720423D-07
     8965s(62,56)=    0.27965100961512D-07
     8966s(63,56)=   -0.49862906019927D-07
     8967s(64,56)=   -0.68567957419056D-08
     8968s(65,56)=    0.10491020009097D-07
     8969s(66,56)=    0.83354258331501D-08
     8970s(67,56)=    0.24779337805287D-07
     8971s(68,56)=    0.15281431067374D-07
     8972s(69,56)=   -0.10231918583867D-07
     8973s(70,56)=   -0.41218471396085D-07
     8974s(71,56)=    0.11789407325687D-07
     8975s(72,56)=   -0.14359946183020D-07
     8976s(73,56)=   -0.17711757980606D-07
     8977s(74,56)=   -0.63020580377855D-08
     8978s(75,56)=   -0.31543715348339D-07
     8979s(76,56)=   -0.24275167790506D-07
     8980s(77,56)=   -0.15141392099067D-07
     8981s(78,56)=   -0.81947242971175D-08
     8982s(79,56)=   -0.10894082730477D-07
     8983s(80,56)=    0.12019962018137D-07
     8984s(57,57)=    0.59397751117806D-07
     8985s(58,57)=    0.59131586715798D-07
     8986s(59,57)=   -0.23803196729421D-07
     8987s(60,57)=   -0.85821146174170D-08
     8988s(61,57)=    0.22187588995930D-07
     8989s(62,57)=   -0.81106326561042D-09
     8990s(63,57)=   -0.47795036028833D-07
     8991s(64,57)=    0.29029196654898D-07
     8992s(65,57)=    0.30446553284565D-08
     8993s(66,57)=   -0.69944760388023D-08
     8994s(67,57)=   -0.37134178308185D-07
     8995s(68,57)=   -0.66037981229570D-08
     8996s(69,57)=   -0.82272540097335D-09
     8997s(70,57)=   -0.30806810457634D-07
     8998s(71,57)=   -0.53033059572942D-08
     8999s(72,57)=   -0.97638239605025D-08
     9000s(73,57)=   -0.13427624432836D-08
     9001s(74,57)=   -0.57168157396985D-08
     9002s(75,57)=   -0.48107615558298D-08
     9003s(76,57)=    0.10473602200356D-07
     9004s(77,57)=   -0.17519450355493D-07
     9005s(78,57)=    0.19487549535547D-07
     9006s(79,57)=   -0.19116598372942D-08
     9007s(80,57)=    0.17285407211804D-07
     9008s(58,58)=   -0.66548671848599D-07
     9009s(59,58)=    0.63395712510760D-07
     9010s(60,58)=    0.52290763405760D-07
     9011s(61,58)=   -0.16021621469904D-08
     9012s(62,58)=    0.51950671773504D-08
     9013s(63,58)=   -0.76078998983895D-07
     9014s(64,58)=   -0.57436902457982D-07
     9015s(65,58)=    0.17272421765174D-09
     9016s(66,58)=   -0.77008978846624D-08
     9017s(67,58)=    0.99101754211039D-08
     9018s(68,58)=   -0.92143342790256D-08
     9019s(69,58)=    0.58096749493959D-08
     9020s(70,58)=    0.27298999535042D-08
     9021s(71,58)=    0.11267532846781D-07
     9022s(72,58)=    0.22042424604763D-07
     9023s(73,58)=    0.15132827763681D-07
     9024s(74,58)=    0.24075334526329D-09
     9025s(75,58)=   -0.19292540048521D-07
     9026s(76,58)=   -0.11267257099437D-07
     9027s(77,58)=   -0.11102199313804D-08
     9028s(78,58)=   -0.17385969304236D-07
     9029s(79,58)=   -0.22510357135488D-07
     9030s(80,58)=    0.12383489683129D-07
     9031s(59,59)=    0.11992279747726D-07
     9032s(60,59)=   -0.67555608702795D-07
     9033s(61,59)=    0.35146698133389D-07
     9034s(62,59)=    0.72605128314059D-08
     9035s(63,59)=    0.15792666009731D-07
     9036s(64,59)=    0.46736651429319D-07
     9037s(65,59)=   -0.89443881475131D-08
     9038s(66,59)=   -0.17133916471255D-07
     9039s(67,59)=    0.16914786297516D-07
     9040s(68,59)=   -0.32717129405300D-07
     9041s(69,59)=   -0.78943031116755D-08
     9042s(70,59)=   -0.27967469760782D-07
     9043s(71,59)=    0.60310276155845D-08
     9044s(72,59)=    0.14975836860358D-07
     9045s(73,59)=   -0.11638995483247D-07
     9046s(74,59)=   -0.55780076970927D-08
     9047s(75,59)=    0.17748789793816D-07
     9048s(76,59)=    0.14157337242762D-08
     9049s(77,59)=   -0.25127423122844D-07
     9050s(78,59)=    0.31117970326567D-07
     9051s(79,59)=   -0.71570880714313D-07
     9052s(80,59)=    0.54507766391812D-07
     9053s(60,60)=    0.33806073951768D-07
     9054s(61,60)=    0.10314740165104D-07
     9055s(62,60)=   -0.37478064741543D-07
     9056s(63,60)=   -0.34252775468114D-07
     9057s(64,60)=    0.48642575011430D-08
     9058s(65,60)=    0.77230576340196D-08
     9059s(66,60)=    0.70295432867863D-08
     9060s(67,60)=    0.55957228805018D-08
     9061s(68,60)=   -0.20126527793621D-07
     9062s(69,60)=    0.63914199971802D-08
     9063s(70,60)=    0.34074235087432D-08
     9064s(71,60)=    0.49656381631242D-08
     9065s(72,60)=    0.28421693627136D-07
     9066s(73,60)=    0.98889600397305D-08
     9067s(74,60)=    0.17917471647633D-07
     9068s(75,60)=    0.11360752022602D-07
     9069s(76,60)=    0.96148498384901D-08
     9070s(77,60)=    0.23931814635793D-08
     9071s(78,60)=    0.79182961499720D-08
     9072s(79,60)=   -0.13685622855363D-08
     9073s(80,60)=    0.28073495024369D-07
     9074s(61,61)=   -0.41407423035897D-07
     9075s(62,61)=    0.55979029634436D-07
     9076s(63,61)=    0.25829311090826D-07
     9077s(64,61)=    0.10619620266283D-09
     9078s(65,61)=   -0.17222850065129D-07
     9079s(66,61)=   -0.66553701157538D-07
     9080s(67,61)=    0.13121462219590D-07
     9081s(68,61)=   -0.17207105471159D-07
     9082s(69,61)=   -0.77984903301220D-08
     9083s(70,61)=    0.60514850047506D-07
     9084s(71,61)=    0.20293526490478D-07
     9085s(72,61)=    0.14539943854966D-07
     9086s(73,61)=    0.23092662969080D-09
     9087s(74,61)=    0.30129310624357D-07
     9088s(75,61)=    0.73560537701318D-08
     9089s(76,61)=   -0.61566914554130D-08
     9090s(77,61)=   -0.37151541335308D-07
     9091s(78,61)=   -0.36254812177093D-07
     9092s(79,61)=   -0.14577961521528D-07
     9093s(80,61)=   -0.68865787626503D-07
     9094s(62,62)=   -0.31215048975304D-07
     9095s(63,62)=   -0.16628989592644D-07
     9096s(64,62)=   -0.63131986269691D-09
     9097s(65,62)=    0.24720488679536D-07
     9098s(66,62)=    0.28429277587590D-07
     9099s(67,62)=    0.33906855794909D-07
     9100s(68,62)=    0.17720872432398D-07
     9101s(69,62)=   -0.18494273870061D-07
     9102s(70,62)=    0.12648422962005D-07
     9103s(71,62)=    0.25810442308041D-07
     9104s(72,62)=    0.16440552812412D-07
     9105s(73,62)=    0.47745083076850D-07
     9106s(74,62)=   -0.13048173614386D-07
     9107s(75,62)=    0.96979252154748D-08
     9108s(76,62)=    0.37706894171804D-07
     9109s(77,62)=   -0.17925278771155D-07
     9110s(78,62)=    0.36200148328791D-07
     9111s(79,62)=   -0.15225954817015D-07
     9112s(80,62)=    0.26744454027209D-07
     9113s(63,63)=   -0.22558645110680D-08
     9114s(64,63)=   -0.49151193940631D-08
     9115s(65,63)=   -0.39402932663715D-07
     9116s(66,63)=   -0.46036703667575D-07
     9117s(67,63)=   -0.20977839121650D-07
     9118s(68,63)=    0.16002110773293D-07
     9119s(69,63)=   -0.12683397255976D-07
     9120s(70,63)=    0.17657362300959D-08
     9121s(71,63)=   -0.15143763158202D-07
     9122s(72,63)=   -0.30101354549422D-07
     9123s(73,63)=    0.10328233855826D-08
     9124s(74,63)=   -0.11458505549840D-07
     9125s(75,63)=   -0.60474192455122D-08
     9126s(76,63)=   -0.16121389244904D-08
     9127s(77,63)=   -0.53676492634261D-09
     9128s(78,63)=    0.13707435993822D-07
     9129s(79,63)=   -0.14249148783387D-07
     9130s(80,63)=    0.49464024873434D-07
     9131s(64,64)=   -0.87127007987508D-08
     9132s(65,64)=    0.45115224024110D-08
     9133s(66,64)=    0.37998742533734D-07
     9134s(67,64)=    0.37513599916173D-07
     9135s(68,64)=   -0.56026408905094D-08
     9136s(69,64)=   -0.27550665136848D-07
     9137s(70,64)=   -0.41030973914308D-07
     9138s(71,64)=    0.61569852234094D-08
     9139s(72,64)=    0.16205387444015D-07
     9140s(73,64)=    0.68623221548350D-08
     9141s(74,64)=   -0.19499253018975D-07
     9142s(75,64)=    0.22039916029745D-07
     9143s(76,64)=    0.12512336543455D-07
     9144s(77,64)=    0.10273752680108D-08
     9145s(78,64)=    0.42106957858973D-07
     9146s(79,64)=   -0.53641252498077D-08
     9147s(80,64)=    0.31671170597039D-07
     9148s(65,65)=   -0.86154990439638D-08
     9149s(66,65)=   -0.13856725505752D-07
     9150s(67,65)=    0.61620647865604D-07
     9151s(68,65)=    0.11049275161977D-07
     9152s(69,65)=   -0.48761580928671D-08
     9153s(70,65)=    0.29630825455903D-07
     9154s(71,65)=    0.19096852773588D-08
     9155s(72,65)=   -0.64028481933194D-08
     9156s(73,65)=    0.26046180016634D-07
     9157s(74,65)=    0.41200616073616D-08
     9158s(75,65)=   -0.50220689549103D-08
     9159s(76,65)=    0.40170494053698D-09
     9160s(77,65)=   -0.13684208231148D-07
     9161s(78,65)=    0.17683956031768D-08
     9162s(79,65)=   -0.34641154618707D-07
     9163s(80,65)=    0.45758113500030D-07
     9164s(66,66)=    0.38291404049821D-07
     9165s(67,66)=   -0.53098489196634D-07
     9166s(68,66)=   -0.58400680212276D-07
     9167s(69,66)=   -0.26152182582589D-07
     9168s(70,66)=   -0.14540154170139D-07
     9169s(71,66)=   -0.30976964233253D-07
     9170s(72,66)=   -0.32977526416183D-08
     9171s(73,66)=   -0.14845165931176D-07
     9172s(74,66)=   -0.89271052657336D-08
     9173s(75,66)=   -0.35245788463029D-07
     9174s(76,66)=   -0.50100770484762D-07
     9175s(77,66)=   -0.71556364263464D-08
     9176s(78,66)=   -0.36334712997025D-07
     9177s(79,66)=   -0.58207980725588D-07
     9178s(80,66)=    0.89675259412812D-08
     9179s(67,67)=    0.30399187730913D-07
     9180s(68,67)=   -0.36782955347181D-07
     9181s(69,67)=   -0.13394025889653D-07
     9182s(70,67)=    0.27411801870785D-07
     9183s(71,67)=   -0.30025299874283D-07
     9184s(72,67)=   -0.79953714271451D-08
     9185s(73,67)=    0.46236008509558D-07
     9186s(74,67)=   -0.26169940270101D-07
     9187s(75,67)=    0.20961793125776D-07
     9188s(76,67)=   -0.68893632994121D-07
     9189s(77,67)=   -0.27660409661774D-07
     9190s(78,67)=   -0.73197636664678D-07
     9191s(79,67)=   -0.10205753070715D-06
     9192s(80,67)=    0.14902266951516D-07
     9193s(68,68)=   -0.31480609254161D-07
     9194s(69,68)=    0.13384874521102D-07
     9195s(70,68)=    0.77155956538291D-07
     9196s(71,68)=   -0.66866541422553D-08
     9197s(72,68)=   -0.31147076800038D-07
     9198s(73,68)=    0.13639437365475D-07
     9199s(74,68)=   -0.43860203396215D-07
     9200s(75,68)=   -0.49178247117405D-07
     9201s(76,68)=   -0.26699372673611D-07
     9202s(77,68)=   -0.67382415045807D-08
     9203s(78,68)=    0.14412917377966D-08
     9204s(79,68)=    0.48342457723864D-08
     9205s(80,68)=    0.17390883601169D-07
     9206s(69,69)=   -0.13798990953075D-07
     9207s(70,69)=    0.39375140480278D-07
     9208s(71,69)=   -0.34762758993926D-07
     9209s(72,69)=   -0.27182018774016D-07
     9210s(73,69)=   -0.38370797062333D-08
     9211s(74,69)=   -0.36338066725225D-08
     9212s(75,69)=   -0.15205391846379D-07
     9213s(76,69)=    0.12763287796531D-07
     9214s(77,69)=   -0.11792058947694D-08
     9215s(78,69)=    0.33239509418844D-07
     9216s(79,69)=   -0.10252760607483D-07
     9217s(80,69)=    0.30007375851130D-07
     9218s(70,70)=   -0.42747259376631D-08
     9219s(71,70)=    0.58453055678280D-07
     9220s(72,70)=   -0.35390991644398D-07
     9221s(73,70)=    0.51806667480987D-08
     9222s(74,70)=    0.88448286469802D-08
     9223s(75,70)=   -0.11810715988298D-07
     9224s(76,70)=    0.10938269758611D-07
     9225s(77,70)=    0.23304378325923D-07
     9226s(78,70)=   -0.19234121923198D-07
     9227s(79,70)=    0.21629308852771D-07
     9228s(80,70)=   -0.14769034041885D-07
     9229s(71,71)=    0.19811987374229D-07
     9230s(72,71)=   -0.32001567638459D-07
     9231s(73,71)=    0.16854298985710D-07
     9232s(74,71)=    0.10196641563199D-07
     9233s(75,71)=    0.48703440603701D-08
     9234s(76,71)=    0.11880687702064D-08
     9235s(77,71)=   -0.30652418851886D-07
     9236s(78,71)=   -0.18887828748998D-07
     9237s(79,71)=   -0.30638177018873D-07
     9238s(80,71)=   -0.45786303998232D-07
     9239s(72,72)=    0.14619987101331D-07
     9240s(73,72)=   -0.28385543652245D-08
     9241s(74,72)=    0.20754818105081D-07
     9242s(75,72)=    0.91782741587554D-09
     9243s(76,72)=   -0.11348075853818D-07
     9244s(77,72)=   -0.16743464096756D-07
     9245s(78,72)=   -0.21718438590062D-07
     9246s(79,72)=    0.19282431527263D-07
     9247s(80,72)=   -0.18371376363970D-07
     9248s(73,73)=    0.28162386123265D-08
     9249s(74,73)=   -0.11088863947687D-07
     9250s(75,73)=    0.44883608270606D-08
     9251s(76,73)=   -0.10342902486516D-07
     9252s(77,73)=   -0.20982837873543D-07
     9253s(78,73)=   -0.44623528381893D-08
     9254s(79,73)=   -0.29457122452921D-07
     9255s(80,73)=    0.16518231847476D-07
     9256s(74,74)=   -0.90679068924709D-07
     9257s(75,74)=    0.11943656675702D-07
     9258s(76,74)=   -0.12287476815057D-07
     9259s(77,74)=   -0.86534126471312D-08
     9260s(78,74)=   -0.36699382529634D-07
     9261s(79,74)=    0.39699432381805D-07
     9262s(80,74)=    0.90511319573331D-08
     9263s(75,75)=    0.38068956857789D-08
     9264s(76,75)=   -0.11022066868994D-07
     9265s(77,75)=   -0.66351939341889D-08
     9266s(78,75)=    0.84753383878959D-08
     9267s(79,75)=    0.34003428729587D-07
     9268s(80,75)=    0.45474580203248D-08
     9269s(76,76)=   -0.47755842568499D-07
     9270s(77,76)=   -0.31455773211009D-07
     9271s(78,76)=   -0.12677631609515D-06
     9272s(79,76)=    0.75135393078467D-07
     9273s(80,76)=    0.29637278271697D-07
     9274s(77,77)=   -0.28273200616638D-07
     9275s(78,77)=   -0.30006709911530D-07
     9276s(79,77)=   -0.46078138454365D-07
     9277s(80,77)=    0.47083765379289D-07
     9278s(78,78)=   -0.27390694608716D-07
     9279s(79,78)=    0.10101212031673D-07
     9280s(80,78)=   -0.77640066465978D-07
     9281s(79,79)=    0.64488227584258D-07
     9282s(80,79)=   -0.72740512544236D-08
     9283s(80,80)=   -0.19642737190084D-07
     9284
     9285!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
     9286
     9287        r = 3396000.d0 !  MOLA potential surface
     9288        xi = ae/r
     9289        m=0
     9290        x=0.
     9291        sum=0.
     9292        call lgndr(lmax,m,x,plm,root)
     9293        do l=2, lmax
     9294          sum = sum + c(l,m) *xi**l *plm(l-m+1)
     9295        enddo
     9296        sum = sum+1.
     9297! centrifugal potential
     9298        v0=(gm*sum/r + 0.5*omega**2 * r**2)
     9299!       write(out,*)'v0=', v0
     9300        return
     9301
     9302end subroutine areoid_ini
     9303
     9304!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
     9305
     9306
     9307        subroutine geoid(dlon,dlat,rg)
     9308! marsgeoid.f
     9309! calculate radii of surface of constant gravity potential on rotating body
     9310! given spherical harmonic potential of body at lat,lon,elevation
     9311!
     9312! W = V +Phi = gm/r [1+ (R/r)**n [harmonics]] -1/2 omega**2 r**2
     9313
     9314        implicit none
     9315
     9316        double precision dlon,dlat
     9317        double precision rg
     9318       
     9319        double precision pi,d2r
     9320        parameter (pi=3.141592653589792D0, d2r=pi/180.d0)
     9321! data structure of gravity field
     9322        integer ndeg,ndeg1,ndeg2,nd2p3
     9323        parameter (ndeg=90,ndeg1=ndeg+1,ndeg2=2*ndeg,nd2p3=ndeg2+3)
     9324        double precision v0,omega,ae,gm
     9325        double precision c(0:ndeg,0:ndeg),s(0:ndeg,0:ndeg)
     9326        common /gmm1/v0,omega,ae,gm,c,s
     9327        integer lmin,lmax
     9328        double precision root(nd2p3)
     9329        double precision r
     9330        common /sqr/ lmin,lmax,root,r
     9331        double precision plm(ndeg1)
     9332        double precision tol
     9333        data tol /0.125d0/  ! tolerence on computed value of rg
     9334
     9335        integer i,m,l
     9336        double precision rlon,rlat
     9337        double precision x,cslt,xi,sum,cslm
     9338        double precision diff
     9339! save r
     9340        rg = r
     9341
     9342        rlon=dlon*d2r
     9343        rlat=dlat*d2r
     9344        x = sin(rlat)
     9345        cslt= cos(rlat)
     9346
     9347        do i=1,8 ! usually 3 iterations suffice
     9348
     9349          xi = ae/r
     9350          sum = 0.
     9351          do m=0, lmax
     9352           call lgndr(lmax,m,x,plm,root)
     9353           do l=m, lmax
     9354             cslm =  c(l,m)*cos(m*rlon) + s(l,m)*sin(m*rlon)
     9355             sum = sum + cslm*xi**l *plm(l-m+1)
     9356           enddo
     9357          enddo
     9358          sum=sum+1.
     9359! centrifugal potential
     9360          rg=(gm*sum+0.5*(omega**2)*(r**3)*(cslt**2))/v0
     9361!          write(out,*) i,r,rg
     9362          diff = r-rg
     9363          r = rg
     9364          if( abs(diff).lt. tol) goto 400
     9365        enddo ! do i=1,8
     9366
     9367 400    continue
     9368
     9369        end subroutine geoid
     9370
     9371!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
     9372
     9373      SUBROUTINE LGNDR(LMAX,M,X,PLM,SQR)
     9374! Return vector of plm's of degree from m to lmax, for order m
     9375      implicit none
     9376      integer LMAX
     9377      integer M
     9378      double precision X
     9379      double precision PLM(*),SQR(*)
     9380      integer IFACT,I,LL
     9381      double precision OM, PMM, PMMP1, PLL, SOMX2
     9382!  needs sqrt of integers from 1 to 2*L+3
     9383!  SIGN MODIF. OF NUM.REC. ALGORITHM, TO MATCH GEOPHYS. CONVENTION.
     9384!  AND NORMALIZATION TO MEAN SQUARE UNITY.
     9385
     9386      PMMP1=0 !dummy initialization to get rid of compiler warnings
     9387
     9388      OM = 1.
     9389      PMM=SQR(2*M+1)
     9390      IF(M.gt.0) then
     9391        PMM=SQR(2)*PMM
     9392        SOMX2=SQRT((1.-X)*(1.+X))
     9393        IFACT=1
     9394        do I=1,M
     9395          OM=-OM
     9396          PMM=-PMM*(SQR(IFACT)/SQR(IFACT+1))*SOMX2
     9397          IFACT=IFACT+2
     9398        enddo
     9399      ENDIF
     9400      PLM(1)=OM*PMM
     9401      if(LMAX.gt.M) then
     9402        PMMP1=X*SQR(2*M+3)*PMM
     9403        PLM(2)=OM*PMMP1
     9404      endif
     9405      if (LMAX.gt.M+1) then
     9406         DO LL=M+2,LMAX
     9407           PLL=SQR(2*LL+1)*SQR(2*LL-1)/(SQR(LL+M)*SQR(LL-M)) &
     9408     & * (X*PMMP1-PMM*SQR(LL+M-1)*SQR(LL-M-1)/(SQR(2*LL-1)*SQR(2*LL-3)))
     9409           PLM(LL-M+1)=OM*PLL
     9410           PMM=PMMP1
     9411           PMMP1=PLL
     9412         ENDDO
     9413      endif
     9414      END SUBROUTINE LGNDR
     9415
Note: See TracChangeset for help on using the changeset viewer.